Revision 1062 trunk/src/linad99/normmix2.cpp

normmix2.cpp (revision 1062)
110 110
  return x;
111 111
}
112 112

  
113
/**
114
 * Description not yet available.
115
 * \param
116
 */
117
dvariable inv_cumd_normal_logistic_mixture(const prevariable& _yy,double a)
118
{
119
  ADUNCONST(dvariable,yy)
120
  double  x=nr_generic(value(yy),a,cumd_normal_logistic_mixture_initx,
121
    cumd_normal_logistic_mixture,df_cumd_normal_logistic_mixture);
122
  dvariable z;
123
  value(z)=x;
124
  double dfx=1.0/df_cumd_normal_logistic_mixture(x,a);
125
  gradient_structure::GRAD_STACK1->set_gradient_stack(default_evaluation,
126
     &(value(z)), &(value(yy)),dfx);
127
  return z;
128
}
129

  
130 113
/*
131 114
main()
132 115
{

Also available in: Unified diff