Symbol Description Uses
cfile2 60


File Line number Procedure Code
./pkg/ctrl/ctrl_set_pack_xy.F 117 CTRL_SET_PACK_XY 
         write(cfile2(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_set_pack_xy.F 120 CTRL_SET_PACK_XY 
            write(cfile2(1:80),'(a,I3.3,a,I4.4,a)')
./pkg/ctrl/ctrl_set_pack_xy.F 127 CTRL_SET_PACK_XY 
            write(cfile2(1:80),'(a,I3.3,a,I4.4,a)')
./pkg/ctrl/ctrl_set_pack_xy.F 137 CTRL_SET_PACK_XY 
         open( cunit2, file=cfile2, status='unknown',
./pkg/ctrl/ctrl_set_pack_xy.F 399 CTRL_SET_PACK_XY 
      character*(80) cfile2, cfile3
./pkg/ctrl/ctrl_set_pack_xy.F 420 CTRL_SET_PACK_XY 
         write(cfile2(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_set_pack_xy.F 424 CTRL_SET_PACK_XY 
            write(cfile2(1:80),'(2a)') fname(1:il),'.pack_ctrl_adim'
./pkg/ctrl/ctrl_set_pack_xy.F 427 CTRL_SET_PACK_XY 
            write(cfile2(1:80),'(2a)') fname(1:il),'.pack_grad_adim'
./pkg/ctrl/ctrl_set_pack_xy.F 486 CTRL_SET_PACK_XY 
      call WRITE_REC_3D_RL( cfile2, ctrlprec,
./pkg/ctrl/ctrl_set_pack_xy.F 71 CTRL_SET_PACK_XY 
      character*(80) cfile2, cfile3
./pkg/ctrl/ctrl_set_pack_xyz.F 126 CTRL_SET_PACK_XYZ 
         write(cfile2(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_set_pack_xyz.F 129 CTRL_SET_PACK_XYZ 
            write(cfile2(1:80),'(a,I3.3,a,I4.4,a)')
./pkg/ctrl/ctrl_set_pack_xyz.F 136 CTRL_SET_PACK_XYZ 
            write(cfile2(1:80),'(a,I3.3,a,I4.4,a)')
./pkg/ctrl/ctrl_set_pack_xyz.F 146 CTRL_SET_PACK_XYZ 
         open( cunit2, file=cfile2, status='unknown',
./pkg/ctrl/ctrl_set_pack_xyz.F 313 CTRL_SET_PACK_XYZ 
      character*(80) cfile2, cfile3
./pkg/ctrl/ctrl_set_pack_xyz.F 334 CTRL_SET_PACK_XYZ 
         write(cfile2(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_set_pack_xyz.F 338 CTRL_SET_PACK_XYZ 
            write(cfile2(1:80),'(2a)') fname(1:il),'.pack_ctrl_adim'
./pkg/ctrl/ctrl_set_pack_xyz.F 341 CTRL_SET_PACK_XYZ 
            write(cfile2(1:80),'(2a)') fname(1:il),'.pack_grad_adim'
./pkg/ctrl/ctrl_set_pack_xyz.F 404 CTRL_SET_PACK_XYZ 
      call WRITE_REC_3D_RL( cfile2, ctrlprec,
./pkg/ctrl/ctrl_set_pack_xyz.F 77 CTRL_SET_PACK_XYZ 
      character*(80) cfile2, cfile3
./pkg/ctrl/ctrl_set_pack_xz.F 136 CTRL_SET_PACK_XZ 
         write(cfile2(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_set_pack_xz.F 139 CTRL_SET_PACK_XZ 
            write(cfile2(1:80),'(a,I2.2,a,I4.4,a)')
./pkg/ctrl/ctrl_set_pack_xz.F 146 CTRL_SET_PACK_XZ 
            write(cfile2(1:80),'(a,I2.2,a,I4.4,a)')
./pkg/ctrl/ctrl_set_pack_xz.F 156 CTRL_SET_PACK_XZ 
         open( cunit2, file=cfile2, status='unknown',
./pkg/ctrl/ctrl_set_pack_xz.F 66 CTRL_SET_PACK_XZ 
      character*(80) cfile2, cfile3
./pkg/ctrl/ctrl_set_pack_yz.F 136 CTRL_SET_PACK_YZ 
         write(cfile2(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_set_pack_yz.F 139 CTRL_SET_PACK_YZ 
            write(cfile2(1:80),'(a,I2.2,a,I4.4,a)')
./pkg/ctrl/ctrl_set_pack_yz.F 146 CTRL_SET_PACK_YZ 
            write(cfile2(1:80),'(a,I2.2,a,I4.4,a)')
./pkg/ctrl/ctrl_set_pack_yz.F 156 CTRL_SET_PACK_YZ 
         open( cunit2, file=cfile2, status='unknown',
./pkg/ctrl/ctrl_set_pack_yz.F 66 CTRL_SET_PACK_YZ 
      character*(80) cfile2, cfile3
./pkg/ctrl/ctrl_set_unpack_xy.F 118 CTRL_SET_UNPACK_XY 
         write(cfile2(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_set_unpack_xy.F 121 CTRL_SET_UNPACK_XY 
            write(cfile2(1:80),'(a,I3.3,a,I4.4,a)')
./pkg/ctrl/ctrl_set_unpack_xy.F 128 CTRL_SET_UNPACK_XY 
            write(cfile2(1:80),'(a,I3.3,a,I4.4,a)')
./pkg/ctrl/ctrl_set_unpack_xy.F 138 CTRL_SET_UNPACK_XY 
         open( cunit2, file=cfile2, status='unknown',
./pkg/ctrl/ctrl_set_unpack_xy.F 433 CTRL_SET_UNPACK_XY 
      character*(80) cfile2, cfile3
./pkg/ctrl/ctrl_set_unpack_xy.F 454 CTRL_SET_UNPACK_XY 
         write(cfile2(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_set_unpack_xy.F 458 CTRL_SET_UNPACK_XY 
            write(cfile2(1:80),'(2a)') fname(1:il),'.unpack_ctrl_adim'
./pkg/ctrl/ctrl_set_unpack_xy.F 461 CTRL_SET_UNPACK_XY 
            write(cfile2(1:80),'(2a)') fname(1:il),'.unpack_grad_adim'
./pkg/ctrl/ctrl_set_unpack_xy.F 594 CTRL_SET_UNPACK_XY 
      call WRITE_REC_3D_RL( cfile2, ctrlprec,
./pkg/ctrl/ctrl_set_unpack_xy.F 72 CTRL_SET_UNPACK_XY 
      character*(80) cfile2, cfile3
./pkg/ctrl/ctrl_set_unpack_xyz.F 135 CTRL_SET_UNPACK_XYZ 
         write(cfile2(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_set_unpack_xyz.F 138 CTRL_SET_UNPACK_XYZ 
            write(cfile2(1:80),'(a,I3.3,a,I4.4,a)')
./pkg/ctrl/ctrl_set_unpack_xyz.F 145 CTRL_SET_UNPACK_XYZ 
            write(cfile2(1:80),'(a,I3.3,a,I4.4,a)')
./pkg/ctrl/ctrl_set_unpack_xyz.F 155 CTRL_SET_UNPACK_XYZ 
         open( cunit2, file=cfile2, status='unknown',
./pkg/ctrl/ctrl_set_unpack_xyz.F 342 CTRL_SET_UNPACK_XYZ 
      character*(80) cfile2, cfile3
./pkg/ctrl/ctrl_set_unpack_xyz.F 363 CTRL_SET_UNPACK_XYZ 
         write(cfile2(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_set_unpack_xyz.F 367 CTRL_SET_UNPACK_XYZ 
            write(cfile2(1:80),'(2a)') fname(1:il),'.unpack_ctrl_adim'
./pkg/ctrl/ctrl_set_unpack_xyz.F 370 CTRL_SET_UNPACK_XYZ 
            write(cfile2(1:80),'(2a)') fname(1:il),'.unpack_grad_adim'
./pkg/ctrl/ctrl_set_unpack_xyz.F 506 CTRL_SET_UNPACK_XYZ 
      call WRITE_REC_3D_RL( cfile2, ctrlprec,
./pkg/ctrl/ctrl_set_unpack_xyz.F 79 CTRL_SET_UNPACK_XYZ 
      character*(80) cfile2, cfile3
./pkg/ctrl/ctrl_set_unpack_xz.F 141 CTRL_SET_UNPACK_XZ 
         write(cfile2(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_set_unpack_xz.F 144 CTRL_SET_UNPACK_XZ 
            write(cfile2(1:80),'(a,I2.2,a,I4.4,a)')
./pkg/ctrl/ctrl_set_unpack_xz.F 151 CTRL_SET_UNPACK_XZ 
            write(cfile2(1:80),'(a,I2.2,a,I4.4,a)')
./pkg/ctrl/ctrl_set_unpack_xz.F 161 CTRL_SET_UNPACK_XZ 
         open( cunit2, file=cfile2, status='unknown',
./pkg/ctrl/ctrl_set_unpack_xz.F 75 CTRL_SET_UNPACK_XZ 
      character*(80) cfile2, cfile3
./pkg/ctrl/ctrl_set_unpack_yz.F 141 CTRL_SET_UNPACK_YZ 
         write(cfile2(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_set_unpack_yz.F 144 CTRL_SET_UNPACK_YZ 
            write(cfile2(1:80),'(a,I2.2,a,I4.4,a)')
./pkg/ctrl/ctrl_set_unpack_yz.F 151 CTRL_SET_UNPACK_YZ 
            write(cfile2(1:80),'(a,I2.2,a,I4.4,a)')
./pkg/ctrl/ctrl_set_unpack_yz.F 161 CTRL_SET_UNPACK_YZ 
         open( cunit2, file=cfile2, status='unknown',
./pkg/ctrl/ctrl_set_unpack_yz.F 75 CTRL_SET_UNPACK_YZ 
      character*(80) cfile2, cfile3