File |
Line number |
Procedure |
Code |
./pkg/aim_v23/aim_diagnostics.F |
200 |
AIM_DIAGNOSTICS |
CALL AIM_WRITE_PHYS( 'aimPhyDiag.', suff, 1, CLTOP, |
./pkg/aim_v23/aim_diagnostics.F |
272 |
AIM_DIAGNOSTICS |
& 'aim_CLTOP',CLTOP(1,myThid),myThid) |
./pkg/aim_v23/aim_diagnostics.F |
310 |
AIM_DIAGNOSTICS |
CLTOP(J,myThid)=CLTOP(J,myThid)*CLOUDC(J,myThid) |
./pkg/aim_v23/aim_diagnostics.F |
341 |
AIM_DIAGNOSTICS |
& + CLTOP(I2,myThid)*DDTT |
./pkg/aim_v23/aim_diagnostics.F |
422 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( CLTOP(1,myThid), |
./pkg/aim_v23/com_physvar.h |
49 |
NO PROCEDURE |
COMMON /PHYGR3/ TS, TSKIN, T0, Q0, CLOUDC, CLTOP |
./pkg/aim_v23/com_physvar.h |
56 |
NO PROCEDURE |
_RL CLTOP (NGP,MAX_NO_THREADS) |
./pkg/aim_v23/phy_driver.F |
257 |
PHY_DRIVER |
CLTOP(J,myThid)=SIGH(ICLTOP(J)-1)*PSG_1(J) |