| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_lsm.F |
1265 |
SMFAC |
RHOAIR = PSUR(ChNo) * 100. / ( RGAS*TC(ChNo) ) |
|
./pkg/fizhi/fizhi_lsm.F |
873 |
FLUXES |
RHOAIR = PSUR(ChNo) * 100. / (RGAS * TC(ChNo)) |
|
./pkg/fizhi/fizhi_turb.F |
1618 |
TRBFLX |
RHODZ2(I,L) = (RGAS*0.01) * RHODZ2(I,L) |
|
./pkg/fizhi/fizhi_turb.F |
1623 |
TRBFLX |
RHODZ1(I,L) = (RGAS*0.01) * THV(I,L+1) |
|
./pkg/fizhi/fizhi_turb.F |
2685 |
SFCFLX |
VRHO(I) = VPE(I)*100. / ( RGAS * VRHO(I) ) |
|
./pkg/fizhi/getcon.F |
102 |
NO PROCEDURE |
PARAMETER ( EPSFAC = EPS*HEATW/RGAS*CALTOJ ) |
|
./pkg/fizhi/getcon.F |
106 |
NO PROCEDURE |
DATA ANAME(2 ),ACON(2 ) / 'RGAS ', RGAS / |
|
./pkg/fizhi/getcon.F |
34 |
NO PROCEDURE |
& STFBOL, AIRMW, H2OMW, RUNIV, RGAS, RVAP, RKAP, HEATW, |
|
./pkg/fizhi/getcon.F |
82 |
NO PROCEDURE |
PARAMETER ( RGAS = RUNIV/AIRMW) |
|
./pkg/fizhi/getcon.F |
84 |
NO PROCEDURE |
PARAMETER ( RKAP = RGAS/CPD ) |
|
./pkg/fizhi/sibber.h |
14 |
NO PROCEDURE |
_RL ALHE, ALHS, ALHM, TF, STEFAN, RGAS, SHW, SHI, RHOW, GRAV |
|
./pkg/fizhi/sibber.h |
25 |
NO PROCEDURE |
PARAMETER (RGAS = .286*1003.5) |