式の登録

 媒介変数で表された曲線の式を登録します。式は登録した番号で呼び出します。
//**********************************************************************************
   入力 Tp:媒介変数の値 Fn:式の登録番号
   出力 F :媒介変数に対する曲線の座標値
//**********************************************************************************
 #macro Line_function(Tp,Fn)
  #switch(Fn)
  #case(1) #local F=<2*pi*Tp, 10*sin(Tp), 0>; #break // sin
  #case(2) #local F=<2*pi*Tp, 10*cos(Tp), 0>; #break // cos
  #end F
 #end
//**********************************************************************************
   ここで、登録する式は、サイン曲線とコサイン曲線の二種類になります。