File |
Line number |
Procedure |
Code |
./pkg/aim/phy_suflux.F |
149 |
SUFLUX |
GHUM0 = 1. _d 0-FHUM0 |
./pkg/aim/phy_suflux.F |
165 |
SUFLUX |
Q0(J)=FHUM0*Q0(J)+GHUM0*QA(J,NLEVxy(J,myThid)) |
./pkg/aim/aim_read_physparms.F |
189 |
AIM_READ_PHYSPARMS |
CALL WRITE_0D_R8( FHUM0, INDEX_NONE,'AIM_SFL: FHUM0 =', |
./pkg/aim/aim_read_physparms.F |
90 |
AIM_READ_PHYSPARMS |
& FWIND0, FTEMP0, FHUM0, |
./pkg/aim/com_sflcon.h |
20 |
NO PROCEDURE |
COMMON /SFLCON/ FWIND0, FTEMP0, FHUM0, |
./pkg/aim/com_sflcon.h |
22 |
NO PROCEDURE |
_RL FWIND0, FTEMP0, FHUM0 |
./pkg/aim/phy_inphys.F |
115 |
INPHYS |
FHUM0 = 1. _d 0 |
./pkg/aim_v23/phy_suflux_prep.F |
153 |
SUFLUX_PREP |
GHUM0 = 1.-FHUM0 |
./pkg/aim_v23/phy_suflux_prep.F |
159 |
SUFLUX_PREP |
Q0(J)=FHUM0*Q0(J)+GHUM0*QA(J,kGrd(J)) |
./pkg/aim_v23/aim_readparms.F |
134 |
AIM_READPARMS |
& FWIND0, FTEMP0, FHUM0, |
./pkg/aim_v23/aim_readparms.F |
352 |
AIM_READPARMS |
CALL WRITE_0D_R8( FHUM0, INDEX_NONE,'AIM_SFL: FHUM0 =', |
./pkg/aim_v23/phy_const.h |
67 |
NO PROCEDURE |
FHUM0 = 1. _d 0 |
./pkg/aim_v23/com_sflcon.h |
25 |
NO PROCEDURE |
COMMON /SFLCON/ FWIND0, FTEMP0, FHUM0, |
./pkg/aim_v23/com_sflcon.h |
28 |
NO PROCEDURE |
_RL FWIND0, FTEMP0, FHUM0 |