File |
Line number |
Procedure |
Code |
./pkg/ctrl/ctrl_set_pack_yz.F |
163 |
CTRL_SET_PACK_YZ |
call MDSREADFIELD_3D_GL( fname, ctrlprec, 'RL', |
./pkg/ctrl/ctrl_set_pack_yz.F |
254 |
CTRL_SET_PACK_YZ |
call MDSREADFIELD_YZ_GL( fname, ctrlprec, 'RL', |
./pkg/ctrl/ctrl_set_pack_yz.F |
41 |
CTRL_SET_PACK_YZ |
character*( 80) fname |
./pkg/ctrl/ctrl_set_pack_yz.F |
5 |
CTRL_SET_PACK_YZ |
& cunit, ivartype, fname, masktype, weighttype, |
./pkg/ctrl/ctrl_set_unpack_xy.F |
230 |
CTRL_SET_UNPACK_XY |
call MDSWRITEFIELD_3D_GL( fname, ctrlprec, 'RL', |
./pkg/ctrl/ctrl_set_unpack_xy.F |
322 |
CTRL_SET_UNPACK_XY |
call MDSWRITEFIELD_2D_GL( fname, ctrlprec, 'RL', |
./pkg/ctrl/ctrl_set_unpack_xy.F |
39 |
CTRL_SET_UNPACK_XY |
character*( 80) fname, fnameGlobal |
./pkg/ctrl/ctrl_set_unpack_xy.F |
5 |
CTRL_SET_UNPACK_XY |
& lxxadxx, cunit, ivartype, fname, masktype, weighttype, |
./pkg/ctrl/ctrl_set_pack_xy.F |
157 |
CTRL_SET_PACK_XY |
call MDSREADFIELD_3D_GL( fname, ctrlprec, 'RL', |
./pkg/ctrl/ctrl_set_pack_xy.F |
219 |
CTRL_SET_PACK_XY |
call MDSREADFIELD_2D_GL( fname, ctrlprec, 'RL', |
./pkg/ctrl/ctrl_set_pack_xy.F |
38 |
CTRL_SET_PACK_XY |
character*( 80) fname, fnameGlobal |
./pkg/ctrl/ctrl_set_pack_xy.F |
5 |
CTRL_SET_PACK_XY |
& cunit, ivartype, fname, masktype, weighttype, |
./pkg/ctrl/ctrl_set_fname.F |
35 |
CTRL_SET_FNAME |
character*( 80) fname(2) |
./pkg/ctrl/ctrl_set_fname.F |
55 |
CTRL_SET_FNAME |
write(fname(1)(1:80),'(80a)') ' ' |
./pkg/ctrl/ctrl_set_fname.F |
56 |
CTRL_SET_FNAME |
write(fname(2)(1:80),'(80a)') ' ' |
./pkg/ctrl/ctrl_set_fname.F |
59 |
CTRL_SET_FNAME |
write(fname(1)(1:80),'(2a,i10.10)') |
./pkg/ctrl/ctrl_set_fname.F |
61 |
CTRL_SET_FNAME |
write(fname(2)(1:80),'(3a,i10.10)') |
./pkg/ctrl/ctrl_set_fname.F |
7 |
CTRL_SET_FNAME |
subroutine CTRL_SET_FNAME( xx_fname, fname, mythid ) |
./pkg/ctrl/ctrl_set_globfld_xyz.F |
34 |
CTRL_SET_GLOBFLD_XYZ |
character*( 80) fname |
./pkg/ctrl/ctrl_set_globfld_xyz.F |
85 |
CTRL_SET_GLOBFLD_XYZ |
call MDSWRITEFIELD_3D_GL( fname, ctrlprec, 'RL', |
./pkg/ctrl/ctrl_set_globfld_xyz.F |
8 |
CTRL_SET_GLOBFLD_XYZ |
I fname, ivartype, mythid ) |
./pkg/ctrl/ctrl_set_unpack_xz.F |
227 |
CTRL_SET_UNPACK_XZ |
call MDSWRITEFIELD_3D_GL( fname, ctrlprec, 'RL', |
./pkg/ctrl/ctrl_set_unpack_xz.F |
297 |
CTRL_SET_UNPACK_XZ |
call MDSWRITEFIELD_XZ_GL( fname, ctrlprec, 'RL', |
./pkg/ctrl/ctrl_set_unpack_xz.F |
40 |
CTRL_SET_UNPACK_XZ |
character*( 80) fname |
./pkg/ctrl/ctrl_set_unpack_xz.F |
5 |
CTRL_SET_UNPACK_XZ |
& cunit, ivartype, fname, masktype, weighttype, |
./pkg/ctrl/ctrl_set_globfld_xy.F |
106 |
CTRL_SET_GLOBFLD_XY |
call MDSWRITEFIELD_3D_GL( fname, ctrlprec, 'RL', |
./pkg/ctrl/ctrl_set_globfld_xy.F |
112 |
CTRL_SET_GLOBFLD_XY |
call MDSWRITEFIELD_2D_GL( fname, ctrlprec, 'RL', |
./pkg/ctrl/ctrl_set_globfld_xy.F |
39 |
CTRL_SET_GLOBFLD_XY |
character*( 80) fname |
./pkg/ctrl/ctrl_set_globfld_xy.F |
8 |
CTRL_SET_GLOBFLD_XY |
I fname, ivartype, mythid ) |
./pkg/ctrl/ctrl_set_globfld_yz.F |
106 |
CTRL_SET_GLOBFLD_YZ |
call MDSWRITEFIELD_3D_GL( fname, ctrlprec, 'RL', |
./pkg/ctrl/ctrl_set_globfld_yz.F |
112 |
CTRL_SET_GLOBFLD_YZ |
call MDSWRITEFIELD_YZ_GL( fname, ctrlprec, 'RL', |
./pkg/ctrl/ctrl_set_globfld_yz.F |
39 |
CTRL_SET_GLOBFLD_YZ |
character*( 80) fname |
./pkg/ctrl/ctrl_set_globfld_yz.F |
8 |
CTRL_SET_GLOBFLD_YZ |
I fname, ivartype, mythid ) |
./pkg/ctrl/ctrl_set_unpack_yz.F |
228 |
CTRL_SET_UNPACK_YZ |
call MDSWRITEFIELD_3D_GL( fname, ctrlprec, 'RL', |
./pkg/ctrl/ctrl_set_unpack_yz.F |
296 |
CTRL_SET_UNPACK_YZ |
call MDSWRITEFIELD_YZ_GL( fname, ctrlprec, 'RL', |
./pkg/ctrl/ctrl_set_unpack_yz.F |
40 |
CTRL_SET_UNPACK_YZ |
character*( 80) fname |
./pkg/ctrl/ctrl_set_unpack_yz.F |
5 |
CTRL_SET_UNPACK_YZ |
& cunit, ivartype, fname, masktype, weighttype, |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
259 |
CTRL_SET_UNPACK_XYZ |
call MDSWRITEFIELD_3D_GL( fname, ctrlprec, 'RL', |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
38 |
CTRL_SET_UNPACK_XYZ |
character*( 80) fname |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
5 |
CTRL_SET_UNPACK_XYZ |
& lxxadxx, cunit, ivartype, fname, masktype, weighttype, |
./pkg/ctrl/ctrl_set_globfld_xz.F |
106 |
CTRL_SET_GLOBFLD_XZ |
call MDSWRITEFIELD_3D_GL( fname, ctrlprec, 'RL', |
./pkg/ctrl/ctrl_set_globfld_xz.F |
112 |
CTRL_SET_GLOBFLD_XZ |
call MDSWRITEFIELD_XZ_GL( fname, ctrlprec, 'RL', |
./pkg/ctrl/ctrl_set_globfld_xz.F |
39 |
CTRL_SET_GLOBFLD_XZ |
character*( 80) fname |
./pkg/ctrl/ctrl_set_globfld_xz.F |
8 |
CTRL_SET_GLOBFLD_XZ |
I fname, ivartype, mythid ) |
./pkg/ctrl/ctrl_mask_set_yz.F |
126 |
CTRL_MASK_SET_YZ |
write(fname(1:80),'(80a)') ' ' |
./pkg/ctrl/ctrl_mask_set_yz.F |
127 |
CTRL_MASK_SET_YZ |
write(fname(1:80),'(a)') ymaskobcs |
./pkg/ctrl/ctrl_mask_set_yz.F |
139 |
CTRL_MASK_SET_YZ |
call ACTIVE_WRITE_YZ_LOC( fname, gg, iobcs, 0, mythid, dummy) |
./pkg/ctrl/ctrl_mask_set_yz.F |
62 |
CTRL_MASK_SET_YZ |
character*( 80) fname |
./pkg/ctrl/ctrl_set_pack_xyz.F |
166 |
CTRL_SET_PACK_XYZ |
call MDSREADFIELD_3D_GL( fname, ctrlprec, 'RL', |
./pkg/ctrl/ctrl_set_pack_xyz.F |
38 |
CTRL_SET_PACK_XYZ |
character*( 80) fname |
./pkg/ctrl/ctrl_set_pack_xyz.F |
5 |
CTRL_SET_PACK_XYZ |
& cunit, ivartype, fname, masktype, weighttype, |
./pkg/ctrl/ctrl_set_pack_xz.F |
161 |
CTRL_SET_PACK_XZ |
call MDSREADFIELD_3D_GL( fname, ctrlprec, 'RL', |
./pkg/ctrl/ctrl_set_pack_xz.F |
247 |
CTRL_SET_PACK_XZ |
call MDSREADFIELD_XZ_GL( fname, ctrlprec, 'RL', |
./pkg/ctrl/ctrl_set_pack_xz.F |
41 |
CTRL_SET_PACK_XZ |
character*( 80) fname |
./pkg/ctrl/ctrl_set_pack_xz.F |
5 |
CTRL_SET_PACK_XZ |
& cunit, ivartype, fname, masktype,weighttype, |
./pkg/ctrl/ctrl_mask_set_xz.F |
125 |
CTRL_MASK_SET_XZ |
write(fname(1:80),'(80a)') ' ' |
./pkg/ctrl/ctrl_mask_set_xz.F |
126 |
CTRL_MASK_SET_XZ |
write(fname(1:80),'(a)') ymaskobcs |
./pkg/ctrl/ctrl_mask_set_xz.F |
138 |
CTRL_MASK_SET_XZ |
call ACTIVE_WRITE_XZ_LOC( fname, gg, iobcs, 0, mythid, dummy ) |
./pkg/ctrl/ctrl_mask_set_xz.F |
62 |
CTRL_MASK_SET_XZ |
character*( 80) fname |
./pkg/ctrl/ctrl_init_ctrlvar.F |
57 |
CTRL_INIT_CTRLVAR |
character*( 80) fname(2) |
./pkg/ctrl/ctrl_init_ctrlvar.F |
71 |
CTRL_INIT_CTRLVAR |
call CTRL_SET_FNAME( xx_fname, fname, mythid ) |
./pkg/ctrl/ctrl_init_ctrlvar.F |
78 |
CTRL_INIT_CTRLVAR |
& call CTRL_SET_GLOBFLD_XYZ( fname(2), ivarindex, mythid) |
./pkg/ctrl/ctrl_init_ctrlvar.F |
80 |
CTRL_INIT_CTRLVAR |
& call CTRL_SET_GLOBFLD_XYZ( fname(1), ivarindex, mythid) |
./pkg/ctrl/ctrl_init_ctrlvar.F |
83 |
CTRL_INIT_CTRLVAR |
& call CTRL_SET_GLOBFLD_XY( fname(2), ivarindex, mythid) |
./pkg/ctrl/ctrl_init_ctrlvar.F |
85 |
CTRL_INIT_CTRLVAR |
& call CTRL_SET_GLOBFLD_XY( fname(1), ivarindex, mythid ) |
./pkg/ctrl/ctrl_init_ctrlvar.F |
88 |
CTRL_INIT_CTRLVAR |
& call CTRL_SET_GLOBFLD_XZ( fname(2), ivarindex, mythid) |
./pkg/ctrl/ctrl_init_ctrlvar.F |
90 |
CTRL_INIT_CTRLVAR |
& call CTRL_SET_GLOBFLD_XZ( fname(1), ivarindex, mythid ) |
./pkg/ctrl/ctrl_init_ctrlvar.F |
93 |
CTRL_INIT_CTRLVAR |
& call CTRL_SET_GLOBFLD_YZ( fname(2), ivarindex, mythid) |
./pkg/ctrl/ctrl_init_ctrlvar.F |
95 |
CTRL_INIT_CTRLVAR |
& call CTRL_SET_GLOBFLD_YZ( fname(1), ivarindex, mythid ) |