| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_model.F |
141 |
SEAICE_MODEL |
_EXCH_XY_R4(EmPmR, myThid ) |
|
./pkg/seaice/seaice_do_diags.F |
191 |
SEAICE_DO_DIAGS |
& EmPmRtave(i,j,1,bi,bj)+EmPmR(i,j,bi,bj) *deltaTclock |
|
./pkg/seaice/seaice_do_diags.F |
57 |
SEAICE_DO_DIAGS |
CALL MNC_CW_RL_W('D','sice',0,0,'EmPmR',EmPmR,myThid) |
|
./pkg/seaice/seaice_do_diags.F |
70 |
SEAICE_DO_DIAGS |
CALL WRITE_FLD_XY_RS( 'EmPmR.',suff,EmPmR,myIter,myThid) |
|
./pkg/seaice/seaice_do_diags.F |
91 |
SEAICE_DO_DIAGS |
CALL PLOT_FIELD_XYRL( EmPmR , 'Current EmPmR ', myIter, myThid ) |
|
./pkg/seaice/growth.F |
286 |
GROWTH |
EmPmR(I,J,bi,bj)= maskC(I,J,1,bi,bj)*( |
|
./pkg/seaice/growth.F |
302 |
GROWTH |
CALL PLOT_FIELD_XYRL( EmPmR,'Current EmPmR ', myIter, myThid ) |
|
./pkg/aim_compon_interf/atm_store_evmpr.F |
58 |
ATM_STORE_EVMPR |
& + EmPmR(i,j,bi,bj)*cplTimeFraction |