165 |
CALL MNC_CW_RL_W('D','state',0,0,'model_time',myTime,myThid) |
CALL MNC_CW_RL_W('D','state',0,0,'model_time',myTime,myThid) |
166 |
CALL MNC_CW_RL_W('D','state',0,0,'U', uVel, myThid) |
CALL MNC_CW_RL_W('D','state',0,0,'U', uVel, myThid) |
167 |
CALL MNC_CW_RL_W('D','state',0,0,'V', vVel, myThid) |
CALL MNC_CW_RL_W('D','state',0,0,'V', vVel, myThid) |
168 |
CALL MNC_CW_RL_W('D','state',0,0,'T', theta, myThid) |
CALL MNC_CW_RL_W('D','state',0,0,'Temp', theta, myThid) |
169 |
CALL MNC_CW_RL_W('D','state',0,0,'S', salt, myThid) |
CALL MNC_CW_RL_W('D','state',0,0,'S', salt, myThid) |
170 |
CALL MNC_CW_RL_W('D','state',0,0,'Eta', etaN, myThid) |
CALL MNC_CW_RL_W('D','state',0,0,'Eta', etaN, myThid) |
171 |
CALL MNC_CW_RL_W('D','state',0,0,'W', wVel, myThid) |
CALL MNC_CW_RL_W('D','state',0,0,'W', wVel, myThid) |