00001
00002
00003
00004 #ifndef _GAMMAS_H_
00005 #define _GAMMAS_H_
00006
00026 double GammaBn(long int n1,
00027 long int n2,
00028 long int ip,
00029 double thresh,
00030 double *ainduc,
00031 double *rcool);
00032
00038 void GammaPrtShells( long nelem , long int );
00039
00048 void GammaPrt(long int n1,
00049 long int n2,
00050 long int ip,
00051 FILE * io,
00052 double total,
00053 double threshold);
00054
00056 double GammaK(long int n1,
00057 long int n2,
00058 long int ipOpac,
00059 double yield1);
00060
00061 #if 0
00062
00066 double GammaPL(long int n,
00067 long int ipZ);
00068 #endif
00069
00075 double GammaBnPL(long int n,
00076 long int ipZ,
00077 double *ainduc,
00078 double *rcool);
00079
00086 void GammaPrtRate(FILE * ioFILE,
00087 long int ion ,
00088 long int ipZ,
00089 bool lgPRT );
00090
00091 #endif