92 |
#ifdef PART_SCAV |
#ifdef PART_SCAV |
93 |
& ,scav_rat, scav_inter, scav_exp |
& ,scav_rat, scav_inter, scav_exp |
94 |
#endif |
#endif |
95 |
|
#ifdef ALLOW_CDOM |
96 |
|
& , fraccdom, cdomdegrd, cdombleach, PARcdom |
97 |
|
& , rnp_cdom, rfep_cdom, rcp_cdom |
98 |
|
& , cdomcoeff |
99 |
|
#endif |
100 |
& ,nsource,ngroups |
& ,nsource,ngroups |
101 |
|
|
102 |
_RL mu(npmax) |
_RL mu(npmax) |
192 |
#ifdef PART_SCAV |
#ifdef PART_SCAV |
193 |
_RL scav_rat, scav_inter, scav_exp |
_RL scav_rat, scav_inter, scav_exp |
194 |
#endif |
#endif |
195 |
|
#ifdef ALLOW_CDOM |
196 |
|
_RL fraccdom, cdomdegrd, cdombleach, PARcdom |
197 |
|
_RL rnp_cdom, rfep_cdom, rcp_cdom |
198 |
|
_RL cdomcoeff |
199 |
|
#endif |
200 |
INTEGER nsource(npmax) |
INTEGER nsource(npmax) |
201 |
INTEGER ngroups |
INTEGER ngroups |
202 |
|
|