File |
Line number |
Procedure |
Code |
./pkg/seaice/seaice_growth.F |
1384 |
SEAICE_GROWTH |
QNET(I,J,bi,bj) = r_QbyATM_cover(I,J) + r_QbyATM_open(I,J) |
./pkg/seaice/seaice_growth.F |
1420 |
SEAICE_GROWTH |
QNET(I,J,bi,bj) = QNET(I,J,bi,bj)*convertHI2Q |
./pkg/seaice/seaice_growth.F |
1469 |
SEAICE_GROWTH |
CALL PLOT_FIELD_XYRL( QNET,'Current QNET ', myIter, myThid ) |
./pkg/seaice/seaice_growth_if.F |
1155 |
SEAICE_GROWTH_IF |
& QNET(I,J,bi,bj) |
./pkg/seaice/seaice_growth_if.F |
910 |
SEAICE_GROWTH_IF |
QNET(I,J,bi,bj) = |
./pkg/seaice/seaice_growth_if.F |
963 |
SEAICE_GROWTH_IF |
& -(QNET(I,J,bi,bj)-QSWO(I,J))*(1. -AREANm1(I,J,bi,bj)) |
./pkg/seaice/seaice_output.F |
165 |
SEAICE_OUTPUT |
& QNETtave(i,j,bi,bj) +QNET(i,j,bi,bj) *deltaTclock |