bridge/class-master/depend/pari/src/basemath/mftrace.c
/* dummy lfun create for theta evaluation */
dummy lfun create for theta evaluation
dummy lfun create for theta evaluation
static GEN
mfthetaancreate(GEN van, GEN N, GEN k)
{
  GEN L = zerovec(6);
  gel(L,1) = lfuntag(t_LFUN_GENERIC, van);
  gel(L,3) = mkvec2(gen_0, gen_1);
  gel(L,4) = k;
  gel(L,5) = N; return L;
}
static GEN mfthetaancreate ( GEN van , GEN N , GEN k ) { GEN L = zerovec ( 6 ) ; gel ( L , 1 ) = lfuntag ( t_LFUN_GENERIC , van ) ; gel ( L , 3 ) = mkvec2 ( gen_0 , gen_1 ) ; gel ( L , 4 ) = k ; gel ( L , 5 ) = N ; return L ; }
dummy lfun create for theta evaluation
dummy lfun create for theta evaluation