| File |
Line number |
Procedure |
Code |
|
./pkg/exf/exf_adjoint_snapshots_ad.F |
141 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL WRITE_FLD_XY_RS ( 'ADJtaux.',suff, adfu, myIter, myThid) |
|
./pkg/exf/exf_adjoint_snapshots_ad.F |
142 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL WRITE_FLD_XY_RS ( 'ADJtauy.',suff, adfv, myIter, myThid) |
|
./pkg/exf/exf_adjoint_snapshots_ad.F |
143 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL WRITE_FLD_XY_RS ( 'ADJqnet.',suff, adqnet, myIter, myThid) |
|
./pkg/exf/exf_adjoint_snapshots_ad.F |
144 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL WRITE_FLD_XY_RS ( 'ADJempr.',suff, adempmr, myIter, myThid) |
|
./pkg/exf/exf_adjoint_snapshots_ad.F |
146 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL WRITE_FLD_XY_RS ( 'ADJqsw.',suff, adqsw, myIter, myThid) |
|
./pkg/gmredi/gmredi_init_varia.F |
102 |
GMREDI_INIT_VARIA |
CALL WRITE_FLD_XY_RS( 'GM_isoFac2d',' ',GM_isoFac2d,-1,myThid ) |
|
./pkg/gmredi/gmredi_init_varia.F |
105 |
GMREDI_INIT_VARIA |
CALL WRITE_FLD_XY_RS( 'GM_bolFac2d',' ',GM_bolFac2d,-1,myThid ) |
|
./pkg/matrix/matrix_write_grid.F |
22 |
MATRIX_WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'DXF',' ',DXF,0,myThid) |
|
./pkg/matrix/matrix_write_grid.F |
23 |
MATRIX_WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'DYF',' ',DYF,0,myThid) |
|
./pkg/rw/write_fld_xy_rs.F |
6 |
WRITE_FLD_XY_RS |
SUBROUTINE WRITE_FLD_XY_RS( pref,suff,field,myIter,myThid ) |
|
./pkg/seaice/seaice_output.F |
128 |
SEAICE_OUTPUT |
CALL WRITE_FLD_XY_RS('FU.',suff,fu,myIter,myThid) |
|
./pkg/seaice/seaice_output.F |
129 |
SEAICE_OUTPUT |
CALL WRITE_FLD_XY_RS('FV.',suff,fv,myIter,myThid) |
|
./pkg/seaice/seaice_output.F |
130 |
SEAICE_OUTPUT |
CALL WRITE_FLD_XY_RS('EmPmR.',suff,EmPmR,myIter,myThid) |
|
./pkg/seaice/seaice_output.F |
131 |
SEAICE_OUTPUT |
CALL WRITE_FLD_XY_RS('Qnet.',suff,Qnet,myIter,myThid) |
|
./pkg/seaice/seaice_output.F |
132 |
SEAICE_OUTPUT |
CALL WRITE_FLD_XY_RS('Qsw.',suff,Qsw,myIter,myThid) |
|
./pkg/shelfice/shelfice_init_fixed.F |
147 |
SHELFICE_INIT_FIXED |
CALL WRITE_FLD_XY_RS( 'SHICE_pLoadAnom', ' ', |
|
./pkg/shelfice/shelfice_output.F |
82 |
SHELFICE_OUTPUT |
CALL WRITE_FLD_XY_RS( 'SHICE_fwFlux.',suff, |
|
./pkg/shelfice/shelfice_output.F |
84 |
SHELFICE_OUTPUT |
CALL WRITE_FLD_XY_RS( 'SHICE_heatFlux.',suff, |
|
./pkg/streamice/streamice_check.F |
307 |
STREAMICE_CHECK |
CALL WRITE_FLD_XY_RS ( "STREAMICE_ufacemask_bdry", "out", |
|
./pkg/streamice/streamice_check.F |
309 |
STREAMICE_CHECK |
CALL WRITE_FLD_XY_RS ( "STREAMICE_vfacemask_bdry", "out", |
|
./pkg/streamice/streamice_init_fixed.F |
529 |
STREAMICE_INIT_FIXED |
CALL WRITE_FLD_XY_RS ( 'maskCost', '', |
|
./pkg/streamice/streamice_init_varia.F |
595 |
STREAMICE_INIT_VARIA |
CALL WRITE_FLD_XY_RS ( "STREAMICE_hmask", "init", |
|
./model/src/ini_linear_phisurf.F |
230 |
INI_LINEAR_PHISURF |
CALL WRITE_FLD_XY_RS( 'phi0surf',' ',phi0surf,0,myThid) |
|
./model/src/ini_linear_phisurf.F |
233 |
INI_LINEAR_PHISURF |
CALL WRITE_FLD_XY_RS( 'topo_H',' ',topoHloc,0,myThid) |
|
./model/src/update_masks_etc.F |
269 |
UPDATE_MASKS_ETC |
CALL WRITE_FLD_XY_RS( 'Depth.',suff,tmpfld,optimcycle,myThid) |
|
./model/src/write_grid.F |
100 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'Depth',' ',tmpfld,-1,myThid) |
|
./model/src/write_grid.F |
102 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'rLowC', ' ', R_low, -1,myThid) |
|
./model/src/write_grid.F |
103 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'rLowW', ' ', rLowW, -1,myThid) |
|
./model/src/write_grid.F |
104 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'rLowS', ' ', rLowS, -1,myThid) |
|
./model/src/write_grid.F |
105 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'rSurfC',' ',Ro_surf,-1,myThid) |
|
./model/src/write_grid.F |
106 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'rSurfW',' ',rSurfW, -1,myThid) |
|
./model/src/write_grid.F |
107 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'rSurfS',' ',rSurfS, -1,myThid) |
|
./model/src/write_grid.F |
113 |
WRITE_GRID |
& CALL WRITE_FLD_XY_RS( 'topo_P',' ',Ro_surf,-1,myThid) |
|
./model/src/write_grid.F |
115 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'maskInC',' ', maskInC, -1, myThid ) |
|
./model/src/write_grid.F |
116 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'maskInW',' ', maskInW, -1, myThid ) |
|
./model/src/write_grid.F |
117 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'maskInS',' ', maskInS, -1, myThid ) |
|
./model/src/write_grid.F |
81 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'XC',' ',xC,-1,myThid) |
|
./model/src/write_grid.F |
82 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'YC',' ',yC,-1,myThid) |
|
./model/src/write_grid.F |
83 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'XG',' ',xG,-1,myThid) |
|
./model/src/write_grid.F |
84 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'YG',' ',yG,-1,myThid) |
|
./model/src/write_grid.F |
85 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'RAC',' ',rA,-1,myThid) |
|
./model/src/write_grid.F |
86 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'RAW',' ',rAw,-1,myThid) |
|
./model/src/write_grid.F |
87 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'RAS',' ',rAs,-1,myThid) |
|
./model/src/write_grid.F |
88 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'RAZ',' ',rAz,-1,myThid) |
|
./model/src/write_grid.F |
89 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'DXG',' ',dxG,-1,myThid) |
|
./model/src/write_grid.F |
90 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'DYG',' ',dyG,-1,myThid) |
|
./model/src/write_grid.F |
91 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'DXC',' ',dxC,-1,myThid) |
|
./model/src/write_grid.F |
92 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'DYC',' ',dyC,-1,myThid) |
|
./model/src/write_grid.F |
94 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'AngleCS',' ',angleCosC,-1,myThid) |
|
./model/src/write_grid.F |
95 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'AngleSN',' ',angleSinC,-1,myThid) |
|
./model/src/write_grid.F |
96 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'U2zonDir',' ',u2zonDir,-1,myThid) |
|
./model/src/write_grid.F |
97 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'V2zonDir',' ',v2zonDir,-1,myThid) |
|
./pkg/aim_v23/aim_fields_load.F |
188 |
AIM_FIELDS_LOAD |
CALL WRITE_FLD_XY_RS( 'aim_Tsurf',' ', aim_sst0, 0, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
187 |
ADDUMMY_IN_STEPPING |
CALL WRITE_FLD_XY_RS('ADJtaux.',suff, adFu, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
188 |
ADDUMMY_IN_STEPPING |
CALL WRITE_FLD_XY_RS('ADJtauy.',suff, adFv, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
189 |
ADDUMMY_IN_STEPPING |
CALL WRITE_FLD_XY_RS('ADJqnet.',suff, adQnet,myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
190 |
ADDUMMY_IN_STEPPING |
CALL WRITE_FLD_XY_RS('ADJempr.',suff,adEmPmR,myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
192 |
ADDUMMY_IN_STEPPING |
CALL WRITE_FLD_XY_RS('ADJqsw.', suff, adQsw,myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
221 |
ADDUMMY_IN_STEPPING |
CALL WRITE_FLD_XY_RS( 'ADJsst.',suff, adSST, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
224 |
ADDUMMY_IN_STEPPING |
CALL WRITE_FLD_XY_RS( 'ADJsss.',suff, adSSS, myIter, myThid ) |