File |
Line number |
Procedure |
Code |
./pkg/fizhi/slprs.F |
37 |
SLPRS |
R = GETCON('RGAS') |
./pkg/fizhi/slprs.F |
72 |
SLPRS |
SLP(I) = PHIS(I) / ( R*TM(I) ) |
./pkg/kpp/kpp_routines.F |
1355 |
BLMIX |
_RL R, dvdzup, dvdzdn, viscp |
./pkg/kpp/kpp_routines.F |
1405 |
BLMIX |
R = 1.0 - delhat / hwide(kn) |
./pkg/kpp/kpp_routines.F |
1408 |
BLMIX |
viscp = 0.5 * ( (1.-R) * (dvdzup + abs(dvdzup)) + |
./pkg/kpp/kpp_routines.F |
1409 |
BLMIX |
1 R * (dvdzdn + abs(dvdzdn)) ) |
./pkg/kpp/kpp_routines.F |
1413 |
BLMIX |
difsp = 0.5 * ( (1.-R) * (dvdzup + abs(dvdzup)) + |
./pkg/kpp/kpp_routines.F |
1414 |
BLMIX |
1 R * (dvdzdn + abs(dvdzdn)) ) |
./pkg/kpp/kpp_routines.F |
1418 |
BLMIX |
diftp = 0.5 * ( (1.-R) * (dvdzup + abs(dvdzup)) + |
./pkg/kpp/kpp_routines.F |
1419 |
BLMIX |
1 R * (dvdzdn + abs(dvdzdn)) ) |
./pkg/openad/externalDummies.F |
185 |
STREAMICE_INVERT_SURF_FORTHICK |
I R, |
./pkg/openad/externalDummies.F |
198 |
STREAMICE_INVERT_SURF_FORTHICK |
_RL R(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/openad/externalDummies.F |
203 |
STREAMICE_INVERT_SURF_FORTHICK |
& R(1,1,1,1) |
./pkg/streamice/adstreamice_invert_surf_forthick.F |
100 |
ADSTRMICE_H_INV |
hf = -1.0 * i_r * R (i,j,bi,bj) |
./pkg/streamice/adstreamice_invert_surf_forthick.F |
13 |
ADSTRMICE_H_INV |
& R, |
./pkg/streamice/adstreamice_invert_surf_forthick.F |
50 |
ADSTRMICE_H_INV |
_RL R(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |
./pkg/streamice/adstreamice_invert_surf_forthick.F |
81 |
ADSTRMICE_H_INV |
I R, |
./pkg/streamice/streamice_invert_surf_forthick.F |
10 |
STREAMICE_INVERT_SURF_FORTHICK |
I R, |
./pkg/streamice/streamice_invert_surf_forthick.F |
32 |
STREAMICE_INVERT_SURF_FORTHICK |
_RL R(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/streamice/streamice_invert_surf_forthick.F |
58 |
STREAMICE_INVERT_SURF_FORTHICK |
hf = (-1. _d 0) * R(i,j,bi,bj) / |
./pkg/streamice/streamice_invert_surf_forthick.F |
62 |
STREAMICE_INVERT_SURF_FORTHICK |
htmp = S(i,j,bi,bj)-R(i,j,bi,bj) |
./pkg/streamice/streamice_invert_surf_forthick.F |
75 |
STREAMICE_INVERT_SURF_FORTHICK |
hf = (-1. _d 0) * R(i,j,bi,bj) / |
./pkg/streamice/streamice_invert_surf_forthick.F |
79 |
STREAMICE_INVERT_SURF_FORTHICK |
htmp = S(i,j,bi,bj)-R(i,j,bi,bj) |