96 |
C Write the GRID.h variables to a file |
C Write the GRID.h variables to a file |
97 |
CALL MNC_CW_SET_UDIM(bfname, 0, myThid) |
CALL MNC_CW_SET_UDIM(bfname, 0, myThid) |
98 |
CALL MNC_CW_SET_CITER(bfname, 2, -1, -1, -1, myThid) |
CALL MNC_CW_SET_CITER(bfname, 2, -1, -1, -1, myThid) |
99 |
|
CALL MNC_CW_SET_UDIM(bfname, 1, myThid) |
100 |
CALL MNC_CW_RL_W('D',bfname,0,0,'RC',rC,myThid) |
CALL MNC_CW_RL_W('D',bfname,0,0,'RC',rC,myThid) |
101 |
CALL MNC_CW_RL_W('D',bfname,0,0,'RF',rF,myThid) |
CALL MNC_CW_RL_W('D',bfname,0,0,'RF',rF,myThid) |
102 |
CALL MNC_CW_RL_W('D',bfname,0,0,'RU',rF(2),myThid) |
CALL MNC_CW_RL_W('D',bfname,0,0,'RU',rF(2),myThid) |