| File |
Line number |
Procedure |
Code |
|
./pkg/flt/flt_mdsreadvector.F |
106 |
MDSREADVECTOR_FLT |
& fName(1:IL),'.',iG,'.',jG,'.data' |
|
./pkg/flt/flt_mdsreadvector.F |
123 |
MDSREADVECTOR_FLT |
dataFName = fName |
|
./pkg/flt/flt_mdsreadvector.F |
131 |
MDSREADVECTOR_FLT |
write(dataFname(1:80),'(2a)') fName(1:IL),'.data' |
|
./pkg/flt/flt_mdsreadvector.F |
159 |
MDSREADVECTOR_FLT |
& fName(1:IL),'.',iG,'.',jG,'.data' |
|
./pkg/flt/flt_mdsreadvector.F |
16 |
MDSREADVECTOR_FLT |
I fName, |
|
./pkg/flt/flt_mdsreadvector.F |
55 |
MDSREADVECTOR_FLT |
character*(*) fName |
|
./pkg/flt/flt_mdsreadvector.F |
96 |
MDSREADVECTOR_FLT |
IL=ILNBLNK( fName ) |
|
./verification/flt_example/extra/cvprofiles.F |
124 |
NO PROCEDURE |
IL=ILNBLNK( fName ) |
|
./verification/flt_example/extra/cvprofiles.F |
131 |
NO PROCEDURE |
& fName(1:IL),'.',iGmax,'.',1,'.data' |
|
./verification/flt_example/extra/cvprofiles.F |
139 |
NO PROCEDURE |
& fName(1:IL),'.',1,'.',jGmax,'.data' |
|
./verification/flt_example/extra/cvprofiles.F |
156 |
NO PROCEDURE |
& fName(1:IL),'.001.001.data' |
|
./verification/flt_example/extra/cvprofiles.F |
258 |
NO PROCEDURE |
& fName(1:IL),'.',iG,'.',jG,'.data' |
|
./verification/flt_example/extra/cvprofiles.F |
546 |
NO PROCEDURE |
& fName(1:IL),'.',iG,'.',jG,'.data' |
|
./verification/flt_example/extra/cvprofiles.F |
576 |
NO PROCEDURE |
& fName(1:IL),'.',iG,'.',jG,'.data' |
|
./verification/flt_example/extra/cvprofiles.F |
606 |
NO PROCEDURE |
& fName(1:IL),'.',iG,'.',jG,'.data' |
|
./verification/flt_example/extra/cvprofiles.F |
78 |
NO PROCEDURE |
character*50 fName, outname |
|
./verification/flt_example/extra/cvprofiles.F |
79 |
NO PROCEDURE |
data fName / 'float_profiles' / |
|
./verification/flt_example/extra/cvprofiles.F |
85 |
NO PROCEDURE |
namelist //floats fName |
|
./verification/flt_example/extra/cvfloat.F |
120 |
NO PROCEDURE |
IL=ILNBLNK( fName ) |
|
./verification/flt_example/extra/cvfloat.F |
127 |
NO PROCEDURE |
& fName(1:IL),'.',iGmax,'.',1,'.data' |
|
./verification/flt_example/extra/cvfloat.F |
135 |
NO PROCEDURE |
& fName(1:IL),'.',1,'.',jGmax,'.data' |
|
./verification/flt_example/extra/cvfloat.F |
150 |
NO PROCEDURE |
& fName(1:IL),'.001.001.data' |
|
./verification/flt_example/extra/cvfloat.F |
221 |
NO PROCEDURE |
& fName(1:IL),'.',iG,'.',jG,'.data' |
|
./verification/flt_example/extra/cvfloat.F |
71 |
NO PROCEDURE |
character*50 fName, outname |
|
./verification/flt_example/extra/cvfloat.F |
72 |
NO PROCEDURE |
data fName / 'float_trajectories' / |
|
./verification/flt_example/extra/cvfloat.F |
78 |
NO PROCEDURE |
namelist //floats fName |
|
./model/src/ini_curvilinear_grid.F |
359 |
INI_CURVILINEAR_GRID |
WRITE(fName,'("tile",I3.3,".mitgrid")') iG |
|
./model/src/ini_curvilinear_grid.F |
361 |
INI_CURVILINEAR_GRID |
WRITE(fName,'(2A,I3.3,A)') horizGridFile(1:iLen), |
|
./model/src/ini_curvilinear_grid.F |
364 |
INI_CURVILINEAR_GRID |
iLen = ILNBLNK(fName) |
|
./model/src/ini_curvilinear_grid.F |
367 |
INI_CURVILINEAR_GRID |
& ' ; Read from file ',fName(1:iLen) |
|
./model/src/ini_curvilinear_grid.F |
372 |
INI_CURVILINEAR_GRID |
CALL READSYMTILE_RS(fName,1,XC,bi,bj,buf,myThid) |
|
./model/src/ini_curvilinear_grid.F |
375 |
INI_CURVILINEAR_GRID |
CALL READSYMTILE_RS(fName,2,YC,bi,bj,buf,myThid) |
|
./model/src/ini_curvilinear_grid.F |
378 |
INI_CURVILINEAR_GRID |
CALL READSYMTILE_RS(fName,3,DXF,bi,bj,buf,myThid) |
|
./model/src/ini_curvilinear_grid.F |
381 |
INI_CURVILINEAR_GRID |
CALL READSYMTILE_RS(fName,4,DYF,bi,bj,buf,myThid) |
|
./model/src/ini_curvilinear_grid.F |
384 |
INI_CURVILINEAR_GRID |
CALL READSYMTILE_RS(fName,5,RA,bi,bj,buf,myThid) |
|
./model/src/ini_curvilinear_grid.F |
387 |
INI_CURVILINEAR_GRID |
CALL READSYMTILE_RS(fName,6,XG,bi,bj,buf,myThid) |
|
./model/src/ini_curvilinear_grid.F |
390 |
INI_CURVILINEAR_GRID |
CALL READSYMTILE_RS(fName,7,YG,bi,bj,buf,myThid) |
|
./model/src/ini_curvilinear_grid.F |
393 |
INI_CURVILINEAR_GRID |
CALL READSYMTILE_RS(fName,8,DXV,bi,bj,buf,myThid) |
|
./model/src/ini_curvilinear_grid.F |
396 |
INI_CURVILINEAR_GRID |
CALL READSYMTILE_RS(fName,9,DYU,bi,bj,buf,myThid) |
|
./model/src/ini_curvilinear_grid.F |
399 |
INI_CURVILINEAR_GRID |
CALL READSYMTILE_RS(fName,10,RAZ,bi,bj,buf,myThid) |
|
./model/src/ini_curvilinear_grid.F |
402 |
INI_CURVILINEAR_GRID |
CALL READSYMTILE_RS(fName,11,DXC,bi,bj,buf,myThid) |
|
./model/src/ini_curvilinear_grid.F |
405 |
INI_CURVILINEAR_GRID |
CALL READSYMTILE_RS(fName,12,DYC,bi,bj,buf,myThid) |
|
./model/src/ini_curvilinear_grid.F |
408 |
INI_CURVILINEAR_GRID |
CALL READSYMTILE_RS(fName,13,RAW,bi,bj,buf,myThid) |
|
./model/src/ini_curvilinear_grid.F |
411 |
INI_CURVILINEAR_GRID |
CALL READSYMTILE_RS(fName,14,RAS,bi,bj,buf,myThid) |
|
./model/src/ini_curvilinear_grid.F |
414 |
INI_CURVILINEAR_GRID |
CALL READSYMTILE_RS(fName,15,DXG,bi,bj,buf,myThid) |
|
./model/src/ini_curvilinear_grid.F |
417 |
INI_CURVILINEAR_GRID |
CALL READSYMTILE_RS(fName,16,DYG,bi,bj,buf,myThid) |
|
./model/src/ini_curvilinear_grid.F |
423 |
INI_CURVILINEAR_GRID |
CALL READSYMTILE_RS(fName,17,angleCosC,bi,bj,buf,myThid) |
|
./model/src/ini_curvilinear_grid.F |
426 |
INI_CURVILINEAR_GRID |
CALL READSYMTILE_RS(fName,18,angleSinC,bi,bj,buf,myThid) |
|
./model/src/ini_curvilinear_grid.F |
532 |
READSYMTILE_RS |
SUBROUTINE READSYMTILE_RS(fName,irec,array,bi,bj,buf,myThid) |
|
./model/src/ini_curvilinear_grid.F |
548 |
READSYMTILE_RS |
CHARACTER*(*) fName |
|
./model/src/ini_curvilinear_grid.F |
568 |
READSYMTILE_RS |
iLen = ILNBLNK(fName) |
|
./model/src/ini_curvilinear_grid.F |
581 |
READSYMTILE_RS |
OPEN( dUnit, file=fName(1:iLen), status='old', |
|
./model/src/ini_curvilinear_grid.F |
605 |
READSYMTILE_RS |
OPEN( dUnit, file=fName(1:iLen), status='old', |
|
./model/src/ini_curvilinear_grid.F |
68 |
INI_CURVILINEAR_GRID |
CHARACTER*(MAX_LEN_FNAM) fName |
|
./pkg/rw/read_write_rec.F |
115 |
READ_REC_XY_RL |
CHARACTER*(*) fName |
|
./pkg/rw/read_write_rec.F |
135 |
READ_REC_XY_RL |
fullName=fName |
|
./pkg/rw/read_write_rec.F |
150 |
READ_REC_XYZ_RS |
SUBROUTINE READ_REC_XYZ_RS( fName,field,iRec,myIter,myThid) |
|
./pkg/rw/read_write_rec.F |
166 |
READ_REC_XYZ_RS |
CHARACTER*(*) fName |
|
./pkg/rw/read_write_rec.F |
187 |
READ_REC_XYZ_RS |
fullName=fName |
|
./pkg/rw/read_write_rec.F |
202 |
READ_REC_XYZ_RL |
SUBROUTINE READ_REC_XYZ_RL( fName,field,iRec,myIter,myThid) |
|
./pkg/rw/read_write_rec.F |
218 |
READ_REC_XYZ_RL |
CHARACTER*(*) fName |
|
./pkg/rw/read_write_rec.F |
239 |
READ_REC_XYZ_RL |
fullName=fName |
|
./pkg/rw/read_write_rec.F |
254 |
READ_REC_XZ_RS |
SUBROUTINE READ_REC_XZ_RS( fName,field,iRec,myIter,myThid) |
|
./pkg/rw/read_write_rec.F |
269 |
READ_REC_XZ_RS |
CHARACTER*(*) fName |
|
./pkg/rw/read_write_rec.F |
289 |
READ_REC_XZ_RS |
fullName=fName |
|
./pkg/rw/read_write_rec.F |
304 |
READ_REC_XZ_RL |
SUBROUTINE READ_REC_XZ_RL( fName,field,iRec,myIter,myThid) |
|
./pkg/rw/read_write_rec.F |
320 |
READ_REC_XZ_RL |
CHARACTER*(*) fName |
|
./pkg/rw/read_write_rec.F |
340 |
READ_REC_XZ_RL |
fullName=fName |
|
./pkg/rw/read_write_rec.F |
355 |
READ_REC_YZ_RS |
SUBROUTINE READ_REC_YZ_RS( fName,field,iRec,myIter,myThid) |
|
./pkg/rw/read_write_rec.F |
371 |
READ_REC_YZ_RS |
CHARACTER*(*) fName |
|
./pkg/rw/read_write_rec.F |
392 |
READ_REC_YZ_RS |
fullName=fName |
|
./pkg/rw/read_write_rec.F |
407 |
READ_REC_YZ_RL |
SUBROUTINE READ_REC_YZ_RL( fName,field,iRec,myIter,myThid) |
|
./pkg/rw/read_write_rec.F |
423 |
READ_REC_YZ_RL |
CHARACTER*(*) fName |
|
./pkg/rw/read_write_rec.F |
444 |
READ_REC_YZ_RL |
fullName=fName |
|
./pkg/rw/read_write_rec.F |
459 |
WRITE_REC_XY_RS |
SUBROUTINE WRITE_REC_XY_RS( fName,field,iRec,myIter,myThid) |
|
./pkg/rw/read_write_rec.F |
475 |
WRITE_REC_XY_RS |
CHARACTER*(*) fName |
|
./pkg/rw/read_write_rec.F |
499 |
WRITE_REC_XY_RS |
fullName=fName |
|
./pkg/rw/read_write_rec.F |
515 |
WRITE_REC_XY_RL |
SUBROUTINE WRITE_REC_XY_RL( fName,field,iRec,myIter,myThid) |
|
./pkg/rw/read_write_rec.F |
52 |
READ_REC_XY_RS |
SUBROUTINE READ_REC_XY_RS( fName,field,iRec,myIter,myThid) |
|
./pkg/rw/read_write_rec.F |
531 |
WRITE_REC_XY_RL |
CHARACTER*(*) fName |
|
./pkg/rw/read_write_rec.F |
555 |
WRITE_REC_XY_RL |
fullName=fName |
|
./pkg/rw/read_write_rec.F |
571 |
WRITE_REC_XYZ_RS |
SUBROUTINE WRITE_REC_XYZ_RS( fName,field,iRec,myIter,myThid) |
|
./pkg/rw/read_write_rec.F |
587 |
WRITE_REC_XYZ_RS |
CHARACTER*(*) fName |
|
./pkg/rw/read_write_rec.F |
611 |
WRITE_REC_XYZ_RS |
fullName=fName |
|
./pkg/rw/read_write_rec.F |
627 |
WRITE_REC_XYZ_RL |
SUBROUTINE WRITE_REC_XYZ_RL( fName,field,iRec,myIter,myThid) |
|
./pkg/rw/read_write_rec.F |
643 |
WRITE_REC_XYZ_RL |
CHARACTER*(*) fName |
|
./pkg/rw/read_write_rec.F |
65 |
READ_REC_XY_RS |
CHARACTER*(*) fName |
|
./pkg/rw/read_write_rec.F |
667 |
WRITE_REC_XYZ_RL |
fullName=fName |
|
./pkg/rw/read_write_rec.F |
84 |
READ_REC_XY_RS |
fullName=fName |
|
./pkg/rw/read_write_rec.F |
99 |
READ_REC_XY_RL |
SUBROUTINE READ_REC_XY_RL( fName,field,iRec,myIter,myThid) |
|
./eesupp/src/nml_filter.F |
14 |
NML_FILTER |
I fName |
|
./eesupp/src/nml_filter.F |
45 |
NML_FILTER |
CHARACTER*(*) fName |
|
./pkg/sbo/sbo_writevector.F |
101 |
SBO_WRITEVECTOR |
write(dataFname(1:80),'(2a)') fName(1:IL),'.data' |
|
./pkg/sbo/sbo_writevector.F |
137 |
SBO_WRITEVECTOR |
write(metaFName(1:80),'(2a)') fName(1:IL),'.meta' |
|
./pkg/sbo/sbo_writevector.F |
21 |
SBO_WRITEVECTOR |
I fName, |
|
./pkg/sbo/sbo_writevector.F |
51 |
SBO_WRITEVECTOR |
character*(*) fName |
|
./pkg/sbo/sbo_writevector.F |
95 |
SBO_WRITEVECTOR |
IL=ILNBLNK( fName ) |
|
./pkg/sbo/sbo_diags.F |
40 |
SBO_DIAGS |
character*(8) fName |
|
./pkg/sbo/sbo_diags.F |
64 |
SBO_DIAGS |
fName = 'SBO_DIAG' |
|
./pkg/sbo/sbo_diags.F |
69 |
SBO_DIAGS |
I fName, |
|
./pkg/mdsio/mdsio_writevector.F |
110 |
MDSWRITEVECTOR |
IL = ILNBLNK( fName ) |
|
./pkg/mdsio/mdsio_writevector.F |
116 |
MDSWRITEVECTOR |
& mdsioLocalDir(1:pIL), fName(1:IL) |
|
./pkg/mdsio/mdsio_writevector.F |
118 |
MDSWRITEVECTOR |
pFname= fName |
|
./pkg/mdsio/mdsio_writevector.F |
134 |
MDSWRITEVECTOR |
write(dataFname,'(2a)') fName(1:IL),'.data' |
|
./pkg/mdsio/mdsio_writevector.F |
201 |
MDSWRITEVECTOR |
write(metaFName,'(2a)') fName(1:IL),'.meta' |
|
./pkg/mdsio/mdsio_writevector.F |
226 |
MDSWRITEVECTOR |
write(dataFname,'(2a)') fName(1:IL),'.data' |
|
./pkg/mdsio/mdsio_writevector.F |
324 |
MDSWRITEVECTOR |
write(metaFName,'(2a)') fName(1:IL),'.meta' |
|
./pkg/mdsio/mdsio_writevector.F |
48 |
MDSWRITEVECTOR |
character*(*) fName |
|
./pkg/mdsio/mdsio_writevector.F |
7 |
MDSWRITEVECTOR |
I fName, |
|
./pkg/mdsio/mdsio_slice.F |
101 |
MDSREADFIELDXZ |
dataFName = fName |
|
./pkg/mdsio/mdsio_slice.F |
115 |
MDSREADFIELDXZ |
write(dataFName,'(2a)') fName(1:IL),'.data' |
|
./pkg/mdsio/mdsio_slice.F |
162 |
MDSREADFIELDXZ |
& fName(1:IL),' , ', dataFName(1:pIL+13) |
|
./pkg/mdsio/mdsio_slice.F |
246 |
MDSREADFIELDYZ |
I fName, |
|
./pkg/mdsio/mdsio_slice.F |
285 |
MDSREADFIELDYZ |
character*(*) fName |
|
./pkg/mdsio/mdsio_slice.F |
324 |
MDSREADFIELDYZ |
IL = ILNBLNK( fName ) |
|
./pkg/mdsio/mdsio_slice.F |
329 |
MDSREADFIELDYZ |
pfName= fName |
|
./pkg/mdsio/mdsio_slice.F |
331 |
MDSREADFIELDYZ |
write(pfName,'(2a)') mdsioLocalDir(1:pIL), fName(1:IL) |
|
./pkg/mdsio/mdsio_slice.F |
339 |
MDSREADFIELDYZ |
dataFName = fName |
|
./pkg/mdsio/mdsio_slice.F |
353 |
MDSREADFIELDYZ |
write(dataFName,'(2a)') fName(1:IL),'.data' |
|
./pkg/mdsio/mdsio_slice.F |
400 |
MDSREADFIELDYZ |
& fName(1:IL),' , ', dataFName(1:pIL+13) |
|
./pkg/mdsio/mdsio_slice.F |
47 |
MDSREADFIELDXZ |
character*(*) fName |
|
./pkg/mdsio/mdsio_slice.F |
484 |
MDSWRITEFIELDXZ |
I fName, |
|
./pkg/mdsio/mdsio_slice.F |
527 |
MDSWRITEFIELDXZ |
character*(*) fName |
|
./pkg/mdsio/mdsio_slice.F |
566 |
MDSWRITEFIELDXZ |
IL = ILNBLNK( fName ) |
|
./pkg/mdsio/mdsio_slice.F |
571 |
MDSWRITEFIELDXZ |
pfName= fName |
|
./pkg/mdsio/mdsio_slice.F |
573 |
MDSWRITEFIELDXZ |
write(pfName,'(2a)') mdsioLocalDir(1:pIL), fName(1:IL) |
|
./pkg/mdsio/mdsio_slice.F |
582 |
MDSWRITEFIELDXZ |
write(dataFName,'(2a)') fName(1:IL),'.data' |
|
./pkg/mdsio/mdsio_slice.F |
701 |
MDSWRITEFIELDYZ |
I fName, |
|
./pkg/mdsio/mdsio_slice.F |
745 |
MDSWRITEFIELDYZ |
character*(*) fName |
|
./pkg/mdsio/mdsio_slice.F |
784 |
MDSWRITEFIELDYZ |
IL = ILNBLNK( fName ) |
|
./pkg/mdsio/mdsio_slice.F |
789 |
MDSWRITEFIELDYZ |
pfName= fName |
|
./pkg/mdsio/mdsio_slice.F |
791 |
MDSWRITEFIELDYZ |
write(pfName,'(2a)') mdsioLocalDir(1:pIL), fName(1:IL) |
|
./pkg/mdsio/mdsio_slice.F |
800 |
MDSWRITEFIELDYZ |
write(dataFName,'(2a)') fName(1:IL),'.data' |
|
./pkg/mdsio/mdsio_slice.F |
86 |
MDSREADFIELDXZ |
IL = ILNBLNK( fName ) |
|
./pkg/mdsio/mdsio_slice.F |
8 |
MDSREADFIELDXZ |
I fName, |
|
./pkg/mdsio/mdsio_slice.F |
91 |
MDSREADFIELDXZ |
pfName= fName |
|
./pkg/mdsio/mdsio_slice.F |
93 |
MDSREADFIELDXZ |
write(pfName,'(2a)') mdsioLocalDir(1:pIL), fName(1:IL) |
|
./pkg/mdsio/mdsio_readfield_loc.F |
108 |
MDSREADFIELD_LOC |
write(dataFName,'(2a)') fName(1:IL),'.data' |
|
./pkg/mdsio/mdsio_readfield_loc.F |
137 |
MDSREADFIELD_LOC |
& fName(1:IL),'.',iG,'.',jG,'.data' |
|
./pkg/mdsio/mdsio_readfield_loc.F |
49 |
MDSREADFIELD_LOC |
character*(*) fName |
|
./pkg/mdsio/mdsio_readfield_loc.F |
7 |
MDSREADFIELD_LOC |
I fName, |
|
./pkg/mdsio/mdsio_readfield_loc.F |
88 |
MDSREADFIELD_LOC |
IL=ILNBLNK( fName ) |
|
./pkg/mdsio/mdsio_readfield_loc.F |
94 |
MDSREADFIELD_LOC |
dataFName = fName |
|
./pkg/mdsio/mdsio_writetile.F |
103 |
MDS_WRITETILE |
IL=ILNBLNK( fName ) |
|
./pkg/mdsio/mdsio_writetile.F |
110 |
MDS_WRITETILE |
write(dataFname,'(2a)') fName(1:IL),'.data' |
|
./pkg/mdsio/mdsio_writetile.F |
132 |
MDS_WRITETILE |
& fName(1:IL),'.',iG,'.',jG,'.data' |
|
./pkg/mdsio/mdsio_writetile.F |
214 |
MDS_WRITETILE |
& fName(1:IL),'.',iG,'.',jG,'.meta' |
|
./pkg/mdsio/mdsio_writetile.F |
266 |
MDS_WRITETILE |
write(metaFName,'(2a)') fName(1:IL),'.meta' |
|
./pkg/mdsio/mdsio_writetile.F |
62 |
MDS_WRITETILE |
character*(*) fName |
|
./pkg/mdsio/mdsio_writetile.F |
7 |
MDS_WRITETILE |
I fName, |
|
./pkg/mdsio/mdsio_readtile.F |
108 |
MDS_READTILE |
write(dataFname,'(2a)') fName(1:IL),'.data' |
|
./pkg/mdsio/mdsio_readtile.F |
136 |
MDS_READTILE |
& fName(1:IL),'.',iG,'.',jG,'.data' |
|
./pkg/mdsio/mdsio_readtile.F |
50 |
MDS_READTILE |
character*(*) fName |
|
./pkg/mdsio/mdsio_readtile.F |
7 |
MDS_READTILE |
I fName, |
|
./pkg/mdsio/mdsio_readtile.F |
90 |
MDS_READTILE |
IL=ILNBLNK( fName ) |
|
./pkg/mdsio/mdsio_readtile.F |
96 |
MDS_READTILE |
dataFName = fName |
|
./pkg/mdsio/mdsio_slice_loc.F |
105 |
MDSREADFIELDXZ_LOC |
write(dataFName,'(2a)') fName(1:IL),'.data' |
|
./pkg/mdsio/mdsio_slice_loc.F |
134 |
MDSREADFIELDXZ_LOC |
& fName(1:IL),'.',iG,'.',jG,'.data' |
|
./pkg/mdsio/mdsio_slice_loc.F |
236 |
MDSREADFIELDYZ_LOC |
I fName, |
|
./pkg/mdsio/mdsio_slice_loc.F |
275 |
MDSREADFIELDYZ_LOC |
character*(*) fName |
|
./pkg/mdsio/mdsio_slice_loc.F |
314 |
MDSREADFIELDYZ_LOC |
IL=ILNBLNK( fName ) |
|
./pkg/mdsio/mdsio_slice_loc.F |
320 |
MDSREADFIELDYZ_LOC |
dataFName = fName |
|
./pkg/mdsio/mdsio_slice_loc.F |
334 |
MDSREADFIELDYZ_LOC |
write(dataFName,'(2a)') fName(1:IL),'.data' |
|
./pkg/mdsio/mdsio_slice_loc.F |
363 |
MDSREADFIELDYZ_LOC |
& fName(1:IL),'.',iG,'.',jG,'.data' |
|
./pkg/mdsio/mdsio_slice_loc.F |
465 |
MDSWRITEFIELDXZ_LOC |
I fName, |
|
./pkg/mdsio/mdsio_slice_loc.F |
46 |
MDSREADFIELDXZ_LOC |
character*(*) fName |
|
./pkg/mdsio/mdsio_slice_loc.F |
508 |
MDSWRITEFIELDXZ_LOC |
character*(*) fName |
|
./pkg/mdsio/mdsio_slice_loc.F |
547 |
MDSWRITEFIELDXZ_LOC |
IL=ILNBLNK( fName ) |
|
./pkg/mdsio/mdsio_slice_loc.F |
554 |
MDSWRITEFIELDXZ_LOC |
write(dataFName,'(2a)') fName(1:IL),'.data' |
|
./pkg/mdsio/mdsio_slice_loc.F |
576 |
MDSWRITEFIELDXZ_LOC |
& fName(1:IL),'.',iG,'.',jG,'.data' |
|
./pkg/mdsio/mdsio_slice_loc.F |
673 |
MDSWRITEFIELDYZ_LOC |
I fName, |
|
./pkg/mdsio/mdsio_slice_loc.F |
717 |
MDSWRITEFIELDYZ_LOC |
character*(*) fName |
|
./pkg/mdsio/mdsio_slice_loc.F |
756 |
MDSWRITEFIELDYZ_LOC |
IL=ILNBLNK( fName ) |
|
./pkg/mdsio/mdsio_slice_loc.F |
763 |
MDSWRITEFIELDYZ_LOC |
write(dataFName,'(2a)') fName(1:IL),'.data' |
|
./pkg/mdsio/mdsio_slice_loc.F |
785 |
MDSWRITEFIELDYZ_LOC |
& fName(1:IL),'.',iG,'.',jG,'.data' |
|
./pkg/mdsio/mdsio_slice_loc.F |
7 |
MDSREADFIELDXZ_LOC |
I fName, |
|
./pkg/mdsio/mdsio_slice_loc.F |
85 |
MDSREADFIELDXZ_LOC |
IL=ILNBLNK( fName ) |
|
./pkg/mdsio/mdsio_slice_loc.F |
91 |
MDSREADFIELDXZ_LOC |
dataFName = fName |
|
./pkg/mdsio/mdsio_readfield.F |
115 |
MDSREADFIELD |
pfName= fName |
|
./pkg/mdsio/mdsio_readfield.F |
117 |
MDSREADFIELD |
write(pfName,'(2a)') mdsioLocalDir(1:pIL), fName(1:IL) |
|
./pkg/mdsio/mdsio_readfield.F |
127 |
MDSREADFIELD |
dataFName = fName |
|
./pkg/mdsio/mdsio_readfield.F |
141 |
MDSREADFIELD |
write(dataFName,'(2a)') fName(1:IL),'.data' |
|
./pkg/mdsio/mdsio_readfield.F |
280 |
MDSREADFIELD |
& fName(1:IL),' , ', dataFName(1:pIL+13) |
|
./pkg/mdsio/mdsio_readfield.F |
382 |
MDSREADFIELD |
dataFName = fName |
|
./pkg/mdsio/mdsio_readfield.F |
398 |
MDSREADFIELD |
write(dataFName,'(2a)') fName(1:IL),'.data' |
|
./pkg/mdsio/mdsio_readfield.F |
55 |
MDSREADFIELD |
character*(*) fName |
|
./pkg/mdsio/mdsio_readfield.F |
7 |
MDSREADFIELD |
I fName, |
|
./pkg/mdsio/mdsio_readfield.F |
95 |
MDSREADFIELD |
IL = ILNBLNK( fName ) |
|
./pkg/mdsio/mdsio_readvector.F |
105 |
MDSREADVECTOR |
& mdsioLocalDir(1:pIL), fName(1:IL) |
|
./pkg/mdsio/mdsio_readvector.F |
107 |
MDSREADVECTOR |
pFname= fName |
|
./pkg/mdsio/mdsio_readvector.F |
117 |
MDSREADVECTOR |
dataFName = fName |
|
./pkg/mdsio/mdsio_readvector.F |
131 |
MDSREADVECTOR |
write(dataFname,'(2a)') fName(1:IL),'.data' |
|
./pkg/mdsio/mdsio_readvector.F |
178 |
MDSREADVECTOR |
& ' MDSREADVECTOR: opening file: ',fName(1:IL), |
|
./pkg/mdsio/mdsio_readvector.F |
244 |
MDSREADVECTOR |
dataFName = fName |
|
./pkg/mdsio/mdsio_readvector.F |
250 |
MDSREADVECTOR |
write(dataFname,'(2a)') fName(1:IL),'.data' |
|
./pkg/mdsio/mdsio_readvector.F |
43 |
MDSREADVECTOR |
character*(*) fName |
|
./pkg/mdsio/mdsio_readvector.F |
7 |
MDSREADVECTOR |
I fName, |
|
./pkg/mdsio/mdsio_readvector.F |
99 |
MDSREADVECTOR |
IL = ILNBLNK( fName ) |
|
./pkg/mdsio/mdsio_gl.F |
1121 |
MDSWRITEFIELD_2D_GL |
I fName, |
|
./pkg/mdsio/mdsio_gl.F |
1174 |
MDSWRITEFIELD_2D_GL |
character*(*) fName |
|
./pkg/mdsio/mdsio_gl.F |
1231 |
MDSWRITEFIELD_2D_GL |
IL=ILNBLNK( fName ) |
|
./pkg/mdsio/mdsio_gl.F |
1247 |
MDSWRITEFIELD_2D_GL |
write(dataFname,'(2a)') fName(1:IL),'.data' |
|
./pkg/mdsio/mdsio_gl.F |
127 |
MDSREADFIELD_3D_GL |
IL=ILNBLNK( fName ) |
|
./pkg/mdsio/mdsio_gl.F |
1314 |
MDSWRITEFIELD_2D_GL |
write(metaFName,'(2a)') fName(1:IL),'.meta' |
|
./pkg/mdsio/mdsio_gl.F |
1348 |
MDSWRITEFIELD_2D_GL |
& fName(1:IL),'.',iG,'.',jG,'.data' |
|
./pkg/mdsio/mdsio_gl.F |
141 |
MDSREADFIELD_3D_GL |
dataFName = fName |
|
./pkg/mdsio/mdsio_gl.F |
1424 |
MDSWRITEFIELD_2D_GL |
& fName(1:IL),'.',iG,'.',jG,'.meta' |
|
./pkg/mdsio/mdsio_gl.F |
147 |
MDSREADFIELD_3D_GL |
write(dataFname,'(2a)') fName(1:IL),'.data' |
|
./pkg/mdsio/mdsio_gl.F |
179 |
MDSREADFIELD_3D_GL |
dataFName = fName |
|
./pkg/mdsio/mdsio_gl.F |
190 |
MDSREADFIELD_3D_GL |
write(dataFname,'(2a)') fName(1:IL),'.data' |
|
./pkg/mdsio/mdsio_gl.F |
227 |
MDSREADFIELD_3D_GL |
& fName(1:IL),'.',iG,'.',jG,'.data' |
|
./pkg/mdsio/mdsio_gl.F |
32 |
MDSREADFIELD_3D_GL |
I fName, |
|
./pkg/mdsio/mdsio_gl.F |
407 |
MDSWRITEFIELD_3D_GL |
I fName, |
|
./pkg/mdsio/mdsio_gl.F |
460 |
MDSWRITEFIELD_3D_GL |
character*(*) fName |
|
./pkg/mdsio/mdsio_gl.F |
516 |
MDSWRITEFIELD_3D_GL |
IL=ILNBLNK( fName ) |
|
./pkg/mdsio/mdsio_gl.F |
531 |
MDSWRITEFIELD_3D_GL |
write(dataFname,'(2a)') fName(1:IL),'.data' |
|
./pkg/mdsio/mdsio_gl.F |
598 |
MDSWRITEFIELD_3D_GL |
write(metaFName,'(2a)') fName(1:IL),'.meta' |
|
./pkg/mdsio/mdsio_gl.F |
632 |
MDSWRITEFIELD_3D_GL |
& fName(1:IL),'.',iG,'.',jG,'.data' |
|
./pkg/mdsio/mdsio_gl.F |
708 |
MDSWRITEFIELD_3D_GL |
& fName(1:IL),'.',iG,'.',jG,'.meta' |
|
./pkg/mdsio/mdsio_gl.F |
745 |
MDSREADFIELD_2D_GL |
I fName, |
|
./pkg/mdsio/mdsio_gl.F |
75 |
MDSREADFIELD_3D_GL |
character*(*) fName |
|
./pkg/mdsio/mdsio_gl.F |
788 |
MDSREADFIELD_2D_GL |
character*(*) fName |
|
./pkg/mdsio/mdsio_gl.F |
841 |
MDSREADFIELD_2D_GL |
IL=ILNBLNK( fName ) |
|
./pkg/mdsio/mdsio_gl.F |
856 |
MDSREADFIELD_2D_GL |
dataFName = fName |
|
./pkg/mdsio/mdsio_gl.F |
862 |
MDSREADFIELD_2D_GL |
write(dataFname,'(2a)') fName(1:IL),'.data' |
|
./pkg/mdsio/mdsio_gl.F |
893 |
MDSREADFIELD_2D_GL |
dataFName = fName |
|
./pkg/mdsio/mdsio_gl.F |
904 |
MDSREADFIELD_2D_GL |
write(dataFname,'(2a)') fName(1:IL),'.data' |
|
./pkg/mdsio/mdsio_gl.F |
941 |
MDSREADFIELD_2D_GL |
& fName(1:IL),'.',iG,'.',jG,'.data' |
|
./pkg/mdsio/mdsio_writelocal.F |
118 |
MDS_WRITELOCAL |
IL=ILNBLNK( fName ) |
|
./pkg/mdsio/mdsio_writelocal.F |
125 |
MDS_WRITELOCAL |
write(dataFName,'(2a)') fName(1:IL),'.data' |
|
./pkg/mdsio/mdsio_writelocal.F |
147 |
MDS_WRITELOCAL |
& fName(1:IL),'.',iG,'.',jG,'.data' |
|
./pkg/mdsio/mdsio_writelocal.F |
229 |
MDS_WRITELOCAL |
& fName(1:IL),'.',iG,'.',jG,'.meta' |
|
./pkg/mdsio/mdsio_writelocal.F |
293 |
MDS_WRITELOCAL |
write(metaFName,'(2a)') fName(1:IL),'.meta' |
|
./pkg/mdsio/mdsio_writelocal.F |
66 |
MDS_WRITELOCAL |
character*(*) fName |
|
./pkg/mdsio/mdsio_writelocal.F |
7 |
MDS_WRITELOCAL |
I fName, |
|
./pkg/mdsio/mdsio_gl_slice.F |
114 |
MDSREADFIELD_XZ_GL |
IL=ILNBLNK( fName ) |
|
./pkg/mdsio/mdsio_gl_slice.F |
120 |
MDSREADFIELD_XZ_GL |
dataFName = fName |
|
./pkg/mdsio/mdsio_gl_slice.F |
131 |
MDSREADFIELD_XZ_GL |
write(dataFname,'(2a)') fName(1:IL),'.data' |
|
./pkg/mdsio/mdsio_gl_slice.F |
153 |
MDSREADFIELD_XZ_GL |
& fName(1:IL),'.',iG,'.',jG,'.data' |
|
./pkg/mdsio/mdsio_gl_slice.F |
255 |
MDSREADFIELD_YZ_GL |
I fName, |
|
./pkg/mdsio/mdsio_gl_slice.F |
297 |
MDSREADFIELD_YZ_GL |
character*(*) fName |
|
./pkg/mdsio/mdsio_gl_slice.F |
32 |
MDSREADFIELD_XZ_GL |
I fName, |
|
./pkg/mdsio/mdsio_gl_slice.F |
337 |
MDSREADFIELD_YZ_GL |
IL=ILNBLNK( fName ) |
|
./pkg/mdsio/mdsio_gl_slice.F |
343 |
MDSREADFIELD_YZ_GL |
dataFName = fName |
|
./pkg/mdsio/mdsio_gl_slice.F |
354 |
MDSREADFIELD_YZ_GL |
write(dataFname,'(2a)') fName(1:IL),'.data' |
|
./pkg/mdsio/mdsio_gl_slice.F |
375 |
MDSREADFIELD_YZ_GL |
& fName(1:IL),'.',iG,'.',jG,'.data' |
|
./pkg/mdsio/mdsio_gl_slice.F |
477 |
MDSWRITEFIELD_XZ_GL |
I fName, |
|
./pkg/mdsio/mdsio_gl_slice.F |
529 |
MDSWRITEFIELD_XZ_GL |
character*(*) fName |
|
./pkg/mdsio/mdsio_gl_slice.F |
572 |
MDSWRITEFIELD_XZ_GL |
IL=ILNBLNK( fName ) |
|
./pkg/mdsio/mdsio_gl_slice.F |
588 |
MDSWRITEFIELD_XZ_GL |
& fName(1:IL),'.',iG,'.',jG,'.data' |
|
./pkg/mdsio/mdsio_gl_slice.F |
661 |
MDSWRITEFIELD_XZ_GL |
& fName(1:IL),'.',iG,'.',jG,'.meta' |
|
./pkg/mdsio/mdsio_gl_slice.F |
692 |
MDSWRITEFIELD_YZ_GL |
I fName, |
|
./pkg/mdsio/mdsio_gl_slice.F |
744 |
MDSWRITEFIELD_YZ_GL |
character*(*) fName |
|
./pkg/mdsio/mdsio_gl_slice.F |
74 |
MDSREADFIELD_XZ_GL |
character*(*) fName |
|
./pkg/mdsio/mdsio_gl_slice.F |
787 |
MDSWRITEFIELD_YZ_GL |
IL=ILNBLNK( fName ) |
|
./pkg/mdsio/mdsio_gl_slice.F |
803 |
MDSWRITEFIELD_YZ_GL |
& fName(1:IL),'.',iG,'.',jG,'.data' |
|
./pkg/mdsio/mdsio_gl_slice.F |
876 |
MDSWRITEFIELD_YZ_GL |
& fName(1:IL),'.',iG,'.',jG,'.meta' |
|
./pkg/mdsio/mdsio_writevec_loc.F |
107 |
MDSWRITEVEC_LOC_RS |
WRITE(dataFname,'(2A)') fName(1:IL),'.data' |
|
./pkg/mdsio/mdsio_writevec_loc.F |
172 |
MDSWRITEVEC_LOC_RS |
WRITE(metaFname,'(2A)') fName(1:IL),'.meta' |
|
./pkg/mdsio/mdsio_writevec_loc.F |
43 |
MDSWRITEVEC_LOC_RS |
CHARACTER*(*) fName |
|
./pkg/mdsio/mdsio_writevec_loc.F |
7 |
MDSWRITEVEC_LOC_RS |
I fName, |
|
./pkg/mdsio/mdsio_writevec_loc.F |
88 |
MDSWRITEVEC_LOC_RS |
IL = ILNBLNK( fName ) |
|
./pkg/mdsio/mdsio_writevec_loc.F |
94 |
MDSWRITEVEC_LOC_RS |
WRITE(pFname,'(2A)') mdsioLocalDir(1:pIL), fName(1:IL) |
|
./pkg/mdsio/mdsio_writevec_loc.F |
97 |
MDSWRITEVEC_LOC_RS |
WRITE(pFname,'(A)') fName(1:IL) |
|
./pkg/mdsio/mdsio_writefield.F |
42 |
MDSWRITEFIELD |
character*(*) fName |
|
./pkg/mdsio/mdsio_writefield.F |
53 |
MDSWRITEFIELD |
I fName,filePrec,globalFile,.FALSE., |
|
./pkg/mdsio/mdsio_writefield.F |
7 |
MDSWRITEFIELD |
I fName, |
|
./pkg/mdsio/mdsio_writefield_loc.F |
42 |
MDSWRITEFIELD_LOC |
character*(*) fName |
|
./pkg/mdsio/mdsio_writefield_loc.F |
53 |
MDSWRITEFIELD_LOC |
I fName,filePrec,globalFile,.TRUE., |
|
./pkg/mdsio/mdsio_writefield_loc.F |
7 |
MDSWRITEFIELD_LOC |
I fName, |
|
./pkg/mdsio/mdsio_writefield_new.F |
122 |
MDSWRITEFIELD_NEW |
IL = ILNBLNK( fName ) |
|
./pkg/mdsio/mdsio_writefield_new.F |
148 |
MDSWRITEFIELD_NEW |
pfName = fName |
|
./pkg/mdsio/mdsio_writefield_new.F |
150 |
MDSWRITEFIELD_NEW |
WRITE(pfName,'(2a)') mdsioLocalDir(1:pIL), fName(1:IL) |
|
./pkg/mdsio/mdsio_writefield_new.F |
165 |
MDSWRITEFIELD_NEW |
write(dataFName,'(2a)') fName(1:IL),'.data' |
|
./pkg/mdsio/mdsio_writefield_new.F |
279 |
MDSWRITEFIELD_NEW |
write(metaFName,'(2a)') fName(1:IL),'.meta' |
|
./pkg/mdsio/mdsio_writefield_new.F |
302 |
MDSWRITEFIELD_NEW |
write(dataFName,'(2a)') fName(1:IL),'.data' |
|
./pkg/mdsio/mdsio_writefield_new.F |
547 |
MDSWRITEFIELD_NEW |
write(metaFName,'(2a)') fName(1:IL),'.meta' |
|
./pkg/mdsio/mdsio_writefield_new.F |
75 |
MDSWRITEFIELD_NEW |
character*(*) fName |
|
./pkg/mdsio/mdsio_writefield_new.F |
7 |
MDSWRITEFIELD_NEW |
I fName, |
|
./pkg/seaice/seaice_get_forcing.F |
140 |
SEAICE_GET_FORCING |
WRITE(fName,'(A,I2.2)') uwindFile(1:iEnd), CurrentYear2 |
|
./pkg/seaice/seaice_get_forcing.F |
141 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,uwind0,iRec ,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
142 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,uwind1,iRec+1,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
146 |
SEAICE_GET_FORCING |
WRITE(fName,'(A,I2.2)') vwindFile(1:iEnd), CurrentYear2 |
|
./pkg/seaice/seaice_get_forcing.F |
147 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,vwind0,iRec ,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
148 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,vwind1,iRec+1,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
154 |
SEAICE_GET_FORCING |
WRITE(fName,'(A,I4.4)') atempFile(1:iEnd), CurrentYear |
|
./pkg/seaice/seaice_get_forcing.F |
155 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,atemp0,iRec ,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
156 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,atemp1,iRec+1,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
160 |
SEAICE_GET_FORCING |
WRITE(fName,'(A,I4.4)') aqhFile(1:iEnd), CurrentYear |
|
./pkg/seaice/seaice_get_forcing.F |
161 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,aqh0,iRec ,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
162 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,aqh1,iRec+1,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
166 |
SEAICE_GET_FORCING |
WRITE(fName,'(A,I4.4)') lwdownFile(1:iEnd), CurrentYear |
|
./pkg/seaice/seaice_get_forcing.F |
167 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,lwdown0,iRec ,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
168 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,lwdown1,iRec+1,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
172 |
SEAICE_GET_FORCING |
WRITE(fName,'(A,I4.4)') swdownFile(1:iEnd), CurrentYear |
|
./pkg/seaice/seaice_get_forcing.F |
173 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,swdown0,iRec ,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
174 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,swdown1,iRec+1,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
178 |
SEAICE_GET_FORCING |
WRITE(fName,'(A,I4.4)') precipFile(1:iEnd), CurrentYear |
|
./pkg/seaice/seaice_get_forcing.F |
179 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,precip0,iRec ,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
180 |
SEAICE_GET_FORCING |
CALL READ_REC_XY_RS( fName,precip1,iRec+1,myIter,myThid ) |
|
./pkg/seaice/seaice_get_forcing.F |
184 |
SEAICE_GET_FORCING |
WRITE(fName,'(A,I4.4)') evapFile(1:iEnd), CurrentYear |
|
./pkg/seaice/seaice_get_forcing.F |
|