Symbol Description Uses
active_num_file 70


File Line number Procedure Code
./pkg/profiles/active_file_control_profiles.F 101 ACTIVE_READ_PROFILE_RL 
      read(fid,rec=( (irec-1)*prof_num_var_tot(active_num_file,bi,bj)
./pkg/profiles/active_file_control_profiles.F 102 ACTIVE_READ_PROFILE_RL 
     & +prof_num_var_cur(active_num_file,active_varnum,bi,bj)-1)*2+2 )
./pkg/profiles/active_file_control_profiles.F 132 ACTIVE_READ_PROFILE_RL 
      err = NF_INQ_VARID(fid,prof_names(active_num_file,active_varnum),
./pkg/profiles/active_file_control_profiles.F 147 ACTIVE_READ_PROFILE_RL 
      err = NF_INQ_VARID(fid,prof_names(active_num_file,active_varnum),
./pkg/profiles/active_file_control_profiles.F 160 ACTIVE_READ_PROFILE_RL 
      read(fid,rec=( (irec-1)*prof_num_var_tot(active_num_file,bi,bj)
./pkg/profiles/active_file_control_profiles.F 161 ACTIVE_READ_PROFILE_RL 
     & +prof_num_var_cur(active_num_file,active_varnum,bi,bj)-1)*2+1 )
./pkg/profiles/active_file_control_profiles.F 16 ACTIVE_READ_PROFILE_RL 
     I                                active_num_file,
./pkg/profiles/active_file_control_profiles.F 182 ACTIVE_READ_PROFILE_RL 
      write(fid,rec=( (irec-1)*prof_num_var_tot(active_num_file,bi,bj)
./pkg/profiles/active_file_control_profiles.F 183 ACTIVE_READ_PROFILE_RL 
     & +prof_num_var_cur(active_num_file,active_varnum,bi,bj)-1)*2+1 )
./pkg/profiles/active_file_control_profiles.F 212 ACTIVE_READ_PROFILE_RL 
      err = NF_INQ_VARID(fid,prof_names(active_num_file,active_varnum),
./pkg/profiles/active_file_control_profiles.F 219 ACTIVE_READ_PROFILE_RL 
      read(fid,rec=( (irec-1)*prof_num_var_tot(active_num_file,bi,bj)
./pkg/profiles/active_file_control_profiles.F 220 ACTIVE_READ_PROFILE_RL 
     & +prof_num_var_cur(active_num_file,active_varnum,bi,bj)-1)*2+1 )
./pkg/profiles/active_file_control_profiles.F 246 ACTIVE_WRITE_PROFILE_RL 
     I                                 active_num_file,
./pkg/profiles/active_file_control_profiles.F 285 ACTIVE_WRITE_PROFILE_RL 
      integer  nactive_var,active_num_file
./pkg/profiles/active_file_control_profiles.F 313 ACTIVE_WRITE_PROFILE_RL 
      err = NF_INQ_VARID(fid,prof_names(active_num_file,active_varnum),
./pkg/profiles/active_file_control_profiles.F 318 ACTIVE_WRITE_PROFILE_RL 
      err = NF_INQ_VARID(fid,prof_namesmask(active_num_file,
./pkg/profiles/active_file_control_profiles.F 337 ACTIVE_WRITE_PROFILE_RL 
      write(fid,rec=( (irec-1)*prof_num_var_tot(active_num_file,bi,bj)
./pkg/profiles/active_file_control_profiles.F 338 ACTIVE_WRITE_PROFILE_RL 
     & +prof_num_var_cur(active_num_file,active_varnum,bi,bj)-1)*2+1 )
./pkg/profiles/active_file_control_profiles.F 347 ACTIVE_WRITE_PROFILE_RL 
      write(fid,rec=( (irec-1)*prof_num_var_tot(active_num_file,bi,bj)
./pkg/profiles/active_file_control_profiles.F 348 ACTIVE_WRITE_PROFILE_RL 
     & +prof_num_var_cur(active_num_file,active_varnum,bi,bj)-1)*2+2 )
./pkg/profiles/active_file_control_profiles.F 372 ACTIVE_WRITE_PROFILE_RL 
      err = NF_INQ_VARID(fid,prof_names(active_num_file,active_varnum),
./pkg/profiles/active_file_control_profiles.F 388 ACTIVE_WRITE_PROFILE_RL 
      err = NF_INQ_VARID(fid,prof_names(active_num_file,active_varnum),
./pkg/profiles/active_file_control_profiles.F 396 ACTIVE_WRITE_PROFILE_RL 
      read(fid,rec=( (irec-1)*prof_num_var_tot(active_num_file,bi,bj)
./pkg/profiles/active_file_control_profiles.F 397 ACTIVE_WRITE_PROFILE_RL 
     & +prof_num_var_cur(active_num_file,active_varnum,bi,bj)-1)*2+1 )
./pkg/profiles/active_file_control_profiles.F 419 ACTIVE_WRITE_PROFILE_RL 
      write(fid,rec=( (irec-1)*prof_num_var_tot(active_num_file,bi,bj)
./pkg/profiles/active_file_control_profiles.F 420 ACTIVE_WRITE_PROFILE_RL 
     & +prof_num_var_cur(active_num_file,active_varnum,bi,bj)-1)*2+1 )
./pkg/profiles/active_file_control_profiles.F 445 ACTIVE_WRITE_PROFILE_RL 
      err = NF_INQ_VARID(fid, prof_names(active_num_file,active_varnum),
./pkg/profiles/active_file_control_profiles.F 460 ACTIVE_WRITE_PROFILE_RL 
      write(fid,rec=( (irec-1)*prof_num_var_tot(active_num_file,bi,bj)
./pkg/profiles/active_file_control_profiles.F 461 ACTIVE_WRITE_PROFILE_RL 
     & +prof_num_var_cur(active_num_file,active_varnum,bi,bj)-1)*2+1 )
./pkg/profiles/active_file_control_profiles.F 58 ACTIVE_READ_PROFILE_RL 
      integer  nactive_var,active_num_file
./pkg/profiles/active_file_control_profiles.F 80 ACTIVE_READ_PROFILE_RL 
      err = NF_INQ_VARID(fid,prof_names(active_num_file,active_varnum),
./pkg/profiles/active_file_control_profiles.F 85 ACTIVE_READ_PROFILE_RL 
      err = NF_INQ_VARID(fid,prof_namesmask(active_num_file,
./pkg/profiles/active_file_control_profiles.F 92 ACTIVE_READ_PROFILE_RL 
      read(fid,rec=( (irec-1)*prof_num_var_tot(active_num_file,bi,bj)
./pkg/profiles/active_file_control_profiles.F 93 ACTIVE_READ_PROFILE_RL 
     & +prof_num_var_cur(active_num_file,active_varnum,bi,bj)-1)*2+1 )
./pkg/profiles/active_file_profiles.F 129 ACTIVE_WRITE_PROFILE 
      integer  nactive_var,active_num_file, active_varnum
./pkg/profiles/active_file_profiles.F 138 ACTIVE_WRITE_PROFILE 
      call ACTIVE_WRITE_PROFILE_RL( fidforward(active_num_file,bi,bj),
./pkg/profiles/active_file_profiles.F 139 ACTIVE_WRITE_PROFILE 
     &     active_num_file,
./pkg/profiles/active_file_profiles.F 141 ACTIVE_WRITE_PROFILE 
     &     irec, prof_ind_glob(active_num_file,irec,bi,bj),
./pkg/profiles/active_file_profiles.F 25 ACTIVE_READ_PROFILE 
     I                           active_num_file,
./pkg/profiles/active_file_profiles.F 63 ACTIVE_READ_PROFILE 
      integer  nactive_var,active_num_file
./pkg/profiles/active_file_profiles.F 73 ACTIVE_READ_PROFILE 
      call ACTIVE_READ_PROFILE_RL( fidforward(active_num_file,bi,bj),
./pkg/profiles/active_file_profiles.F 74 ACTIVE_READ_PROFILE 
     &     active_num_file,
./pkg/profiles/active_file_profiles.F 76 ACTIVE_READ_PROFILE 
     &     irec, prof_ind_glob(active_num_file,irec,bi,bj),
./pkg/profiles/active_file_profiles.F 91 ACTIVE_WRITE_PROFILE 
     I                           active_num_file,
./pkg/profiles/active_file_profiles_ad.F 126 ADACTIVE_WRITE_PROFILE 
      integer nadactive_var,active_num_file
./pkg/profiles/active_file_profiles_ad.F 138 ADACTIVE_WRITE_PROFILE 
      call ACTIVE_WRITE_PROFILE_RL( fidadjoint(active_num_file,bi,bj) ,
./pkg/profiles/active_file_profiles_ad.F 139 ADACTIVE_WRITE_PROFILE 
     &     active_num_file,
./pkg/profiles/active_file_profiles_ad.F 141 ADACTIVE_WRITE_PROFILE 
     &     irec, prof_ind_glob(active_num_file,irec,bi,bj),
./pkg/profiles/active_file_profiles_ad.F 22 ADACTIVE_READ_PROFILE 
     I                              active_num_file,
./pkg/profiles/active_file_profiles_ad.F 61 ADACTIVE_READ_PROFILE 
      integer nadactive_var,active_num_file
./pkg/profiles/active_file_profiles_ad.F 70 ADACTIVE_READ_PROFILE 
      call ACTIVE_READ_PROFILE_RL( fidadjoint(active_num_file,bi,bj) ,
./pkg/profiles/active_file_profiles_ad.F 71 ADACTIVE_READ_PROFILE 
     &     active_num_file,
./pkg/profiles/active_file_profiles_ad.F 73 ADACTIVE_READ_PROFILE 
     &     irec, prof_ind_glob(active_num_file,irec,bi,bj),
./pkg/profiles/active_file_profiles_ad.F 86 ADACTIVE_WRITE_PROFILE 
     I                              active_num_file,
./pkg/profiles/active_file_profiles_g.F 136 G_ACTIVE_WRITE_PROFILE 
      integer nactive_var,active_num_file
./pkg/profiles/active_file_profiles_g.F 147 G_ACTIVE_WRITE_PROFILE 
      call ACTIVE_WRITE_PROFILE_RL( fidforward(active_num_file,bi,bj) ,
./pkg/profiles/active_file_profiles_g.F 148 G_ACTIVE_WRITE_PROFILE 
     &     active_num_file,
./pkg/profiles/active_file_profiles_g.F 150 G_ACTIVE_WRITE_PROFILE 
     &     irec, prof_ind_glob(active_num_file,irec,bi,bj),
./pkg/profiles/active_file_profiles_g.F 153 G_ACTIVE_WRITE_PROFILE 
      call ACTIVE_WRITE_PROFILE_RL( fidtangent(active_num_file,bi,bj) ,
./pkg/profiles/active_file_profiles_g.F 154 G_ACTIVE_WRITE_PROFILE 
     &     active_num_file,
./pkg/profiles/active_file_profiles_g.F 156 G_ACTIVE_WRITE_PROFILE 
     &     irec, prof_ind_glob(active_num_file,irec,bi,bj),
./pkg/profiles/active_file_profiles_g.F 22 G_ACTIVE_READ_PROFILE 
     I                           active_num_file,
./pkg/profiles/active_file_profiles_g.F 67 G_ACTIVE_READ_PROFILE 
      integer irec,active_varnum,active_num_file
./pkg/profiles/active_file_profiles_g.F 75 G_ACTIVE_READ_PROFILE 
      call ACTIVE_READ_PROFILE_RL( fidforward(active_num_file,bi,bj),
./pkg/profiles/active_file_profiles_g.F 76 G_ACTIVE_READ_PROFILE 
     &     active_num_file,
./pkg/profiles/active_file_profiles_g.F 78 G_ACTIVE_READ_PROFILE 
     &     irec, prof_ind_glob(active_num_file,irec,bi,bj),
./pkg/profiles/active_file_profiles_g.F 81 G_ACTIVE_READ_PROFILE 
      call ACTIVE_READ_PROFILE_RL( fidtangent(active_num_file,bi,bj),
./pkg/profiles/active_file_profiles_g.F 82 G_ACTIVE_READ_PROFILE 
     &     active_num_file,
./pkg/profiles/active_file_profiles_g.F 84 G_ACTIVE_READ_PROFILE 
     &     irec, prof_ind_glob(active_num_file,irec,bi,bj),
./pkg/profiles/active_file_profiles_g.F 98 G_ACTIVE_WRITE_PROFILE 
     I                           active_num_file,