| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_do_diags.F |
55 |
SEAICE_DO_DIAGS |
CALL MNC_CW_RL_W('D','sice',0,0,'FU',fu,myThid) |
|
./pkg/seaice/seaice_do_diags.F |
68 |
SEAICE_DO_DIAGS |
CALL WRITE_FLD_XY_RS( 'FU.',suff,fu,myIter,myThid) |
|
./pkg/seaice/seaice_do_diags.F |
89 |
SEAICE_DO_DIAGS |
CALL PLOT_FIELD_XYRL( fu , 'Current fu ', myIter, myThid ) |
|
./pkg/seaice/ostres.F |
106 |
OSTRES |
CALL EXCH_UV_XY_RS(fu, fv, .TRUE., myThid) |
|
./pkg/seaice/ostres.F |
119 |
OSTRES |
fu(I,J,bi,bj)=(ONE-AREA(I,J,1,bi,bj))*fu(I,J,bi,bj)+ |
|
./pkg/seaice/ostres.F |
129 |
OSTRES |
CALL EXCH_UV_XY_RS(fu, fv, .TRUE., myThid) |
|
./pkg/seaice/ostres.F |
98 |
OSTRES |
fu(I,J,bi,bj)=HALF |