| File |
Line number |
Procedure |
Code |
|
./optim/optim_readdata.F |
356 |
OPTIM_READDATA |
read( funit ) filek |
|
./pkg/ctrl/ctrl.h |
154 |
NO PROCEDURE |
& filek, |
|
./pkg/ctrl/ctrl.h |
174 |
NO PROCEDURE |
integer filek |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
201 |
CTRL_SET_UNPACK_XY |
read(cunit) filek |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
202 |
CTRL_SET_UNPACK_XY |
if (filek .NE. 1) then |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
204 |
CTRL_SET_UNPACK_XY |
& filek, 1 |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
311 |
CTRL_SET_UNPACK_XY |
read(cunit) filek |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
312 |
CTRL_SET_UNPACK_XY |
if (filek .NE. k) then |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
314 |
CTRL_SET_UNPACK_XY |
& filek, k |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
520 |
CTRL_SET_UNPACK_XY |
read(cunit) filek |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
526 |
CTRL_SET_UNPACK_XY |
if (filek .NE. 1) then |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
528 |
CTRL_SET_UNPACK_XY |
& filek, 1 |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
225 |
CTRL_SET_UNPACK_XYZ |
read(cunit) filek |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
226 |
CTRL_SET_UNPACK_XYZ |
if (filek .NE. k) then |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
228 |
CTRL_SET_UNPACK_XYZ |
& filek, k |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
430 |
CTRL_SET_UNPACK_XYZ |
read(cunit) filek |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
436 |
CTRL_SET_UNPACK_XYZ |
if (filek .NE. k) then |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
438 |
CTRL_SET_UNPACK_XYZ |
& filek, k |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
214 |
CTRL_SET_UNPACK_XZ |
read(cunit) filek |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
215 |
CTRL_SET_UNPACK_XZ |
if (filek .NE. k) then |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
217 |
CTRL_SET_UNPACK_XZ |
& filek, k |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
301 |
CTRL_SET_UNPACK_XZ |
read(cunit) filek |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
302 |
CTRL_SET_UNPACK_XZ |
if (filek .NE. k) then |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
304 |
CTRL_SET_UNPACK_XZ |
& filek, k |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
214 |
CTRL_SET_UNPACK_YZ |
read(cunit) filek |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
215 |
CTRL_SET_UNPACK_YZ |
if (filek .NE. k) then |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
217 |
CTRL_SET_UNPACK_YZ |
& filek, k |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
301 |
CTRL_SET_UNPACK_YZ |
read(cunit) filek |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
302 |
CTRL_SET_UNPACK_YZ |
if (filek .NE. k) then |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
304 |
CTRL_SET_UNPACK_YZ |
& filek, k |