| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
106 |
NO PROCEDURE |
CHARACTER*(MAX_LEN_FNAM) mdsioLocalDir |
|
./model/inc/PARAMS.h |
86 |
NO PROCEDURE |
& pickupSuff, mdsioLocalDir, adTapeDir, |
|
./pkg/mdsio/mdsio_gl.F |
118 |
MDSREADFIELD_3D_GL |
pIL = ILNBLNK( mdsioLocalDir ) |
|
./pkg/mdsio/mdsio_gl.F |
123 |
MDSREADFIELD_3D_GL |
write(fName,'(2a)') mdsioLocalDir(1:pIL), fName(1:IL) |
|
./pkg/mdsio/mdsio_gl.F |
1291 |
MDSWRITEFIELD_2D_GL |
pIL = ILNBLNK( mdsioLocalDir ) |
|
./pkg/mdsio/mdsio_gl.F |
1296 |
MDSWRITEFIELD_2D_GL |
write(fName,'(2a)') mdsioLocalDir(1:pIL), fName(1:IL) |
|
./pkg/mdsio/mdsio_gl.F |
529 |
MDSWRITEFIELD_3D_GL |
pIL = ILNBLNK( mdsioLocalDir ) |
|
./pkg/mdsio/mdsio_gl.F |
534 |
MDSWRITEFIELD_3D_GL |
write(fName,'(2a)') mdsioLocalDir(1:pIL), fName(1:IL) |
|
./pkg/mdsio/mdsio_gl.F |
879 |
MDSREADFIELD_2D_GL |
pIL = ILNBLNK( mdsioLocalDir ) |
|
./pkg/mdsio/mdsio_gl.F |
884 |
MDSREADFIELD_2D_GL |
write(fName,'(2a)') mdsioLocalDir(1:pIL), fName(1:IL) |
|
./pkg/mdsio/mdsio_read_field.F |
138 |
MDS_READ_FIELD |
pIL = ILNBLNK( mdsioLocalDir ) |
|
./pkg/mdsio/mdsio_read_field.F |
206 |
MDS_READ_FIELD |
WRITE(pfName,'(2a)') mdsioLocalDir(1:pIL), fName(1:IL) |
|
./pkg/mdsio/mdsio_read_meta.F |
132 |
MDS_READ_META |
pL = ILNBLNK( mdsioLocalDir ) |
|
./pkg/mdsio/mdsio_read_meta.F |
136 |
MDS_READ_META |
WRITE(pfName,'(2A)') mdsioLocalDir(1:pL), fileName(1:iL) |
|
./pkg/mdsio/mdsio_read_section.F |
115 |
MDS_READ_SEC_XZ |
pIL = ILNBLNK( mdsioLocalDir ) |
|
./pkg/mdsio/mdsio_read_section.F |
121 |
MDS_READ_SEC_XZ |
WRITE(pfName,'(2a)') mdsioLocalDir(1:pIL), fName(1:IL) |
|
./pkg/mdsio/mdsio_read_section.F |
393 |
MDS_READ_SEC_YZ |
pIL = ILNBLNK( mdsioLocalDir ) |
|
./pkg/mdsio/mdsio_read_section.F |
399 |
MDS_READ_SEC_YZ |
WRITE(pfName,'(2A)') mdsioLocalDir(1:pIL), fName(1:IL) |
|
./pkg/mdsio/mdsio_read_whalos.F |
112 |
MDS_READ_WHALOS |
pIL = ILNBLNK( mdsioLocalDir ) |
|
./pkg/mdsio/mdsio_read_whalos.F |
116 |
MDS_READ_WHALOS |
WRITE(pfName,'(2A)') mdsioLocalDir(1:pIL), fName(1:IL) |
|
./pkg/mdsio/mdsio_readvec_loc.F |
131 |
MDS_READVEC_LOC |
IF ( mdsioLocalDir .NE. ' ' ) THEN |
|
./pkg/mdsio/mdsio_readvec_loc.F |
132 |
MDS_READVEC_LOC |
pIL = ILNBLNK( mdsioLocalDir ) |
|
./pkg/mdsio/mdsio_readvec_loc.F |
133 |
MDS_READVEC_LOC |
WRITE(pFname,'(2A)') mdsioLocalDir(1:pIL), fName(1:IL) |
|
./pkg/mdsio/mdsio_readvector.F |
100 |
MDSREADVECTOR |
IF ( mdsioLocalDir .NE. ' ' ) THEN |
|
./pkg/mdsio/mdsio_readvector.F |
102 |
MDSREADVECTOR |
& mdsioLocalDir(1:pIL), fName(1:IL) |
|
./pkg/mdsio/mdsio_readvector.F |
97 |
MDSREADVECTOR |
pIL = ILNBLNK( mdsioLocalDir ) |
|
./pkg/mdsio/mdsio_wr_metafiles.F |
144 |
MDS_WR_METAFILES |
pIL = ILNBLNK( mdsioLocalDir ) |
|
./pkg/mdsio/mdsio_wr_metafiles.F |
149 |
MDS_WR_METAFILES |
WRITE(pfName,'(2A)') mdsioLocalDir(1:pIL), fName(1:IL) |
|
./pkg/mdsio/mdsio_write_field.F |
164 |
MDS_WRITE_FIELD |
pIL = ILNBLNK( mdsioLocalDir ) |
|
./pkg/mdsio/mdsio_write_field.F |
234 |
MDS_WRITE_FIELD |
WRITE(pfName,'(2A)') mdsioLocalDir(1:pIL), fName(1:IL) |
|
./pkg/mdsio/mdsio_write_section.F |
121 |
MDS_WRITE_SEC_XZ |
pIL = ILNBLNK( mdsioLocalDir ) |
|
./pkg/mdsio/mdsio_write_section.F |
127 |
MDS_WRITE_SEC_XZ |
WRITE(pfName,'(2A)') mdsioLocalDir(1:pIL), fName(1:IL) |
|
./pkg/mdsio/mdsio_write_section.F |
374 |
MDS_WRITE_SEC_YZ |
pIL = ILNBLNK( mdsioLocalDir ) |
|
./pkg/mdsio/mdsio_write_section.F |
380 |
MDS_WRITE_SEC_YZ |
WRITE(pfName,'(2a)') mdsioLocalDir(1:pIL), fName(1:IL) |
|
./pkg/mdsio/mdsio_write_whalos.F |
114 |
MDS_WRITE_WHALOS |
pIL = ILNBLNK( mdsioLocalDir ) |
|
./pkg/mdsio/mdsio_write_whalos.F |
118 |
MDS_WRITE_WHALOS |
WRITE(pfName,'(2A)') mdsioLocalDir(1:pIL), fName(1:IL) |
|
./pkg/mdsio/mdsio_writevec_loc.F |
136 |
MDS_WRITEVEC_LOC |
IF ( mdsioLocalDir .NE. ' ' ) THEN |
|
./pkg/mdsio/mdsio_writevec_loc.F |
137 |
MDS_WRITEVEC_LOC |
pIL = ILNBLNK( mdsioLocalDir ) |
|
./pkg/mdsio/mdsio_writevec_loc.F |
138 |
MDS_WRITEVEC_LOC |
WRITE(pFname,'(2A)') mdsioLocalDir(1:pIL), fName(1:IL) |
|
./pkg/mdsio/mdsio_writevector.F |
117 |
MDSWRITEVECTOR |
pIL = ILNBLNK( mdsioLocalDir ) |
|
./pkg/mdsio/mdsio_writevector.F |
120 |
MDSWRITEVECTOR |
IF ( mdsioLocalDir .NE. ' ' ) THEN |
|
./pkg/mdsio/mdsio_writevector.F |
122 |
MDSWRITEVECTOR |
& mdsioLocalDir(1:pIL), fName(1:IL) |
|
./model/src/ini_model_io.F |
142 |
INI_MODEL_IO |
IF ( mdsioLocalDir .NE. ' ' ) THEN |
|
./model/src/ini_model_io.F |
143 |
INI_MODEL_IO |
iL = ILNBLNK( mdsioLocalDir ) |
|
./model/src/ini_model_io.F |
145 |
INI_MODEL_IO |
& ' mkdir -p ', mdsioLocalDir(1:iL),myProcessStr(1:4) |
|
./model/src/ini_model_io.F |
150 |
INI_MODEL_IO |
namBuf(1:iL) = mdsioLocalDir(1:iL) |
|
./model/src/ini_model_io.F |
151 |
INI_MODEL_IO |
WRITE(mdsioLocalDir,'(3A)') namBuf(1:iL),myProcessStr(1:4),'/' |
|
./model/src/ini_parms.F |
1251 |
INI_PARMS |
IF (mdsioLocalDir .NE. ' ' .AND. adTapeDir .NE. ' ') THEN |
|
./model/src/ini_parms.F |
265 |
INI_PARMS |
& mdsioLocalDir, adTapeDir, |
|
./model/src/set_defaults.F |
343 |
SET_DEFAULTS |
mdsioLocalDir = ' ' |