| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_moist.F |
119 |
MOISTIO |
_RL PRECIP(ISTRIP), PCNET(ISTRIP) |
|
./pkg/fizhi/fizhi_moist.F |
655 |
MOISTIO |
. PLK,TH,TMP1,TMP2,TMP3,ITMP1,ITMP2,PCNET,PRECIP, |
|
./pkg/fizhi/fizhi_moist.F |
728 |
MOISTIO |
prep(i) = PRECIP(I) + PCNET(I) |
|
./pkg/fizhi/fizhi_moist.F |
729 |
MOISTIO |
tmp1(i,1) = PRECIP(I) |
|
./pkg/seaice/seaice_fake.F |
64 |
SEAICE_FAKE |
& - PRECIP(i,j,bi,bj) |
|
./pkg/seaice/seaice_growth.F |
1470 |
SEAICE_GROWTH |
& ( PRECIP(I,J,bi,bj) - snowPrecip(I,J,bi,bj) ) * |
|
./pkg/seaice/seaice_growth.F |
1487 |
SEAICE_GROWTH |
& PRECIP(I,J,bi,bj)*AREApreTH(I,J) |
|
./pkg/seaice/seaice_growth.F |
1491 |
SEAICE_GROWTH |
& PRECIP(I,J,bi,bj)*AREApreTH(I,J) |
|
./pkg/seaice/seaice_growth.F |
2326 |
SEAICE_GROWTH |
& ( ( EVAP(I,J,bi,bj)-PRECIP(I,J,bi,bj) ) |
|
./pkg/seaice/seaice_growth.F |
2375 |
SEAICE_GROWTH |
& ( EVAP(I,J,bi,bj)-PRECIP(I,J,bi,bj) ) |
|
./pkg/seaice/seaice_growth.F |
2391 |
SEAICE_GROWTH |
& - PRECIP(I,J,bi,bj) |
|
./pkg/seaice/seaice_growth.F |
2406 |
SEAICE_GROWTH |
& PRECIP(I,J,bi,bj) |
|
./pkg/seaice/seaice_growth.F |
2424 |
SEAICE_GROWTH |
& PRECIP(I,J,bi,bj) |