00001
00002
00003
00004 #ifndef _HELIKE_CS_H_
00005 #define _HELIKE_CS_H_
00006
00007
00011 void HeCollid( long int nelem);
00012
00019 realnum HeCSInterp( long int nelem,
00020 long int ipHi,
00021 long int ipLo,
00022 long int Collider );
00023
00032 realnum AtomCSInterp( long int nelem,
00033 long int ipHi,
00034 long int ipLo,
00035 realnum *factor,
00036 const char **where,
00037 long int Collider );
00038
00047 realnum IonCSInterp( long int nelem,
00048 long int ipHi,
00049 long int ipLo,
00050 realnum *factor,
00051 const char **where,
00052 long int Collider );
00053
00054
00055
00056
00057
00058
00059
00069 double CS_l_mixing_S62(
00070 long int ipISO,
00071 long int nelem,
00072 long int ipLo,
00073 long int ipHi,
00074 double temp,
00075 long int Collider );
00076
00084 double CS_l_mixing_PS64(
00085 long int ipISO,
00086 long int nelem,
00087 long int ipLo ,
00088 long int ipHi ,
00089 long int Collider );
00090
00101 double CS_l_mixing_VF01(
00102 long int ipISO,
00103 long int nelem,
00104 long int n,
00105 long int l,
00106 long int lp,
00107 long int s,
00108 double temp,
00109 long int Collider );
00110
00111
00112 #endif