File |
Line number |
Procedure |
Code |
./pkg/aim/phy_vdifsc.F |
50 |
VDIFSC |
_RL UA(NGP,NLEV), VA(NGP,NLEV), Ta(NGP,NLEV), |
./pkg/aim/phy_vdifsc.F |
7 |
VDIFSC |
SUBROUTINE VDIFSC (UA,VA,Ta,RH,QA,QSAT, |
./pkg/aim/phy_suflux.F |
114 |
SUFLUX |
U0(J) = FWIND0*UA(J,NLEVxyU(J,myThid)) |
./pkg/aim/phy_suflux.F |
233 |
SUFLUX |
& USTR(J,3) = -DRAG(J)*UA(J,NLEVxyU(J,myThid)) |
./pkg/aim/phy_suflux.F |
62 |
SUFLUX |
_RL PSA(NGP), UA(NGP,NLEV), VA(NGP,NLEV), TA(NGP,NLEV), |
./pkg/aim/phy_suflux.F |
6 |
SUFLUX |
SUBROUTINE SUFLUX (PSA,UA,VA,TA,QA,RH,QSAT,Vsurfsq,PHI, |