| File |
Line number |
Procedure |
Code |
|
./model/src/ini_curvilinear_grid.F |
110 |
INI_CURVILINEAR_GRID |
mncFn(i:i) = ' ' |
|
./model/src/ini_curvilinear_grid.F |
112 |
INI_CURVILINEAR_GRID |
write(mncFn,'(a)') 'mitgrid' |
|
./model/src/ini_curvilinear_grid.F |
119 |
INI_CURVILINEAR_GRID |
CALL MNC_FILE_CLOSE_ALL_MATCHING(mncFn, myThid) |
|
./model/src/ini_curvilinear_grid.F |
120 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_SET_UDIM(mncFn, 1, myThid) |
|
./model/src/ini_curvilinear_grid.F |
121 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('R',mncFn,0,0,'XC', XC, myThid) |
|
./model/src/ini_curvilinear_grid.F |
122 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('R',mncFn,0,0,'XG', XG, myThid) |
|
./model/src/ini_curvilinear_grid.F |
123 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('R',mncFn,0,0,'YC', YC, myThid) |
|
./model/src/ini_curvilinear_grid.F |
124 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('R',mncFn,0,0,'YG', YG, myThid) |
|
./model/src/ini_curvilinear_grid.F |
125 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('R',mncFn,0,0,'dxC',DXC, myThid) |
|
./model/src/ini_curvilinear_grid.F |
126 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('R',mncFn,0,0,'dyC',DYC, myThid) |
|
./model/src/ini_curvilinear_grid.F |
127 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('R',mncFn,0,0,'dxF',DXF, myThid) |
|
./model/src/ini_curvilinear_grid.F |
128 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('R',mncFn,0,0,'dyF',DYF, myThid) |
|
./model/src/ini_curvilinear_grid.F |
129 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('R',mncFn,0,0,'dxG',DXG, myThid) |
|
./model/src/ini_curvilinear_grid.F |
130 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('R',mncFn,0,0,'dyG',DYG, myThid) |
|
./model/src/ini_curvilinear_grid.F |
131 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('R',mncFn,0,0,'dxV',DXV, myThid) |
|
./model/src/ini_curvilinear_grid.F |
132 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('R',mncFn,0,0,'dyU',DYU, myThid) |
|
./model/src/ini_curvilinear_grid.F |
133 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('R',mncFn,0,0,'rA', RA, myThid) |
|
./model/src/ini_curvilinear_grid.F |
134 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('R',mncFn,0,0,'rAz',RAZ, myThid) |
|
./model/src/ini_curvilinear_grid.F |
135 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('R',mncFn,0,0,'rAw',RAW, myThid) |
|
./model/src/ini_curvilinear_grid.F |
136 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('R',mncFn,0,0,'rAs',RAS, myThid) |
|
./model/src/ini_curvilinear_grid.F |
55 |
INI_CURVILINEAR_GRID |
CHARACTER*(80) mncFn |