Annotation of loncom/homework/CAPA-converter/ranlib.h, revision 1.2
1.2 ! albertel 1: /* The LearningOnline Network with CAPA
! 2: * Protoypes for the ranlib code
! 3: * $Id: gplheader.js,v 1.1 2001/11/29 19:06:47 www Exp $
! 4: *
! 5: * Copyright Michigan State University Board of Trustees
! 6: *
! 7: * This file is part of the LearningOnline Network with CAPA (LON-CAPA).
! 8: *
! 9: * LON-CAPA is free software; you can redistribute it and/or modify
! 10: * it under the terms of the GNU General Public License as published by
! 11: * the Free Software Foundation; either version 2 of the License, or
! 12: * (at your option) any later version.
! 13: *
! 14: * LON-CAPA is distributed in the hope that it will be useful,
! 15: * but WITHOUT ANY WARRANTY; without even the implied warranty of
! 16: * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
! 17: * GNU General Public License for more details.
! 18: *
! 19: * You should have received a copy of the GNU General Public License
! 20: * along with LON-CAPA; if not, write to the Free Software
! 21: * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
! 22: *
! 23: * /home/httpd/html/adm/gpl.txt
! 24: *
! 25: * http://www.lon-capa.org/
! 26: */
! 27:
1.1 albertel 28: /* Prototypes for all user accessible RANLIB routines */
29:
30:
31: #ifndef _RAND_H
32: #define _RAND_H
33:
34: #define F_ARG(x) x
35:
36:
37:
38: float genbet F_ARG((float aa,float bb));
39: float capa_gennor F_ARG((double *num_d, float av,float sd));
40: #define EXTERN_F
41:
42: EXTERN_F void advnst F_ARG((long k));
43: /* EXTERN_F float genbet F_ARG((float aa,float bb)); */
44: EXTERN_F float genchi F_ARG((float df));
45: EXTERN_F float genexp F_ARG((float av));
46: EXTERN_F float genf F_ARG((float dfn, float dfd));
47: EXTERN_F float gengam F_ARG((float a,float r));
48: EXTERN_F void genmn F_ARG((float *parm,float *x,float *work));
49: EXTERN_F float gennch F_ARG((float df,float xnonc));
50: EXTERN_F float gennf F_ARG((float dfn, float dfd, float xnonc));
51: EXTERN_F float gennor F_ARG((float av,float sd));
52: /* EXTERN_F float capa_gennor F_ARG((double *num_d, float av,float sd)); */
53: EXTERN_F void genprm F_ARG((long *iarray,int larray));
54: EXTERN_F float genunf F_ARG((float low,float high));
55: EXTERN_F void getsd F_ARG((long *iseed1,long *iseed2));
56: EXTERN_F void gscgn F_ARG((long getset,long *g));
57: EXTERN_F long ignbin F_ARG((long n,float pp));
58: EXTERN_F long ignlgi F_ARG((void));
59: EXTERN_F long ignpoi F_ARG((float mu));
60: EXTERN_F long ignuin F_ARG((long low,long high));
61: EXTERN_F void initgn F_ARG((long isdtyp));
62: EXTERN_F long mltmod F_ARG((long a,long s,long m));
63: EXTERN_F void phrtsd F_ARG((char* phrase,long* seed1,long* seed2));
64: EXTERN_F float ranf F_ARG((void));
65: EXTERN_F float capa_ranf F_ARG((void));
66: EXTERN_F void setall F_ARG((long iseed1,long iseed2));
67: EXTERN_F void setant F_ARG((long qvalue));
68: EXTERN_F void setgmn F_ARG((float *meanv,float *covm,long p,float *parm));
69: EXTERN_F void setsd F_ARG((long iseed1,long iseed2));
70: EXTERN_F float sexpo F_ARG((void));
71: EXTERN_F float sgamma F_ARG((float a));
72: EXTERN_F float snorm F_ARG((void));
73:
74: #endif
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>