version 1.1, 1999/09/28 21:26:21
|
version 1.3, 2000/06/30 21:36:16
|
Line 1
|
Line 1
|
/* Prototypes for all user accessible RANLIB routines */ |
/* Prototypes for all user accessible RANLIB routines |
|
Copyright (C) 1992-2000 Michigan State University |
|
|
|
The CAPA system is free software; you can redistribute it and/or |
|
modify it under the terms of the GNU Library General Public License as |
|
published by the Free Software Foundation; either version 2 of the |
|
License, or (at your option) any later version. |
|
|
|
The CAPA system is distributed in the hope that it will be useful, |
|
but WITHOUT ANY WARRANTY; without even the implied warranty of |
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
|
Library General Public License for more details. |
|
|
|
You should have received a copy of the GNU Library General Public |
|
License along with the CAPA system; see the file COPYING. If not, |
|
write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330, |
|
Boston, MA 02111-1307, USA. */ |
|
|
|
|
|
|
#ifndef _RAND_H |
#ifndef _RAND_H |
Line 9
|
Line 26
|
|
|
|
|
float genbet F_ARG((float aa,float bb)); |
float genbet F_ARG((float aa,float bb)); |
|
float capa_gennor F_ARG((double *num_d, float av,float sd)); |
#define EXTERN_F |
#define EXTERN_F |
|
|
EXTERN_F void advnst F_ARG((long k)); |
EXTERN_F void advnst F_ARG((long k)); |
Line 22 EXTERN_F void genmn F_ARG((float *par
|
Line 39 EXTERN_F void genmn F_ARG((float *par
|
EXTERN_F float gennch F_ARG((float df,float xnonc)); |
EXTERN_F float gennch F_ARG((float df,float xnonc)); |
EXTERN_F float gennf F_ARG((float dfn, float dfd, float xnonc)); |
EXTERN_F float gennf F_ARG((float dfn, float dfd, float xnonc)); |
EXTERN_F float gennor F_ARG((float av,float sd)); |
EXTERN_F float gennor F_ARG((float av,float sd)); |
|
/* EXTERN_F float capa_gennor F_ARG((double *num_d, float av,float sd)); */ |
EXTERN_F void genprm F_ARG((long *iarray,int larray)); |
EXTERN_F void genprm F_ARG((long *iarray,int larray)); |
EXTERN_F float genunf F_ARG((float low,float high)); |
EXTERN_F float genunf F_ARG((float low,float high)); |
EXTERN_F void getsd F_ARG((long *iseed1,long *iseed2)); |
EXTERN_F void getsd F_ARG((long *iseed1,long *iseed2)); |
Line 34 EXTERN_F void initgn F_ARG((long isdty
|
Line 52 EXTERN_F void initgn F_ARG((long isdty
|
EXTERN_F long mltmod F_ARG((long a,long s,long m)); |
EXTERN_F long mltmod F_ARG((long a,long s,long m)); |
EXTERN_F void phrtsd F_ARG((char* phrase,long* seed1,long* seed2)); |
EXTERN_F void phrtsd F_ARG((char* phrase,long* seed1,long* seed2)); |
EXTERN_F float ranf F_ARG((void)); |
EXTERN_F float ranf F_ARG((void)); |
|
EXTERN_F float capa_ranf F_ARG((void)); |
EXTERN_F void setall F_ARG((long iseed1,long iseed2)); |
EXTERN_F void setall F_ARG((long iseed1,long iseed2)); |
EXTERN_F void setant F_ARG((long qvalue)); |
EXTERN_F void setant F_ARG((long qvalue)); |
EXTERN_F void setgmn F_ARG((float *meanv,float *covm,long p,float *parm)); |
EXTERN_F void setgmn F_ARG((float *meanv,float *covm,long p,float *parm)); |