| 175 |
\begin{verbatim} |
\begin{verbatim} |
| 176 |
C Write dynvars using the MNC package |
C Write dynvars using the MNC package |
| 177 |
CALL MNC_CW_SET_UDIM('state', -1, myThid) |
CALL MNC_CW_SET_UDIM('state', -1, myThid) |
| 178 |
CALL MNC_CW_RL_W('I','state',0,0,'iter', myIter, myThid) |
CALL MNC_CW_I_W('I','state',0,0,'iter', myIter, myThid) |
| 179 |
CALL MNC_CW_SET_UDIM('state', 0, myThid) |
CALL MNC_CW_SET_UDIM('state', 0, myThid) |
| 180 |
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) |
| 181 |
CALL MNC_CW_RL_W('D','state',0,0,'U', uVel, myThid) |
CALL MNC_CW_RL_W('D','state',0,0,'U', uVel, myThid) |