Mathlinkと遅延評価/変数

Question

私はMathematicaで小さなmathlinkモジュールを使用しているFortranで書かれたスカラー関数を持っています。この関数は、シンボル定数の扱いを含め、できるだけネイティブのMathematica関数の近くで動作するようにしたい。

私は何度もmathematicaにシンボリックな定数/変数を書いて、置き換えルールのリストで置き換えたいと思っています。しかし、Mathematicaは直ちにシンボリック引数を使用してmathlink関数を評価しようとしますが、明らかに失敗します。たとえば、でも次のような単純な式が

extf[a]/.a->5 

すべてのシンボリック引数が数字に置き換えられているまで、機能の評価を遅らせるための方法はありますが失敗しますか？

私はいくつかの成功を収めていますが（ただし、この関数を一般的なmathematicaパッケージに含めて同僚と共有したいのであれば）外部への「ダミー」参照をすべて評価することです私は他の数値定数をすべて評価すると同時に、実参照のすべてのダミー参照を交換するための置換規則を使用します。例えば

dummyf[a]/.{a->5,dummyf->extf} 

Answer 1

Mathematicaパターンマッチャーを使用すると便利なものはありますか？入力が数字以外の場合は、holddummyfの定義を省略する必要があることに注意してください。

dummyf[a_?NumericQ] := extf[a] 
holddummyf[a_?NumericQ] := extf[a] 
dummyf[a_] := holddummyf[a] 

[In] dummyf[0.3] 
[Out] extf[0.3] 

[In] dummyf[b] 
[Out] holddummyf[b] 

[In] % /. b -> 5 
[Out] extf[5] 

私が聞いて、他の質問はFortranでextfを持つことが厳密に必要であるかどうかだと思います。