107 |
CALL MNC_CW_ADD_VNAME('rAz', 'Cor_xy_Hn__-__-', 3,4, myThid) |
CALL MNC_CW_ADD_VNAME('rAz', 'Cor_xy_Hn__-__-', 3,4, myThid) |
108 |
CALL MNC_CW_ADD_VNAME('fCori', 'Cen_xy_Hn__-__-', 3,4,myThid) |
CALL MNC_CW_ADD_VNAME('fCori', 'Cen_xy_Hn__-__-', 3,4,myThid) |
109 |
CALL MNC_CW_ADD_VNAME('fCoriG','Cor_xy_Hn__-__-', 3,4,myThid) |
CALL MNC_CW_ADD_VNAME('fCoriG','Cor_xy_Hn__-__-', 3,4,myThid) |
110 |
CALL MNC_CW_ADD_VNAME('R_low','Cen_xy_Hn__-__-', 3,4, myThid) |
CALL MNC_CW_ADD_VNAME('R_low', 'Cen_xy_Hn__-__-', 3,4,myThid) |
111 |
CALL MNC_CW_ADD_VNAME('Ro_surf','Cen_xy_Hn__-__-',3,4,myThid) |
CALL MNC_CW_ADD_VNAME('Ro_surf','Cen_xy_Hn__-__-',3,4,myThid) |
112 |
CALL MNC_CW_ADD_VNAME('Depth', 'Cen_xy_Hn__-__-', 3,4,myThid) |
CALL MNC_CW_ADD_VNAME('Depth', 'Cen_xy_Hn__-__-', 3,4,myThid) |
113 |
CALL MNC_CW_ADD_VNAME('HFacC', 'Cen_xy_Hn__C__-', 4,5,myThid) |
CALL MNC_CW_ADD_VNAME('HFacC', 'Cen_xy_Hn__C__-', 4,5,myThid) |
165 |
CALL MNC_CW_SET_UDIM(bfname, 0, myThid) |
CALL MNC_CW_SET_UDIM(bfname, 0, myThid) |
166 |
CALL MNC_CW_RL_W('D',bfname,0,0,'RC',rC,myThid) |
CALL MNC_CW_RL_W('D',bfname,0,0,'RC',rC,myThid) |
167 |
CALL MNC_CW_RL_W('D',bfname,0,0,'RF',rF,myThid) |
CALL MNC_CW_RL_W('D',bfname,0,0,'RF',rF,myThid) |
168 |
|
CALL MNC_CW_RL_W('D',bfname,0,0,'RU',rF(2),myThid) |
169 |
|
CALL MNC_CW_RL_W('D',bfname,0,0,'RL',rF,myThid) |
170 |
CALL MNC_CW_RL_W('D',bfname,0,0,'drC',drC,myThid) |
CALL MNC_CW_RL_W('D',bfname,0,0,'drC',drC,myThid) |
171 |
CALL MNC_CW_RL_W('D',bfname,0,0,'drF',drF,myThid) |
CALL MNC_CW_RL_W('D',bfname,0,0,'drF',drF,myThid) |
172 |
c CALL MNC_CW_RL_W('D',bfname,0,0,'saFac',saFac,myThid) |
c CALL MNC_CW_RL_W('D',bfname,0,0,'saFac',saFac,myThid) |