File |
Line number |
Procedure |
Code |
./pkg/aim/phy_suflux.F |
114 |
SUFLUX |
U0(J) = FWIND0*UA(J,NLEVxyU(J,myThid)) |
./pkg/aim/phy_suflux.F |
117 |
SUFLUX |
V0(J) = FWIND0*VA(J,NLEVxyV(J,myThid)) |
./pkg/aim/phy_suflux.F |
173 |
SUFLUX |
factwind2 = FWIND0*FWIND0 |
./pkg/aim/aim_read_physparms.F |
185 |
AIM_READ_PHYSPARMS |
CALL WRITE_0D_R8( FWIND0,INDEX_NONE,'AIM_SFL: FWIND0 =', |
./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 |
113 |
INPHYS |
FWIND0 = 0.6 _d 0 |
./pkg/aim_v23/phy_suflux_prep.F |
167 |
SUFLUX_PREP |
factWind2 = FWIND0*FWIND0 |
./pkg/aim_v23/aim_readparms.F |
134 |
AIM_READPARMS |
& FWIND0, FTEMP0, FHUM0, |
./pkg/aim_v23/aim_readparms.F |
348 |
AIM_READPARMS |
CALL WRITE_0D_R8( FWIND0,INDEX_NONE,'AIM_SFL: FWIND0 =', |
./pkg/aim_v23/phy_const.h |
65 |
NO PROCEDURE |
FWIND0 = 0.6 _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 |