| File |
Line number |
Procedure |
Code |
|
./verification/solid-body.cs-32x32x1/code/ini_curvilinear_grid.F |
212 |
READSYMTILE_RS |
SUBROUTINE READSYMTILE_RS(fileName,array,Xol,Yol,bi,bj,myThid) |
|
./verification/solid-body.cs-32x32x1/code/ini_curvilinear_grid.F |
226 |
READSYMTILE_RS |
INTEGER Xol,Yol,bi,bj,myThid |
|
./verification/solid-body.cs-32x32x1/code/ini_curvilinear_grid.F |
234 |
READSYMTILE_RS |
& RECL=((sNx+Xol)*(sNy+Yol))*WORDLENGTH*2 ) |
|
./verification/solid-body.cs-32x32x1/code/ini_curvilinear_grid.F |
236 |
READSYMTILE_RS |
& RECL=((sNx+Xol)*(sNy+Yol))*WORDLENGTH ) |
|
./verification/solid-body.cs-32x32x1/code/ini_curvilinear_grid.F |
238 |
READSYMTILE_RS |
READ(36,REC=1) ((array(I,J,bi,bj),I=1,sNx+Xol),J=1,sNy+Yol) |
|
./verification/solid-body.cs-32x32x1/code/ini_curvilinear_grid.F |
253 |
READSYMTILE_RS |
array(I,1-J,bi,bj)=array(I,J+Yol,bi,bj) |
|
./verification/solid-body.cs-32x32x1/code/ini_curvilinear_grid.F |
256 |
READSYMTILE_RS |
DO J=1+Yol,Oly |
|
./verification/solid-body.cs-32x32x1/code/ini_curvilinear_grid.F |
258 |
READSYMTILE_RS |
array(I,sNy+J,bi,bj)=array(I,sNy+1-J+Yol,bi,bj) |
|
./verification/solid-body.cs-32x32x1/code/ini_curvilinear_grid.F |
261 |
READSYMTILE_RS |
DO J=1,sNy+Yol |
|
./verification/solid-body.cs-32x32x1/code/ini_curvilinear_grid.F |
267 |
READSYMTILE_RS |
DO J=1,sNy+Yol |
|
./verification/global_ocean.cubed32x32x30/code/ini_curvilinear_grid.F |
243 |
READSYMTILE_RS |
SUBROUTINE READSYMTILE_RS(fileName,array,Xol,Yol,bi,bj,myThid) |
|
./verification/global_ocean.cubed32x32x30/code/ini_curvilinear_grid.F |
257 |
READSYMTILE_RS |
INTEGER Xol,Yol,bi,bj,myThid |
|
./verification/global_ocean.cubed32x32x30/code/ini_curvilinear_grid.F |
265 |
READSYMTILE_RS |
& RECL=((sNx+Xol)*(sNy+Yol))*WORDLENGTH*2 ) |
|
./verification/global_ocean.cubed32x32x30/code/ini_curvilinear_grid.F |
267 |
READSYMTILE_RS |
& RECL=((sNx+Xol)*(sNy+Yol))*WORDLENGTH ) |
|
./verification/global_ocean.cubed32x32x30/code/ini_curvilinear_grid.F |
269 |
READSYMTILE_RS |
READ(36,REC=1) ((array(I,J,bi,bj),I=1,sNx+Xol),J=1,sNy+Yol) |
|
./verification/global_ocean.cubed32x32x30/code/ini_curvilinear_grid.F |
284 |
READSYMTILE_RS |
array(I,1-J,bi,bj)=array(I,J+Yol,bi,bj) |
|
./verification/global_ocean.cubed32x32x30/code/ini_curvilinear_grid.F |
287 |
READSYMTILE_RS |
DO J=1+Yol,Oly |
|
./verification/global_ocean.cubed32x32x30/code/ini_curvilinear_grid.F |
289 |
READSYMTILE_RS |
array(I,sNy+J,bi,bj)=array(I,sNy+1-J+Yol,bi,bj) |
|
./verification/global_ocean.cubed32x32x30/code/ini_curvilinear_grid.F |
292 |
READSYMTILE_RS |
DO J=1,sNy+Yol |
|
./verification/global_ocean.cubed32x32x30/code/ini_curvilinear_grid.F |
298 |
READSYMTILE_RS |
DO J=1,sNy+Yol |