void
Y___op_vmlmb_next(int n)
{
if (n!=8) YError("__op_vmlmb_next takes exactly 8 arguments");
PushIntValue(op_vmlmb_next(yarg_d(7,0), yarg_d(6,0), yarg_d(5,0),
yarg_sp(4), yarg_sp(3), yarg_c(2,0), yarg_l(1,0), yarg_d(0,0)));
}
void
Y__lf2d_line_integ_sparser(int n)
{
if (n!=7) YError("_lf2d_line_integ_sparser takes exactly 7 arguments");
lf2d_line_integ_sparser(yarg_sp(6), yarg_sd(5), yarg_sd(4),
yarg_sl(3), yarg_sl(2), yarg_d(1,0), yarg_si(0));
}
void
Y__lf2d_line_integ_adjoint(int n)
{
if (n!=6) YError("_lf2d_line_integ_adjoint takes exactly 6 arguments");
lf2d_line_integ_adjoint(yarg_sp(5), yarg_sd(4), yarg_sd(3),
yarg_d(2,0), yarg_d(1,0), yarg_si(0));
}
void
Y__lf2d_direct(int n)
{
if (n!=6) YError("_lf2d_direct takes exactly 6 arguments");
lf2d_direct(yarg_sp(5), yarg_sd(4), yarg_sd(3), yarg_d(2,0),
yarg_d(1,0), yarg_si(0));
}
void
Y__dist(int n)
{
if (n!=5) YError("_dist takes exactly 5 arguments");
PushIntValue(_dist(yarg_sp(4), yarg_sl(3), yarg_sl(2),
yarg_sf(1), yarg_sf(0)));
}
void
Y__get2dPhase(int n)
{
if (n!=11) YError("_get2dPhase takes exactly 11 arguments");
PushIntValue(_get2dPhase(yarg_sp(10), yarg_si(9), yarg_si(8),
yarg_si(7), yarg_sp(6), yarg_si(5), yarg_si(4), yarg_sp(3),
yarg_sp(2), yarg_sp(1), yarg_sp(0)));
}
