Doxygen Source Code Documentation
cdf_35.c File Reference
#include "cdflib.h"Go to the source code of this file.
Functions | |
| void | cumt (double *t, double *df, double *cum, double *ccum) |
Function Documentation
|
||||||||||||||||||||
|
Definition at line 2 of file cdf_35.c. References a, cumbet(), and tt. Referenced by cdft().
00041 {
00042 static double K2 = 0.5e0;
00043 static double xx,a,oma,tt,yy,dfptt,T1;
00044 /*
00045 ..
00046 .. Executable Statements ..
00047 */
00048 tt = *t**t;
00049 dfptt = *df+tt;
00050 xx = *df/dfptt;
00051 yy = tt/dfptt;
00052 T1 = 0.5e0**df;
00053 cumbet(&xx,&yy,&T1,&K2,&a,&oma);
00054 if(!(*t <= 0.0e0)) goto S10;
00055 *cum = 0.5e0*a;
00056 *ccum = oma+*cum;
00057 goto S20;
00058 S10:
00059 *ccum = 0.5e0*a;
00060 *cum = oma+*ccum;
00061 S20:
00062 return;
00063 } /* END */
|
