File:  [LON-CAPA] / capa / capa51 / pProj / ranlib.h
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Tue Sep 28 21:26:21 1999 UTC (24 years, 9 months ago) by albertel
Branches: capa
CVS tags: start
Created directory structure

    1: /* Prototypes for all user accessible RANLIB routines */
    2: 
    3: 
    4: #ifndef  _RAND_H
    5: #define _RAND_H
    6: 
    7: #define  F_ARG(x)  x
    8: 
    9: 
   10: 
   11: float genbet  F_ARG((float aa,float bb));
   12: 
   13: #define EXTERN_F  
   14: 
   15: EXTERN_F void  advnst  F_ARG((long k));
   16: /* EXTERN_F float genbet  F_ARG((float aa,float bb)); */
   17: EXTERN_F float genchi  F_ARG((float df));
   18: EXTERN_F float genexp  F_ARG((float av));
   19: EXTERN_F float genf    F_ARG((float dfn, float dfd));
   20: EXTERN_F float gengam  F_ARG((float a,float r));
   21: EXTERN_F void genmn    F_ARG((float *parm,float *x,float *work));
   22: EXTERN_F float gennch  F_ARG((float df,float xnonc));
   23: EXTERN_F float gennf   F_ARG((float dfn, float dfd, float xnonc));
   24: EXTERN_F float gennor  F_ARG((float av,float sd));
   25: EXTERN_F void genprm   F_ARG((long *iarray,int larray));
   26: EXTERN_F float genunf  F_ARG((float low,float high));
   27: EXTERN_F void getsd    F_ARG((long *iseed1,long *iseed2));
   28: EXTERN_F void gscgn    F_ARG((long getset,long *g));
   29: EXTERN_F long ignbin   F_ARG((long n,float pp));
   30: EXTERN_F long ignlgi   F_ARG((void));
   31: EXTERN_F long ignpoi   F_ARG((float mu));
   32: EXTERN_F long ignuin   F_ARG((long low,long high));
   33: EXTERN_F void initgn   F_ARG((long isdtyp));
   34: EXTERN_F long mltmod   F_ARG((long a,long s,long m));
   35: EXTERN_F void phrtsd   F_ARG((char* phrase,long* seed1,long* seed2));
   36: EXTERN_F float ranf    F_ARG((void));
   37: EXTERN_F void setall   F_ARG((long iseed1,long iseed2));
   38: EXTERN_F void setant   F_ARG((long qvalue));
   39: EXTERN_F void setgmn   F_ARG((float *meanv,float *covm,long p,float *parm));
   40: EXTERN_F void setsd    F_ARG((long iseed1,long iseed2));
   41: EXTERN_F float sexpo   F_ARG((void));
   42: EXTERN_F float sgamma  F_ARG((float a));
   43: EXTERN_F float snorm   F_ARG((void));
   44: 
   45: #endif

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>