| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_growth.F |
1390 |
SEAICE_GROWTH |
QSW(I,J,bi,bj) = a_QSWbyATM_cover(I,J) + a_QSWbyATM_open(I,J) |
|
./pkg/seaice/seaice_growth.F |
1421 |
SEAICE_GROWTH |
QSW(I,J,bi,bj) = QSW(I,J,bi,bj)*convertHI2Q |
|
./pkg/seaice/seaice_growth.F |
1468 |
SEAICE_GROWTH |
CALL PLOT_FIELD_XYRL( QSW,'Current QSW ', myIter, myThid ) |
|
./pkg/seaice/seaice_growth_if.F |
1159 |
SEAICE_GROWTH_IF |
& QSW(i,j,bi,bj), |
|
./pkg/seaice/seaice_growth_if.F |
852 |
SEAICE_GROWTH_IF |
QSW(I,J,bi,bj) = |
|
./pkg/seaice/seaice_growth_if.F |
856 |
SEAICE_GROWTH_IF |
QSW(I,J,bi,bj) = 0. _d 0 |
|
./pkg/seaice/seaice_growth_if.F |
948 |
SEAICE_GROWTH_IF |
QSW_absorb_in_ML(I,J) = QSW(I,J,bi,bj)* |
|
./pkg/seaice/seaice_growth_if.F |
957 |
SEAICE_GROWTH_IF |
& QSW(I,J,bi,bj) - QSW_absorb_in_ML(I,J) |
|
./pkg/seaice/seaice_output.F |
167 |
SEAICE_OUTPUT |
& QSWtave(i,j,bi,bj) +QSW(i,j,bi,bj) *deltaTclock |