在ampl中写sinc函数的总和

Question

我必须将 Mathematica output 实现为 ampl 中的变量，它是 sinc 函数的总和和乘积。 我已将 sinc function 定义为

var SincA {i in N}=   if abs(x1[i]) > 1e-8 then sin(x1[i])/x1[i] else 1;
var SincB {i in N}=   if abs(x2[i]) > 1e-8 then sin(x2[i])/x2[i] else 1;

然而，Mathematica output 成形

    -19.99590492248535*Sinc[0.12566370614359174*(0. + t)]*
  Sinc[0.26927937030769655*(-65. + u)] - 
 4.360287189483643*Sinc[0.12566370614359174*(25. + t)]*
     Sinc[0.26927937030769655*(-65. + u)] + 
 12.314101219177246*Sinc[0.12566370614359174*(50. + t)]*
  Sinc[0.26927937030769655*(-65. + u)] 

这只是总 output 的一小部分。

我可以在ampl中重现这个

var Sinc1x1A{i in N}= if abs(0.12566370614359174*(0. + x1[i])) > 1e-8 then sin(0.12566370614359174*(0. + x1[i]))/(0.12566370614359174*(0. + x1[i])) else 1;

var Sinc1x1B{i in N} = if abs(0.26927937030769655*(-65. + x2[i])) > 1e-8 then sin(0.26927937030769655*(-65. + x2[i]))/(0.26927937030769655*(-65. + x2[i])) else 1

var Resultx1{i in N} = -19.99590492248535*Sinc1x1A[i]*Sinc1x1B[i]-...;

但是，这种方法效率极低，因为我必须定义太多变量。

我想构造一个没有定义参数的sinc function，然后根据需要多次调用它，而不必定义数十个变量。

我找到了这些幻灯片https://ampl.com/MEETINGS/TALKS/2018_07_Valencia_WA-57.pdf ，但我找不到任何方法来做我想做的事。

有人可以指出一些解决此问题的文档吗？