191 |
CALL MNC_CW_ADD_VATTR_TEXT('KPPdiffKzT', |
CALL MNC_CW_ADD_VATTR_TEXT('KPPdiffKzT', |
192 |
& 'coordinates','XC YC RC iter', myThid) |
& 'coordinates','XC YC RC iter', myThid) |
193 |
|
|
194 |
CALL MNC_CW_ADD_VNAME('KPPghat', 'Cen_xy_Hn__C__t', |
CALL MNC_CW_ADD_VNAME('KPPGHAT', 'Cen_xy_Hn__C__t', |
195 |
& 4,5, myThid) |
& 4,5, myThid) |
196 |
CALL MNC_CW_ADD_VATTR_TEXT('KPPghat','units','s/m^2', |
CALL MNC_CW_ADD_VATTR_TEXT('KPPGHAT','units','s/m^2', |
197 |
& myThid) |
& myThid) |
198 |
CALL MNC_CW_ADD_VATTR_TEXT('KPPghat','long_name', |
CALL MNC_CW_ADD_VATTR_TEXT('KPPGHAT','long_name', |
199 |
& 'KPP_nonlocal_transport_coefficient', myThid) |
& 'KPP_nonlocal_transport_coefficient', myThid) |
200 |
CALL MNC_CW_ADD_VATTR_TEXT('KPPghat', |
CALL MNC_CW_ADD_VATTR_TEXT('KPPGHAT', |
201 |
& 'coordinates','XC YC RC iter', myThid) |
& 'coordinates','XC YC RC iter', myThid) |
202 |
|
|
203 |
CALL MNC_CW_ADD_VNAME('KPPhbl', 'Cen_xy_Hn__-__t', |
CALL MNC_CW_ADD_VNAME('KPPHBL', 'Cen_xy_Hn__-__t', |
204 |
& 3,4, myThid) |
& 3,4, myThid) |
205 |
CALL MNC_CW_ADD_VATTR_TEXT('KPPhbl','units','m', |
CALL MNC_CW_ADD_VATTR_TEXT('KPPHBL','units','m', |
206 |
& myThid) |
& myThid) |
207 |
CALL MNC_CW_ADD_VATTR_TEXT('KPPhbl','long_name', |
CALL MNC_CW_ADD_VATTR_TEXT('KPPHBL','long_name', |
208 |
& 'KPP_mixing_layer_depth', myThid) |
& 'KPP_boundary_layer_depth', myThid) |
209 |
CALL MNC_CW_ADD_VATTR_TEXT('KPPhbl', |
CALL MNC_CW_ADD_VATTR_TEXT('KPPHBL', |
210 |
& 'coordinates','XC YC iter', myThid) |
& 'coordinates','XC YC iter', myThid) |
211 |
|
|
212 |
CALL MNC_CW_ADD_VNAME('KPPfrac', 'Cen_xy_Hn__-__t', |
CALL MNC_CW_ADD_VNAME('KPPMLD', 'Cen_xy_Hn__-__t', |
213 |
& 3,4, myThid) |
& 3,4, myThid) |
214 |
CALL MNC_CW_ADD_VATTR_TEXT('KPPfrac','units','dimless', |
CALL MNC_CW_ADD_VATTR_TEXT('KPPMLD','units','m', |
215 |
& myThid) |
& myThid) |
216 |
CALL MNC_CW_ADD_VATTR_TEXT('KPPfrac','long_name', |
CALL MNC_CW_ADD_VATTR_TEXT('KPPMLD','long_name', |
217 |
|
& 'KPP_mixed_layer_depth', myThid) |
218 |
|
CALL MNC_CW_ADD_VATTR_TEXT('KPPMLD', |
219 |
|
& 'coordinates','XC YC iter', myThid) |
220 |
|
|
221 |
|
CALL MNC_CW_ADD_VNAME('KPPFRAC', 'Cen_xy_Hn__-__t', |
222 |
|
& 3,4, myThid) |
223 |
|
CALL MNC_CW_ADD_VATTR_TEXT('KPPFRAC','units','dimless', |
224 |
|
& myThid) |
225 |
|
CALL MNC_CW_ADD_VATTR_TEXT('KPPFRAC','long_name', |
226 |
& 'KPP_short-wave_fraction_penetrating_mixing_layer', |
& 'KPP_short-wave_fraction_penetrating_mixing_layer', |
227 |
& myThid) |
& myThid) |
228 |
CALL MNC_CW_ADD_VATTR_TEXT('KPPfrac', |
CALL MNC_CW_ADD_VATTR_TEXT('KPPFRAC', |
229 |
& 'coordinates','XC YC iter', myThid) |
& 'coordinates','XC YC iter', myThid) |
230 |
ENDIF |
ENDIF |
231 |
#endif /* ALLOW_MNC */ |
#endif /* ALLOW_MNC */ |