Revision 1281 trunk/src/linad99/vcumdbetainv.cpp

vcumdbetainv.cpp (revision 1281)
18 18
  return gammln(a)+gammln(b)-gammln(a+b);
19 19
}
20 20

  
21
/*
21 22
static int sgn(double z)
22 23
{
23 24
  if (z>=0)
......
25 26
  else
26 27
    return -1;
27 28
}
29
*/
28 30

  
29 31
df1_two_variable betai(const df1_two_variable& a,
30 32
  const df1_two_variable& b,double x,int maxit=100);

Also available in: Unified diff