153 |
CALL MNC_CW_ADD_VATTR_TEXT('S',1, |
CALL MNC_CW_ADD_VATTR_TEXT('S',1, |
154 |
& 'coordinates','XC YC RC iter', myThid) |
& 'coordinates','XC YC RC iter', myThid) |
155 |
|
|
156 |
CALL MNC_CW_ADD_VNAME('Unm1', 'U_xy_Hn__C__t', 4,5, myThid) |
CALL MNC_CW_ADD_VNAME('gUnm1', 'U_xy_Hn__C__t', 4,5, myThid) |
157 |
CALL MNC_CW_ADD_VNAME('Vnm1', 'V_xy_Hn__C__t', 4,5, myThid) |
CALL MNC_CW_ADD_VNAME('gVnm1', 'V_xy_Hn__C__t', 4,5, myThid) |
158 |
CALL MNC_CW_ADD_VNAME('Tnm1', 'Cen_xy_Hn__C__t', 4,5, myThid) |
CALL MNC_CW_ADD_VNAME('gTnm1', 'Cen_xy_Hn__C__t', 4,5, myThid) |
159 |
CALL MNC_CW_ADD_VNAME('Snm1', 'Cen_xy_Hn__C__t', 4,5, myThid) |
CALL MNC_CW_ADD_VNAME('gSnm1', 'Cen_xy_Hn__C__t', 4,5, myThid) |
160 |
|
|
161 |
CALL MNC_CW_ADD_VNAME('Eta', 'Cen_xy_Hn__-__t', 3,4, myThid) |
CALL MNC_CW_ADD_VNAME('Eta', 'Cen_xy_Hn__-__t', 3,4, myThid) |
162 |
CALL MNC_CW_ADD_VATTR_TEXT('Eta',1,'long_name', |
CALL MNC_CW_ADD_VATTR_TEXT('Eta',1,'long_name', |
165 |
CALL MNC_CW_ADD_VATTR_TEXT('Eta',1, |
CALL MNC_CW_ADD_VATTR_TEXT('Eta',1, |
166 |
& 'coordinates','XC YC RC iter', myThid) |
& 'coordinates','XC YC RC iter', myThid) |
167 |
|
|
168 |
CALL MNC_CW_ADD_VNAME('EtaNH', 'Cen_xy_Hn__-__t', 3,4, myThid) |
CALL MNC_CW_ADD_VNAME('EtaH', 'Cen_xy_Hn__-__t', 3,4, myThid) |
169 |
CALL MNC_CW_ADD_VATTR_TEXT('EtaNH',1,'long_name', |
CALL MNC_CW_ADD_VATTR_TEXT('EtaH',1,'long_name', |
170 |
& 'NLFS_r-anomaly', myThid) |
& 'column-thickness_r-anomaly', myThid) |
171 |
CALL MNC_CW_ADD_VATTR_TEXT('EtaNH',1,'units','m', myThid) |
CALL MNC_CW_ADD_VATTR_TEXT('EtaH',1,'units','m', myThid) |
172 |
CALL MNC_CW_ADD_VATTR_TEXT('EtaNH',1, |
CALL MNC_CW_ADD_VATTR_TEXT('EtaH',1, |
173 |
& 'coordinates','XC YC RC iter', myThid) |
& 'coordinates','XC YC RC iter', myThid) |
174 |
|
|
175 |
CALL MNC_CW_ADD_VNAME('W', 'Cen_xy_Hn__C__t', 4,5, myThid) |
CALL MNC_CW_ADD_VNAME('W', 'Cen_xy_Hn__C__t', 4,5, myThid) |
177 |
CALL MNC_CW_ADD_VATTR_TEXT('W',1, |
CALL MNC_CW_ADD_VATTR_TEXT('W',1, |
178 |
& 'coordinates','XC YC RC iter', myThid) |
& 'coordinates','XC YC RC iter', myThid) |
179 |
|
|
180 |
CALL MNC_CW_ADD_VNAME('totPhiHyd', 'Cen_xy_Hn__C__t', 4,5, myThid) |
CALL MNC_CW_ADD_VNAME('phiHyd', 'Cen_xy_Hn__C__t', 4,5, myThid) |
181 |
CALL MNC_CW_ADD_VNAME('phiHydLow', 'Cen_xy_Hn__-__t', 3,4, myThid) |
CALL MNC_CW_ADD_VNAME('phiHydLow', 'Cen_xy_Hn__-__t', 3,4, myThid) |
182 |
CALL MNC_CW_ADD_VNAME('phi_nh', 'Cen_xy_Hn__C__t', 4,5, myThid) |
CALL MNC_CW_ADD_VNAME('phi_nh', 'Cen_xy_Hn__C__t', 4,5, myThid) |
183 |
CALL MNC_CW_ADD_VNAME('gW', 'Cen_xy_Hn__C__t', 4,5, myThid) |
CALL MNC_CW_ADD_VNAME('gW', 'Cen_xy_Hn__C__t', 4,5, myThid) |