| File |
Line number |
Procedure |
Code |
|
./pkg/aim/com_physcon.h |
27 |
NO PROCEDURE |
& SIG, SIGL, SIGH, DSIG, POUT, GRDSIG, GRDSCP, WVI, FMU |
|
./pkg/aim/com_physcon.h |
31 |
NO PROCEDURE |
_RL DSIG(NLEV) |
|
./pkg/aim/phy_vdifsc.F |
126 |
VDIFSC |
RTST(J) = RTSQ*DSIG(NL1(J)) |
|
./pkg/aim/phy_vdifsc.F |
127 |
VDIFSC |
& /((DSIG(NLEVxy(J,myThid))+DSIG(NL1(J)))*CP) |
|
./pkg/aim/phy_vdifsc.F |
128 |
VDIFSC |
RNL1(J) = -DSIG(NLEVxy(J,myThid))/DSIG(NL1(J)) |
|
./pkg/aim/phy_lscond.F |
80 |
LSCOND |
PFACT = DSIG(K)*PRG |
|
./pkg/aim/phy_convmf.F |
82 |
CONVMF |
FM0(J)=P0*DSIG(NLEVxy(J,myThid))/(GG*TRCNV*3600) |
|
./pkg/aim/phy_radiat.F |
198 |
RADSW |
TAU(J,1)=EXP(-ABSSW*PSA(J)*DSIG(1)) |
|
./pkg/aim/phy_radiat.F |
206 |
RADSW |
* +ABCSW*CLOUDC(J)*QA(J,NL1(J)))*PSA(J)*DSIG(K)) |
|
./pkg/aim/phy_radiat.F |
213 |
RADSW |
& *PSA(J)*DSIG(NLEVxy(J,myThid))) |
|
./pkg/aim/phy_radiat.F |
299 |
RADSW |
TAU(J,1)=EXP(-ABSLW*PSA(J)*DSIG(1)) |
|
./pkg/aim/phy_radiat.F |
306 |
RADSW |
* +ABCLW*CLOUDC(J)*QA(J,NL1(J)))*PSA(J)*DSIG(K)) |
|
./pkg/aim/phy_radiat.F |
361 |
RADSW |
& *DSIG(NLEVxy(J,myThid))) |
|
./pkg/aim/phy_inphys.F |
76 |
INPHYS |
DSIG(K) = HSG(K)-HSG(K-1) |
|
./pkg/aim/phy_inphys.F |
78 |
INPHYS |
GRDSIG(K) = GG/(DSIG(K)*P0) |
|
./pkg/aim_v23/com_physcon.h |
32 |
NO PROCEDURE |
& SIG, SIGL, SIGH, DSIG, GRDSIG, GRDSCP, WVI |
|
./pkg/aim_v23/com_physcon.h |
37 |
NO PROCEDURE |
_RL DSIG(NLEV) |
|
./pkg/aim_v23/phy_vdifsc.F |
102 |
VDIFSC |
RSIG(K)=1./DSIG(K) |
|
./pkg/aim_v23/phy_vdifsc.F |
135 |
VDIFSC |
FSHCQ = DSIG(Ktmp)*dpFac(J,Ktmp)/(TRSHC*3600. _d 0) |
|
./pkg/aim_v23/phy_lscond.F |
102 |
LSCOND |
PFACT = DSIG(K)*PRG*dpFac(J,K) |
|
./pkg/aim_v23/phy_convmf.F |
87 |
CONVMF |
FM0(J)=P0*DSIG(Ktmp)*dpFac(J,Ktmp)/(GG*TRCNV*3600. _d 0) |
|
./pkg/aim_v23/phy_radiat.F |
259 |
RADSW |
DELTAP=ZENIT(J)*DSIG(1)*dpFac(J,1) |
|
./pkg/aim_v23/phy_radiat.F |
268 |
RADSW |
DELTAP=ZENIT(J)*DSIG(K)*dpFac(J,K) |
|
./pkg/aim_v23/phy_radiat.F |
286 |
RADSW |
DELTAP=ZENIT(J)*DSIG(K)*dpFac(J,K) |
|
./pkg/aim_v23/phy_radiat.F |
292 |
RADSW |
DELTAP=ZENIT(J)*DSIG(K)*dpFac(J,K) |
|
./pkg/aim_v23/phy_radiat.F |
385 |
RADSW |
DELTAP=DSIG(1)*dpFac(J,1) |
|
./pkg/aim_v23/phy_radiat.F |
395 |
RADSW |
DELTAP=DSIG(K)*dpFac(J,K) |
|
./pkg/aim_v23/phy_inphys.F |
85 |
INPHYS |
DSIG(K) = HSG(K)-HSG(K-1) |
|
./pkg/aim_v23/phy_inphys.F |
87 |
INPHYS |
GRDSIG(K) = GG/(DSIG(K)*P0) |