曲線を描くための媒介変数表示の式を登録します。 式は登録した番号で呼び出します。
//**********************************************************************************
入力 Tp:媒介変数の値 Fn:式の登録番号
出力 F :媒介変数に対する曲線の座標値
//**********************************************************************************
#macro Line_function(Tp,Fn)
#switch(Fn)
#case( 3) #local F=< Tp, 0, sin(Tp) >; #break // sin
#case( 5) #local F=< Tp, 0, cosh(Tp)/4 >; #break // catenary
#end F
#end
//**********************************************************************************