! written by plasma_state_gen.py
!   input: plasma_state_spec.dat, version id: 2.055
! *** do not edit *** (use code generator instead)


SUBROUTINE ps_print_category(ilun,iname)

  ! print category to which named item (iname) belongs
  ! any item which contains (iname) as a substring is printed

  implicit NONE

  integer, intent(in) :: ilun
  character*(*), intent(in) :: iname

  !------------------------------------
  ! local:

  character*32 :: uname  ! iname -> uppercase
  character*32 :: pname  ! iname in form to print
  integer :: ii,ict

  logical, save :: sym_init = .FALSE.
  character*32, dimension(:,:), allocatable, save :: sym_list

  !------------------------------------
  integer, parameter :: numsym = 765

  !------------------------------------

  if(.NOT.sym_init) then
     sym_init = .TRUE.
     allocate(sym_list(2,numsym))
     call ps_print_category_init1(2, numsym, sym_list)
     call ps_print_category_init2(2, numsym, sym_list)
     call ps_print_category_init3(2, numsym, sym_list)
     call ps_print_category_init4(2, numsym, sym_list)
     call ps_print_category_init5(2, numsym, sym_list)
     call ps_print_category_init6(2, numsym, sym_list)
     call ps_print_category_init7(2, numsym, sym_list)
     call ps_print_category_init8(2, numsym, sym_list)
  endif

  uname = iname
  call uupper(uname)

  ict = 0
  do ii=1,numsym
     if(index(sym_list(1,ii),trim(uname)).gt.0) then
        ict = ict + 1
        pname = adjustr(sym_list(1,ii))
        write(ilun,'(A)') "  "//pname//":  "//trim(sym_list(2,ii))
     endif
  enddo

  if(ict.eq.0) then
     write(ilun,*) ' *** nothing found for: '//trim(uname)
  endif

END SUBROUTINE ps_print_category

SUBROUTINE ps_print_category_init1(i1,i2,sym_list)
   implicit none
   integer,      intent(in)    :: i1,i2
   character*32, intent(inout) :: sym_list(i1,i2)

   sym_list(1,1) = 'ALLA_INDEX'; sym_list(2,1) = 'simulation_initialization'
   sym_list(1,2) = 'ALLA_NAME'; sym_list(2,2) = 'species_list'
   sym_list(1,3) = 'ALLA_TYPE'; sym_list(2,3) = 'species_list'
   sym_list(1,4) = 'ALL_INDEX'; sym_list(2,4) = 'simulation_initialization'
   sym_list(1,5) = 'ALL_NAME'; sym_list(2,5) = 'species_list'
   sym_list(1,6) = 'ALL_TYPE'; sym_list(2,6) = 'species_list'
   sym_list(1,7) = 'AMAXLH'; sym_list(2,7) = 'shot_configuration'
   sym_list(1,8) = 'AMINLH'; sym_list(2,8) = 'shot_configuration'
   sym_list(1,9) = 'ANG_HREF_COIL'; sym_list(2,9) = 'machine_description'
   sym_list(1,10) = 'ANG_VREF_COIL'; sym_list(2,10) = 'machine_description'
   sym_list(1,11) = 'ANOM_CODE_INFO'; sym_list(2,11) = 'simulation_initialization'
   sym_list(1,12) = 'ANOM_EVAR'; sym_list(2,12) = 'profile'
   sym_list(1,13) = 'ANT_MODEL'; sym_list(2,13) = 'machine_description'
   sym_list(1,14) = 'AP2_HALFHEIGHT'; sym_list(2,14) = 'machine_description'
   sym_list(1,15) = 'AP2_HALFWIDTH'; sym_list(2,15) = 'machine_description'
   sym_list(1,16) = 'AP2_HORIZ_OFFSET'; sym_list(2,16) = 'machine_description'
   sym_list(1,17) = 'AP2_VERT_OFFSET'; sym_list(2,17) = 'machine_description'
   sym_list(1,18) = 'APOLMAXLH'; sym_list(2,18) = 'shot_configuration'
   sym_list(1,19) = 'APOLMINLH'; sym_list(2,19) = 'shot_configuration'
   sym_list(1,20) = 'AP_HALFHEIGHT'; sym_list(2,20) = 'machine_description'
   sym_list(1,21) = 'AP_HALFWIDTH'; sym_list(2,21) = 'machine_description'
   sym_list(1,22) = 'AP_HORIZ_OFFSET'; sym_list(2,22) = 'machine_description'
   sym_list(1,23) = 'AP_VERT_OFFSET'; sym_list(2,23) = 'machine_description'
   sym_list(1,24) = 'AREA'; sym_list(2,24) = 'profile'
   sym_list(1,25) = 'ATORMAXLH'; sym_list(2,25) = 'shot_configuration'
   sym_list(1,26) = 'ATORMINLH'; sym_list(2,26) = 'shot_configuration'
   sym_list(1,27) = 'BALLOON_CODE'; sym_list(2,27) = 'item_list'
   sym_list(1,28) = 'BALLOON_MAPPER'; sym_list(2,28) = 'simulation_initialization'
   sym_list(1,29) = 'BALLOON_STABLE'; sym_list(2,29) = 'state_data'
   sym_list(1,30) = 'BALLOON_STATUS'; sym_list(2,30) = 'state_data'
   sym_list(1,31) = 'BALSTAB'; sym_list(2,31) = 'profile'
   sym_list(1,32) = 'BEAM_TYPE'; sym_list(2,32) = 'machine_description'
   sym_list(1,33) = 'BIDIFF_BPASS_CO'; sym_list(2,33) = 'profile'
   sym_list(1,34) = 'BIDIFF_BPASS_CTR'; sym_list(2,34) = 'profile'
   sym_list(1,35) = 'BIDIFF_BTRAP'; sym_list(2,35) = 'profile'
   sym_list(1,36) = 'BIDIFF_DPASS_CO'; sym_list(2,36) = 'profile'
   sym_list(1,37) = 'BIDIFF_DPASS_CTR'; sym_list(2,37) = 'profile'
   sym_list(1,38) = 'BIDIFF_DTRAP'; sym_list(2,38) = 'profile'
   sym_list(1,39) = 'BPHIRZ'; sym_list(2,39) = 'profile'
   sym_list(1,40) = 'BRRZ'; sym_list(2,40) = 'profile'
   sym_list(1,41) = 'BZRZ'; sym_list(2,41) = 'profile'
   sym_list(1,42) = 'B_AXIS'; sym_list(2,42) = 'state_data'
   sym_list(1,43) = 'B_AXIS_VAC'; sym_list(2,43) = 'state_data'
   sym_list(1,44) = 'B_HALFHEIGHT'; sym_list(2,44) = 'machine_description'
   sym_list(1,45) = 'B_HALFWIDTH'; sym_list(2,45) = 'machine_description'
   sym_list(1,46) = 'B_HDIVERGENCE'; sym_list(2,46) = 'machine_description'
   sym_list(1,47) = 'B_HFOCAL_LENGTH'; sym_list(2,47) = 'machine_description'
   sym_list(1,48) = 'B_MAX_LCFS'; sym_list(2,48) = 'state_data'
   sym_list(1,49) = 'B_MIN_LCFS'; sym_list(2,49) = 'state_data'
   sym_list(1,50) = 'B_SURFMAX'; sym_list(2,50) = 'profile'
   sym_list(1,51) = 'B_SURFMIN'; sym_list(2,51) = 'profile'
   sym_list(1,52) = 'B_VDIVERGENCE'; sym_list(2,52) = 'machine_description'
   sym_list(1,53) = 'B_VFOCAL_LENGTH'; sym_list(2,53) = 'machine_description'
   sym_list(1,54) = 'CDICRF'; sym_list(2,54) = 'profile'
   sym_list(1,55) = 'CDICRF_NPHI'; sym_list(2,55) = 'profile'
   sym_list(1,56) = 'CHIE_ANOM'; sym_list(2,56) = 'profile'
   sym_list(1,57) = 'CHIE_DRBM'; sym_list(2,57) = 'profile'
   sym_list(1,58) = 'CHIE_ETG'; sym_list(2,58) = 'profile'
   sym_list(1,59) = 'CHIE_GLF'; sym_list(2,59) = 'profile'
   sym_list(1,60) = 'CHIE_GTCNEO'; sym_list(2,60) = 'profile'
   sym_list(1,61) = 'CHIE_MMM71'; sym_list(2,61) = 'profile'
   sym_list(1,62) = 'CHIE_MTM'; sym_list(2,62) = 'profile'
   sym_list(1,63) = 'CHIE_NCLASS'; sym_list(2,63) = 'profile'
   sym_list(1,64) = 'CHIE_NEO'; sym_list(2,64) = 'profile'
   sym_list(1,65) = 'CHIE_NTM'; sym_list(2,65) = 'profile'
   sym_list(1,66) = 'CHIE_PALEO'; sym_list(2,66) = 'profile'
   sym_list(1,67) = 'CHIE_TGLF'; sym_list(2,67) = 'profile'
   sym_list(1,68) = 'CHIE_TRANS'; sym_list(2,68) = 'profile'
   sym_list(1,69) = 'CHIE_TRANSCAT'; sym_list(2,69) = 'profile'
   sym_list(1,70) = 'CHIE_W19'; sym_list(2,70) = 'profile'
   sym_list(1,71) = 'CHII_ANOM'; sym_list(2,71) = 'profile'
   sym_list(1,72) = 'CHII_DRBM'; sym_list(2,72) = 'profile'
   sym_list(1,73) = 'CHII_GLF'; sym_list(2,73) = 'profile'
   sym_list(1,74) = 'CHII_GTCNEO'; sym_list(2,74) = 'profile'
   sym_list(1,75) = 'CHII_MMM71'; sym_list(2,75) = 'profile'
   sym_list(1,76) = 'CHII_NCLASS'; sym_list(2,76) = 'profile'
   sym_list(1,77) = 'CHII_NEO'; sym_list(2,77) = 'profile'
   sym_list(1,78) = 'CHII_NTM'; sym_list(2,78) = 'profile'
   sym_list(1,79) = 'CHII_TGLF'; sym_list(2,79) = 'profile'
   sym_list(1,80) = 'CHII_TRANS'; sym_list(2,80) = 'profile'
   sym_list(1,81) = 'CHII_TRANSCAT'; sym_list(2,81) = 'profile'
   sym_list(1,82) = 'CHII_W19'; sym_list(2,82) = 'profile'
   sym_list(1,83) = 'CHIMO_TRANS'; sym_list(2,83) = 'profile'
   sym_list(1,84) = 'CHIMO_TRANSCAT'; sym_list(2,84) = 'profile'
   sym_list(1,85) = 'CHIPHI_ANOM'; sym_list(2,85) = 'profile'
   sym_list(1,86) = 'CHIPHI_DRBM'; sym_list(2,86) = 'profile'
   sym_list(1,87) = 'CHIPHI_GLF'; sym_list(2,87) = 'profile'
   sym_list(1,88) = 'CHIPHI_GTCNEO'; sym_list(2,88) = 'profile'
   sym_list(1,89) = 'CHIPHI_MMM71'; sym_list(2,89) = 'profile'
   sym_list(1,90) = 'CHIPHI_NEO'; sym_list(2,90) = 'profile'
   sym_list(1,91) = 'CHIPHI_TGLF'; sym_list(2,91) = 'profile'
   sym_list(1,92) = 'CHIPHI_W19'; sym_list(2,92) = 'profile'
   sym_list(1,93) = 'CHITHETA_MMM71'; sym_list(2,93) = 'profile'
   sym_list(1,94) = 'CIRCUIT_NAME'; sym_list(2,94) = 'item_list'
   sym_list(1,95) = 'COIL_APT'; sym_list(2,95) = 'state_data'
   sym_list(1,96) = 'COIL_IN_CIRCUIT'; sym_list(2,96) = 'machine_description'
   sym_list(1,97) = 'COIL_NAME'; sym_list(2,97) = 'item_list'
   sym_list(1,98) = 'COIL_RESISPT'; sym_list(2,98) = 'machine_description'
   sym_list(1,99) = 'CURBEAM'; sym_list(2,99) = 'profile'
   sym_list(1,100) = 'CURECH'; sym_list(2,100) = 'profile'
END SUBROUTINE ps_print_category_init1

SUBROUTINE ps_print_category_init2(i1,i2,sym_list)
   implicit none
   integer,      intent(in)    :: i1,i2
   character*32, intent(inout) :: sym_list(i1,i2)

   sym_list(1,101) = 'CURECH_SRC'; sym_list(2,101) = 'profile'
   sym_list(1,102) = 'CURFUSN'; sym_list(2,102) = 'profile'
   sym_list(1,103) = 'CURICH'; sym_list(2,103) = 'profile'
   sym_list(1,104) = 'CURLH'; sym_list(2,104) = 'profile'
   sym_list(1,105) = 'CURLH_SRC'; sym_list(2,105) = 'profile'
   sym_list(1,106) = 'CURMINO'; sym_list(2,106) = 'profile'
   sym_list(1,107) = 'CURR_BOOTSTRAP'; sym_list(2,107) = 'profile'
   sym_list(1,108) = 'CURR_OHMIC'; sym_list(2,108) = 'profile'
   sym_list(1,109) = 'CURT'; sym_list(2,109) = 'profile'
   sym_list(1,110) = 'CUR_DATA_INFO'; sym_list(2,110) = 'simulation_initialization'
   sym_list(1,111) = 'CUR_RW'; sym_list(2,111) = 'profile'
   sym_list(1,112) = 'D2R_GEO_DRHODTH'; sym_list(2,112) = 'derivative_profile'
   sym_list(1,113) = 'D2Z_GEO_DRHODTH'; sym_list(2,113) = 'derivative_profile'
   sym_list(1,114) = 'DB_MTM'; sym_list(2,114) = 'profile'
   sym_list(1,115) = 'DCUR_RW_DVLOOP'; sym_list(2,115) = 'profile'
   sym_list(1,116) = 'DELTAW_CODE'; sym_list(2,116) = 'item_list'
   sym_list(1,117) = 'DELTAW_MAPPER'; sym_list(2,117) = 'simulation_initialization'
   sym_list(1,118) = 'DELTAW_STABLE'; sym_list(2,118) = 'state_data'
   sym_list(1,119) = 'DELTAW_STATUS'; sym_list(2,119) = 'state_data'
   sym_list(1,120) = 'DIFB_FUSI'; sym_list(2,120) = 'profile'
   sym_list(1,121) = 'DIFB_NBI'; sym_list(2,121) = 'profile'
   sym_list(1,122) = 'DIFB_RFMI'; sym_list(2,122) = 'profile'
   sym_list(1,123) = 'DIFF_TRANS'; sym_list(2,123) = 'profile'
   sym_list(1,124) = 'DIFF_TRANSCAT'; sym_list(2,124) = 'profile'
   sym_list(1,125) = 'DIFNE_NCLASS'; sym_list(2,125) = 'profile'
   sym_list(1,126) = 'DIFNH_NCLASS'; sym_list(2,126) = 'profile'
   sym_list(1,127) = 'DIFNS_ANOM'; sym_list(2,127) = 'profile'
   sym_list(1,128) = 'DIFNS_DRBM'; sym_list(2,128) = 'profile'
   sym_list(1,129) = 'DIFNS_GLF'; sym_list(2,129) = 'profile'
   sym_list(1,130) = 'DIFNS_GTCNEO'; sym_list(2,130) = 'profile'
   sym_list(1,131) = 'DIFNS_MMM71'; sym_list(2,131) = 'profile'
   sym_list(1,132) = 'DIFNS_NCLASS'; sym_list(2,132) = 'profile'
   sym_list(1,133) = 'DIFNS_NEO'; sym_list(2,133) = 'profile'
   sym_list(1,134) = 'DIFNS_TGLF'; sym_list(2,134) = 'profile'
   sym_list(1,135) = 'DIFNS_W19'; sym_list(2,135) = 'profile'
   sym_list(1,136) = 'DIFNX_NCLASS'; sym_list(2,136) = 'profile'
   sym_list(1,137) = 'DIFNZ_MMM71'; sym_list(2,137) = 'profile'
   sym_list(1,138) = 'DIST_FUN'; sym_list(2,138) = 'state_data'
   sym_list(1,139) = 'DN0OUT'; sym_list(2,139) = 'state_data'
   sym_list(1,140) = 'DQEDGRDTE_TGLF'; sym_list(2,140) = 'profile'
   sym_list(1,141) = 'DQEDGRDTI_TGLF'; sym_list(2,141) = 'profile'
   sym_list(1,142) = 'DQIDGRDTE_TGLF'; sym_list(2,142) = 'profile'
   sym_list(1,143) = 'DQIDGRDTI_TGLF'; sym_list(2,143) = 'profile'
   sym_list(1,144) = 'DR0_MOMEQ_DRHO'; sym_list(2,144) = 'derivative_profile'
   sym_list(1,145) = 'DR_GEO_DRHO'; sym_list(2,145) = 'derivative_profile'
   sym_list(1,146) = 'DR_GEO_DTH'; sym_list(2,146) = 'derivative_profile'
   sym_list(1,147) = 'DXRJCOS_MOMEQ_DRHO'; sym_list(2,147) = 'derivative_profile'
   sym_list(1,148) = 'DXRJSIN_MOMEQ_DRHO'; sym_list(2,148) = 'derivative_profile'
   sym_list(1,149) = 'DXZJCOS_MOMEQ_DRHO'; sym_list(2,149) = 'derivative_profile'
   sym_list(1,150) = 'DXZJSIN_MOMEQ_DRHO'; sym_list(2,150) = 'derivative_profile'
   sym_list(1,151) = 'DX_FSHIELD'; sym_list(2,151) = 'machine_description'
   sym_list(1,152) = 'DZ0_MOMEQ_DRHO'; sym_list(2,152) = 'derivative_profile'
   sym_list(1,153) = 'DZ_GEO_DRHO'; sym_list(2,153) = 'derivative_profile'
   sym_list(1,154) = 'DZ_GEO_DTH'; sym_list(2,154) = 'derivative_profile'
   sym_list(1,155) = 'D_EINJ_STANDARD'; sym_list(2,155) = 'machine_description'
   sym_list(1,156) = 'D_FFULL_STANDARD'; sym_list(2,156) = 'machine_description'
   sym_list(1,157) = 'D_FHALF_STANDARD'; sym_list(2,157) = 'machine_description'
   sym_list(1,158) = 'E0_AV'; sym_list(2,158) = 'state_data'
   sym_list(1,159) = 'ECRF_SRC_NAME'; sym_list(2,159) = 'item_list'
   sym_list(1,160) = 'EC_BEAM_ELONGATION'; sym_list(2,160) = 'machine_description'
   sym_list(1,161) = 'EC_CODE_INFO'; sym_list(2,161) = 'simulation_initialization'
   sym_list(1,162) = 'EC_DATA_INFO'; sym_list(2,162) = 'simulation_initialization'
   sym_list(1,163) = 'EC_HALF_POWER_ANGLE'; sym_list(2,163) = 'machine_description'
   sym_list(1,164) = 'EC_OMODE_FRACTION'; sym_list(2,164) = 'shot_configuration'
   sym_list(1,165) = 'EC_PHI_AIM'; sym_list(2,165) = 'shot_configuration'
   sym_list(1,166) = 'EC_PRINC_CURV_HOR'; sym_list(2,166) = 'machine_description'
   sym_list(1,167) = 'EC_PRINC_CURV_VERT'; sym_list(2,167) = 'machine_description'
   sym_list(1,168) = 'EC_PRINC_WIDTH_HOR'; sym_list(2,168) = 'machine_description'
   sym_list(1,169) = 'EC_PRINC_WIDTH_VERT'; sym_list(2,169) = 'machine_description'
   sym_list(1,170) = 'EC_THETA_AIM'; sym_list(2,170) = 'shot_configuration'
   sym_list(1,171) = 'EE_MOBILITY_FACTOR'; sym_list(2,171) = 'profile'
   sym_list(1,172) = 'EINJ_MAX'; sym_list(2,172) = 'machine_description'
   sym_list(1,173) = 'EINJ_MIN'; sym_list(2,173) = 'machine_description'
   sym_list(1,174) = 'ELDOT'; sym_list(2,174) = 'state_data'
   sym_list(1,175) = 'ELONG'; sym_list(2,175) = 'profile'
   sym_list(1,176) = 'EPERP_BEAMI'; sym_list(2,176) = 'profile'
   sym_list(1,177) = 'EPERP_FUSI'; sym_list(2,177) = 'profile'
   sym_list(1,178) = 'EPERP_MINI'; sym_list(2,178) = 'profile'
   sym_list(1,179) = 'EPERP_RW'; sym_list(2,179) = 'profile'
   sym_list(1,180) = 'EPLL_BEAMI'; sym_list(2,180) = 'profile'
   sym_list(1,181) = 'EPLL_FUSI'; sym_list(2,181) = 'profile'
   sym_list(1,182) = 'EPLL_MINI'; sym_list(2,182) = 'profile'
   sym_list(1,183) = 'EPLL_RW'; sym_list(2,183) = 'profile'
   sym_list(1,184) = 'EPOT'; sym_list(2,184) = 'profile'
   sym_list(1,185) = 'EQDSK_FILE'; sym_list(2,185) = 'state_data'
   sym_list(1,186) = 'EQMOM_NUM'; sym_list(2,186) = 'item_list'
   sym_list(1,187) = 'EQ_CODE_INFO'; sym_list(2,187) = 'simulation_initialization'
   sym_list(1,188) = 'EQ_DATA_INFO'; sym_list(2,188) = 'simulation_initialization'
   sym_list(1,189) = 'ETA_PARALLEL'; sym_list(2,189) = 'profile'
   sym_list(1,190) = 'E_ANOM'; sym_list(2,190) = 'grid'
   sym_list(1,191) = 'E_ANOM2'; sym_list(2,191) = 'grid'
   sym_list(1,192) = 'FIDIFF_BPASS_CO'; sym_list(2,192) = 'profile'
   sym_list(1,193) = 'FIDIFF_BPASS_CTR'; sym_list(2,193) = 'profile'
   sym_list(1,194) = 'FIDIFF_BTRAP'; sym_list(2,194) = 'profile'
   sym_list(1,195) = 'FIDIFF_DPASS_CO'; sym_list(2,195) = 'profile'
   sym_list(1,196) = 'FIDIFF_DPASS_CTR'; sym_list(2,196) = 'profile'
   sym_list(1,197) = 'FIDIFF_DTRAP'; sym_list(2,197) = 'profile'
   sym_list(1,198) = 'FI_DEPLETION'; sym_list(2,198) = 'profile'
   sym_list(1,199) = 'FRACMIN'; sym_list(2,199) = 'simulation_initialization'
   sym_list(1,200) = 'FRACPSLH'; sym_list(2,200) = 'shot_configuration'
END SUBROUTINE ps_print_category_init2

SUBROUTINE ps_print_category_init3(i1,i2,sym_list)
   implicit none
   integer,      intent(in)    :: i1,i2
   character*32, intent(inout) :: sym_list(i1,i2)

   sym_list(1,201) = 'FRAC_FULL'; sym_list(2,201) = 'state_data'
   sym_list(1,202) = 'FRAC_HALF'; sym_list(2,202) = 'state_data'
   sym_list(1,203) = 'FREQ_DRBM'; sym_list(2,203) = 'profile'
   sym_list(1,204) = 'FREQ_EC'; sym_list(2,204) = 'shot_configuration'
   sym_list(1,205) = 'FREQ_GLF'; sym_list(2,205) = 'profile'
   sym_list(1,206) = 'FREQ_IC'; sym_list(2,206) = 'shot_configuration'
   sym_list(1,207) = 'FREQ_LH'; sym_list(2,207) = 'shot_configuration'
   sym_list(1,208) = 'FREQ_MAX_TGLF'; sym_list(2,208) = 'profile'
   sym_list(1,209) = 'FREQ_MMM71'; sym_list(2,209) = 'profile'
   sym_list(1,210) = 'FREQ_MTM'; sym_list(2,210) = 'profile'
   sym_list(1,211) = 'FREQ_TGLF'; sym_list(2,211) = 'profile'
   sym_list(1,212) = 'FUS_CODE_INFO'; sym_list(2,212) = 'simulation_initialization'
   sym_list(1,213) = 'GAMMA_LMHD'; sym_list(2,213) = 'state_data'
   sym_list(1,214) = 'GAMMA_NC'; sym_list(2,214) = 'profile'
   sym_list(1,215) = 'GAS_ATOM'; sym_list(2,215) = 'shot_configuration'
   sym_list(1,216) = 'GAS_CODE_INFO'; sym_list(2,216) = 'simulation_initialization'
   sym_list(1,217) = 'GB1'; sym_list(2,217) = 'profile'
   sym_list(1,218) = 'GB2'; sym_list(2,218) = 'profile'
   sym_list(1,219) = 'GB2I'; sym_list(2,219) = 'profile'
   sym_list(1,220) = 'GBR2'; sym_list(2,220) = 'profile'
   sym_list(1,221) = 'GEOMETRY'; sym_list(2,221) = 'machine_description'
   sym_list(1,222) = 'GLOBAL_LABEL'; sym_list(2,222) = 'simulation_initialization'
   sym_list(1,223) = 'GNCFB2H'; sym_list(2,223) = 'profile'
   sym_list(1,224) = 'GNCFH'; sym_list(2,224) = 'profile'
   sym_list(1,225) = 'GR1'; sym_list(2,225) = 'profile'
   sym_list(1,226) = 'GR2'; sym_list(2,226) = 'profile'
   sym_list(1,227) = 'GR2I'; sym_list(2,227) = 'profile'
   sym_list(1,228) = 'GR2RHO2'; sym_list(2,228) = 'profile'
   sym_list(1,229) = 'GR3I'; sym_list(2,229) = 'profile'
   sym_list(1,230) = 'GRHO1'; sym_list(2,230) = 'profile'
   sym_list(1,231) = 'GRHO2'; sym_list(2,231) = 'profile'
   sym_list(1,232) = 'GRHO2B2I'; sym_list(2,232) = 'profile'
   sym_list(1,233) = 'GRHO2R2I'; sym_list(2,233) = 'profile'
   sym_list(1,234) = 'GRHO2R3I'; sym_list(2,234) = 'profile'
   sym_list(1,235) = 'GRI'; sym_list(2,235) = 'profile'
   sym_list(1,236) = 'GRIRHOI'; sym_list(2,236) = 'profile'
   sym_list(1,237) = 'GROWTHRATE_DRBM'; sym_list(2,237) = 'profile'
   sym_list(1,238) = 'GROWTHRATE_GLF'; sym_list(2,238) = 'profile'
   sym_list(1,239) = 'GROWTHRATE_MAX_TGLF'; sym_list(2,239) = 'profile'
   sym_list(1,240) = 'GROWTHRATE_MMM71'; sym_list(2,240) = 'profile'
   sym_list(1,241) = 'GROWTHRATE_MTM'; sym_list(2,241) = 'profile'
   sym_list(1,242) = 'GROWTHRATE_TGLF'; sym_list(2,242) = 'profile'
   sym_list(1,243) = 'GROWTHRATE_VPAR'; sym_list(2,243) = 'profile'
   sym_list(1,244) = 'GS_NAME'; sym_list(2,244) = 'item_list'
   sym_list(1,245) = 'G_EQ'; sym_list(2,245) = 'profile'
   sym_list(1,246) = 'HEGRILH'; sym_list(2,246) = 'shot_configuration'
   sym_list(1,247) = 'HSIZE_COIL'; sym_list(2,247) = 'machine_description'
   sym_list(1,248) = 'H_EINJ_STANDARD'; sym_list(2,248) = 'machine_description'
   sym_list(1,249) = 'H_FFULL_STANDARD'; sym_list(2,249) = 'machine_description'
   sym_list(1,250) = 'H_FHALF_STANDARD'; sym_list(2,250) = 'machine_description'
   sym_list(1,251) = 'ICIRCUIT_COIL'; sym_list(2,251) = 'simulation_initialization'
   sym_list(1,252) = 'ICRF_SRC_NAME'; sym_list(2,252) = 'item_list'
   sym_list(1,253) = 'IC_CODE_INFO'; sym_list(2,253) = 'simulation_initialization'
   sym_list(1,254) = 'IC_DATA_INFO'; sym_list(2,254) = 'simulation_initialization'
   sym_list(1,255) = 'IMAG_ANT_COEF'; sym_list(2,255) = 'shot_configuration'
   sym_list(1,256) = 'IOTA'; sym_list(2,256) = 'profile'
   sym_list(1,257) = 'ISTHERMAL'; sym_list(2,257) = 'state_data'
   sym_list(1,258) = 'IS_RECYCLING'; sym_list(2,258) = 'shot_configuration'
   sym_list(1,259) = 'I_NPOLOIDAL'; sym_list(2,259) = 'shot_configuration'
   sym_list(1,260) = 'JDOTB'; sym_list(2,260) = 'profile'
   sym_list(1,261) = 'KCCW_BPHI'; sym_list(2,261) = 'shot_configuration'
   sym_list(1,262) = 'KCCW_JPHI'; sym_list(2,262) = 'shot_configuration'
   sym_list(1,263) = 'KDENS_RFMIN'; sym_list(2,263) = 'simulation_initialization'
   sym_list(1,264) = 'KVOLT_NBI'; sym_list(2,264) = 'state_data'
   sym_list(1,265) = 'KYRHOS_MTM'; sym_list(2,265) = 'profile'
   sym_list(1,266) = 'KYSPECTRUM_TGLF'; sym_list(2,266) = 'profile'
   sym_list(1,267) = 'LBSCAP'; sym_list(2,267) = 'machine_description'
   sym_list(1,268) = 'LBSCAP2'; sym_list(2,268) = 'machine_description'
   sym_list(1,269) = 'LBSCTAN'; sym_list(2,269) = 'machine_description'
   sym_list(1,270) = 'LHRF_SRC_NAME'; sym_list(2,270) = 'item_list'
   sym_list(1,271) = 'LH_CODE_INFO'; sym_list(2,271) = 'simulation_initialization'
   sym_list(1,272) = 'LH_DATA_INFO'; sym_list(2,272) = 'simulation_initialization'
   sym_list(1,273) = 'LMHD_EQ_CODE'; sym_list(2,273) = 'simulation_initialization'
   sym_list(1,274) = 'LMHD_STATUS'; sym_list(2,274) = 'state_data'
   sym_list(1,275) = 'LOCK_MACHINE_DESCR'; sym_list(2,275) = 'state_data'
   sym_list(1,276) = 'LOCK_SHOT_CONFIG'; sym_list(2,276) = 'state_data'
   sym_list(1,277) = 'LOCK_SIM_INIT'; sym_list(2,277) = 'state_data'
   sym_list(1,278) = 'LPOL'; sym_list(2,278) = 'profile'
   sym_list(1,279) = 'MAX_NRZ_ANTGEO'; sym_list(2,279) = 'enumeration_limit'
   sym_list(1,280) = 'MAX_NSPECTRUMLH_SRC'; sym_list(2,280) = 'enumeration_limit'
   sym_list(1,281) = 'MAX_NUM_NPHI'; sym_list(2,281) = 'enumeration_limit'
   sym_list(1,282) = 'MAX_NUM_NPHI_VAC'; sym_list(2,282) = 'enumeration_limit'
   sym_list(1,283) = 'MAX_N_STRAPS'; sym_list(2,283) = 'enumeration_limit'
   sym_list(1,284) = 'MERCIER_STABLE'; sym_list(2,284) = 'state_data'
   sym_list(1,285) = 'MHD_EQ_STATUS'; sym_list(2,285) = 'state_data'
   sym_list(1,286) = 'MMODES'; sym_list(2,286) = 'item_list'
   sym_list(1,287) = 'M_ALL'; sym_list(2,287) = 'species_list'
   sym_list(1,288) = 'M_ALLA'; sym_list(2,288) = 'species_list'
   sym_list(1,289) = 'M_RFMIN'; sym_list(2,289) = 'species_list'
   sym_list(1,290) = 'M_S'; sym_list(2,290) = 'species_list'
   sym_list(1,291) = 'M_SA'; sym_list(2,291) = 'species_list'
   sym_list(1,292) = 'M_SFUS'; sym_list(2,292) = 'species_list'
   sym_list(1,293) = 'M_SGAS'; sym_list(2,293) = 'species_list'
   sym_list(1,294) = 'M_SIMP0'; sym_list(2,294) = 'species_list'
   sym_list(1,295) = 'M_SIMPI'; sym_list(2,295) = 'species_list'
   sym_list(1,296) = 'M_SNBI'; sym_list(2,296) = 'species_list'
   sym_list(1,297) = 'N0NORM'; sym_list(2,297) = 'profile'
   sym_list(1,298) = 'N0_HALO'; sym_list(2,298) = 'profile'
   sym_list(1,299) = 'N0_RECO'; sym_list(2,299) = 'profile'
   sym_list(1,300) = 'NBALLOON'; sym_list(2,300) = 'item_list'
END SUBROUTINE ps_print_category_init3

SUBROUTINE ps_print_category_init4(i1,i2,sym_list)
   implicit none
   integer,      intent(in)    :: i1,i2
   character*32, intent(inout) :: sym_list(i1,i2)

   sym_list(1,301) = 'NBAP2_SHAPE'; sym_list(2,301) = 'machine_description'
   sym_list(1,302) = 'NBAP_SHAPE'; sym_list(2,302) = 'machine_description'
   sym_list(1,303) = 'NBEAM'; sym_list(2,303) = 'item_list'
   sym_list(1,304) = 'NBEAMI'; sym_list(2,304) = 'profile'
   sym_list(1,305) = 'NBEAMI_BDY'; sym_list(2,305) = 'state_data'
   sym_list(1,306) = 'NBION'; sym_list(2,306) = 'shot_configuration'
   sym_list(1,307) = 'NBION_TRACE'; sym_list(2,307) = 'shot_configuration'
   sym_list(1,308) = 'NBI_CODE_INFO'; sym_list(2,308) = 'simulation_initialization'
   sym_list(1,309) = 'NBI_DATA_INFO'; sym_list(2,309) = 'simulation_initialization'
   sym_list(1,310) = 'NBI_SRC_NAME'; sym_list(2,310) = 'item_list'
   sym_list(1,311) = 'NBSHAPE'; sym_list(2,311) = 'machine_description'
   sym_list(1,312) = 'NCIRCUITS'; sym_list(2,312) = 'item_list'
   sym_list(1,313) = 'NCOILS'; sym_list(2,313) = 'item_list'
   sym_list(1,314) = 'NDELTA_W'; sym_list(2,314) = 'item_list'
   sym_list(1,315) = 'NEBAR'; sym_list(2,315) = 'state_data'
   sym_list(1,316) = 'NECRF_SRC'; sym_list(2,316) = 'item_list'
   sym_list(1,317) = 'NEFI_ANOM'; sym_list(2,317) = 'grid'
   sym_list(1,318) = 'NEFI_ANOM2'; sym_list(2,318) = 'grid'
   sym_list(1,319) = 'NEFLUX_KY_TGLF'; sym_list(2,319) = 'profile'
   sym_list(1,320) = 'NEQMOM'; sym_list(2,320) = 'item_list'
   sym_list(1,321) = 'NEWCOMB_CODE'; sym_list(2,321) = 'item_list'
   sym_list(1,322) = 'NEWCOMB_MAPPER'; sym_list(2,322) = 'simulation_initialization'
   sym_list(1,323) = 'NEWCOMB_STABLE'; sym_list(2,323) = 'state_data'
   sym_list(1,324) = 'NEWCOMB_STATUS'; sym_list(2,324) = 'state_data'
   sym_list(1,325) = 'NE_KY_TGLF'; sym_list(2,325) = 'profile'
   sym_list(1,326) = 'NFUSI'; sym_list(2,326) = 'profile'
   sym_list(1,327) = 'NFUSI_BDY'; sym_list(2,327) = 'state_data'
   sym_list(1,328) = 'NGRADB2_AV'; sym_list(2,328) = 'profile'
   sym_list(1,329) = 'NGSC0'; sym_list(2,329) = 'item_list'
   sym_list(1,330) = 'NI'; sym_list(2,330) = 'profile'
   sym_list(1,331) = 'NICRF_SRC'; sym_list(2,331) = 'item_list'
   sym_list(1,332) = 'NIFLUX_KY_TGLF'; sym_list(2,332) = 'profile'
   sym_list(1,333) = 'NI_KY_TGLF'; sym_list(2,333) = 'profile'
   sym_list(1,334) = 'NKY_ANOMTH'; sym_list(2,334) = 'simulation_initialization'
   sym_list(1,335) = 'NKY_MMM'; sym_list(2,335) = 'simulation_initialization'
   sym_list(1,336) = 'NLHRF_SRC'; sym_list(2,336) = 'item_list'
   sym_list(1,337) = 'NMDIFB'; sym_list(2,337) = 'state_data'
   sym_list(1,338) = 'NMINI'; sym_list(2,338) = 'profile'
   sym_list(1,339) = 'NMINI_BDY'; sym_list(2,339) = 'state_data'
   sym_list(1,340) = 'NMODEL'; sym_list(2,340) = 'profile'
   sym_list(1,341) = 'NMODEL_BDY'; sym_list(2,341) = 'state_data'
   sym_list(1,342) = 'NMOM'; sym_list(2,342) = 'simulation_initialization'
   sym_list(1,343) = 'NNEWCOMB'; sym_list(2,343) = 'item_list'
   sym_list(1,344) = 'NNKPARLH'; sym_list(2,344) = 'shot_configuration'
   sym_list(1,345) = 'NNKPOLLH'; sym_list(2,345) = 'shot_configuration'
   sym_list(1,346) = 'NNKTORLH'; sym_list(2,346) = 'shot_configuration'
   sym_list(1,347) = 'NPHI'; sym_list(2,347) = 'shot_configuration'
   sym_list(1,348) = 'NPSMOM'; sym_list(2,348) = 'item_list'
   sym_list(1,349) = 'NR'; sym_list(2,349) = 'grid'
   sym_list(1,350) = 'NRHO'; sym_list(2,350) = 'grid'
   sym_list(1,351) = 'NRHO_ANOM'; sym_list(2,351) = 'grid'
   sym_list(1,352) = 'NRHO_ANOM2'; sym_list(2,352) = 'grid'
   sym_list(1,353) = 'NRHO_ANOMTH'; sym_list(2,353) = 'grid'
   sym_list(1,354) = 'NRHO_ECRF'; sym_list(2,354) = 'grid'
   sym_list(1,355) = 'NRHO_EQ'; sym_list(2,355) = 'grid'
   sym_list(1,356) = 'NRHO_EQ_GEO'; sym_list(2,356) = 'grid'
   sym_list(1,357) = 'NRHO_FUS'; sym_list(2,357) = 'grid'
   sym_list(1,358) = 'NRHO_GAS'; sym_list(2,358) = 'grid'
   sym_list(1,359) = 'NRHO_ICRF'; sym_list(2,359) = 'grid'
   sym_list(1,360) = 'NRHO_LHRF'; sym_list(2,360) = 'grid'
   sym_list(1,361) = 'NRHO_LMHD'; sym_list(2,361) = 'grid'
   sym_list(1,362) = 'NRHO_MIST'; sym_list(2,362) = 'grid'
   sym_list(1,363) = 'NRHO_NBI'; sym_list(2,363) = 'grid'
   sym_list(1,364) = 'NRHO_PEL'; sym_list(2,364) = 'grid'
   sym_list(1,365) = 'NRHO_RAD'; sym_list(2,365) = 'grid'
   sym_list(1,366) = 'NRHO_RW'; sym_list(2,366) = 'grid'
   sym_list(1,367) = 'NRW'; sym_list(2,367) = 'profile'
   sym_list(1,368) = 'NRZ_ANTGEO'; sym_list(2,368) = 'machine_description'
   sym_list(1,369) = 'NR_RIP'; sym_list(2,369) = 'grid'
   sym_list(1,370) = 'NS'; sym_list(2,370) = 'profile'
   sym_list(1,371) = 'NSPECTRUMLH_SRC'; sym_list(2,371) = 'shot_configuration'
   sym_list(1,372) = 'NSPEC_ALL'; sym_list(2,372) = 'species_list'
   sym_list(1,373) = 'NSPEC_ALLA'; sym_list(2,373) = 'species_list'
   sym_list(1,374) = 'NSPEC_BEAM'; sym_list(2,374) = 'species_list'
   sym_list(1,375) = 'NSPEC_FUSION'; sym_list(2,375) = 'species_list'
   sym_list(1,376) = 'NSPEC_GAS'; sym_list(2,376) = 'species_list'
   sym_list(1,377) = 'NSPEC_IMP0'; sym_list(2,377) = 'species_list'
   sym_list(1,378) = 'NSPEC_IMPI'; sym_list(2,378) = 'species_list'
   sym_list(1,379) = 'NSPEC_RFMIN'; sym_list(2,379) = 'species_list'
   sym_list(1,380) = 'NSPEC_TH'; sym_list(2,380) = 'species_list'
   sym_list(1,381) = 'NSPEC_THA'; sym_list(2,381) = 'species_list'
   sym_list(1,382) = 'NS_BDY'; sym_list(2,382) = 'state_data'
   sym_list(1,383) = 'NS_DATA_INFO'; sym_list(2,383) = 'simulation_initialization'
   sym_list(1,384) = 'NS_IS_INPUT'; sym_list(2,384) = 'state_data'
   sym_list(1,385) = 'NTF_COIL2'; sym_list(2,385) = 'machine_description'
   sym_list(1,386) = 'NTF_COILS'; sym_list(2,386) = 'machine_description'
   sym_list(1,387) = 'NTHINLH'; sym_list(2,387) = 'shot_configuration'
   sym_list(1,388) = 'NTH_EQ'; sym_list(2,388) = 'grid'
   sym_list(1,389) = 'NTRCAT'; sym_list(2,389) = 'item_list'
   sym_list(1,390) = 'NTURNS'; sym_list(2,390) = 'machine_description'
   sym_list(1,391) = 'NUM_NPHI'; sym_list(2,391) = 'shot_configuration'
   sym_list(1,392) = 'NUM_NPHI_VAC'; sym_list(2,392) = 'shot_configuration'
   sym_list(1,393) = 'NUM_RZLIM'; sym_list(2,393) = 'machine_description'
   sym_list(1,394) = 'NXS'; sym_list(2,394) = 'item_list'
   sym_list(1,395) = 'NZ'; sym_list(2,395) = 'grid'
   sym_list(1,396) = 'NZFLUX_KY_TGLF'; sym_list(2,396) = 'profile'
   sym_list(1,397) = 'NZ_KY_TGLF'; sym_list(2,397) = 'profile'
   sym_list(1,398) = 'NZ_RIP'; sym_list(2,398) = 'grid'
   sym_list(1,399) = 'N_D_EINJ_STANDARD'; sym_list(2,399) = 'machine_description'
   sym_list(1,400) = 'N_H_EINJ_STANDARD'; sym_list(2,400) = 'machine_description'
END SUBROUTINE ps_print_category_init4

SUBROUTINE ps_print_category_init5(i1,i2,sym_list)
   implicit none
   integer,      intent(in)    :: i1,i2
   character*32, intent(inout) :: sym_list(i1,i2)

   sym_list(1,401) = 'N_STRAPS'; sym_list(2,401) = 'shot_configuration'
   sym_list(1,402) = 'N_T_EINJ_STANDARD'; sym_list(2,402) = 'machine_description'
   sym_list(1,403) = 'OMEG0CX'; sym_list(2,403) = 'profile'
   sym_list(1,404) = 'OMEG0SC0'; sym_list(2,404) = 'profile'
   sym_list(1,405) = 'OMEG0_HALO'; sym_list(2,405) = 'profile'
   sym_list(1,406) = 'OMEG0_RECO'; sym_list(2,406) = 'profile'
   sym_list(1,407) = 'OMEGAT'; sym_list(2,407) = 'profile'
   sym_list(1,408) = 'OMEGAT_BDY'; sym_list(2,408) = 'state_data'
   sym_list(1,409) = 'OMEGA_EXB'; sym_list(2,409) = 'profile'
   sym_list(1,410) = 'P0_RECO'; sym_list(2,410) = 'profile'
   sym_list(1,411) = 'PB0_HALO'; sym_list(2,411) = 'profile'
   sym_list(1,412) = 'PBE'; sym_list(2,412) = 'profile'
   sym_list(1,413) = 'PBI'; sym_list(2,413) = 'profile'
   sym_list(1,414) = 'PBTH'; sym_list(2,414) = 'profile'
   sym_list(1,415) = 'PCX_HALO'; sym_list(2,415) = 'profile'
   sym_list(1,416) = 'PCX_RECO'; sym_list(2,416) = 'profile'
   sym_list(1,417) = 'PEECH'; sym_list(2,417) = 'profile'
   sym_list(1,418) = 'PEECH_SRC'; sym_list(2,418) = 'profile'
   sym_list(1,419) = 'PELH'; sym_list(2,419) = 'profile'
   sym_list(1,420) = 'PELH_SRC'; sym_list(2,420) = 'profile'
   sym_list(1,421) = 'PEL_CODE_INFO'; sym_list(2,421) = 'simulation_initialization'
   sym_list(1,422) = 'PEL_DATA_INFO'; sym_list(2,422) = 'simulation_initialization'
   sym_list(1,423) = 'PE_ANOM'; sym_list(2,423) = 'profile'
   sym_list(1,424) = 'PE_TRANS'; sym_list(2,424) = 'profile'
   sym_list(1,425) = 'PE_TRANSCAT'; sym_list(2,425) = 'profile'
   sym_list(1,426) = 'PFUSE'; sym_list(2,426) = 'profile'
   sym_list(1,427) = 'PFUSI'; sym_list(2,427) = 'profile'
   sym_list(1,428) = 'PFUSTH'; sym_list(2,428) = 'profile'
   sym_list(1,429) = 'PHIBSC'; sym_list(2,429) = 'machine_description'
   sym_list(1,430) = 'PHIFLUX_KY_TGLF'; sym_list(2,430) = 'profile'
   sym_list(1,431) = 'PHIGRILH'; sym_list(2,431) = 'shot_configuration'
   sym_list(1,432) = 'PHIT'; sym_list(2,432) = 'profile'
   sym_list(1,433) = 'PHI_EC_LAUNCH'; sym_list(2,433) = 'machine_description'
   sym_list(1,434) = 'PICRF_ABS'; sym_list(2,434) = 'state_data'
   sym_list(1,435) = 'PICRF_EXT'; sym_list(2,435) = 'state_data'
   sym_list(1,436) = 'PICRF_NPHI_SRCS'; sym_list(2,436) = 'profile'
   sym_list(1,437) = 'PICRF_SRCS'; sym_list(2,437) = 'profile'
   sym_list(1,438) = 'PICRF_TOTALS'; sym_list(2,438) = 'profile'
   sym_list(1,439) = 'PICTH'; sym_list(2,439) = 'profile'
   sym_list(1,440) = 'PILH'; sym_list(2,440) = 'profile'
   sym_list(1,441) = 'PILH_SRC'; sym_list(2,441) = 'profile'
   sym_list(1,442) = 'PI_ANOM'; sym_list(2,442) = 'profile'
   sym_list(1,443) = 'PI_TRANS'; sym_list(2,443) = 'profile'
   sym_list(1,444) = 'PI_TRANSCAT'; sym_list(2,444) = 'profile'
   sym_list(1,445) = 'PLASMA_CODE_INFO'; sym_list(2,445) = 'simulation_initialization'
   sym_list(1,446) = 'PMINE'; sym_list(2,446) = 'profile'
   sym_list(1,447) = 'PMINI'; sym_list(2,447) = 'profile'
   sym_list(1,448) = 'PMINTH'; sym_list(2,448) = 'profile'
   sym_list(1,449) = 'POHME'; sym_list(2,449) = 'profile'
   sym_list(1,450) = 'POT_KY_TGLF'; sym_list(2,450) = 'profile'
   sym_list(1,451) = 'POWER_EC'; sym_list(2,451) = 'state_data'
   sym_list(1,452) = 'POWER_IC'; sym_list(2,452) = 'state_data'
   sym_list(1,453) = 'POWER_LH'; sym_list(2,453) = 'state_data'
   sym_list(1,454) = 'POWER_NBI'; sym_list(2,454) = 'state_data'
   sym_list(1,455) = 'POWER_NBI_TRACE'; sym_list(2,455) = 'state_data'
   sym_list(1,456) = 'PRAD'; sym_list(2,456) = 'profile'
   sym_list(1,457) = 'PRAD_BR'; sym_list(2,457) = 'profile'
   sym_list(1,458) = 'PRAD_CY'; sym_list(2,458) = 'profile'
   sym_list(1,459) = 'PRAD_LI'; sym_list(2,459) = 'profile'
   sym_list(1,460) = 'PSC_HALO'; sym_list(2,460) = 'profile'
   sym_list(1,461) = 'PSC_RECO'; sym_list(2,461) = 'profile'
   sym_list(1,462) = 'PSIPOL'; sym_list(2,462) = 'profile'
   sym_list(1,463) = 'PSIRZ'; sym_list(2,463) = 'profile'
   sym_list(1,464) = 'PSI_TO_MACHINE_AXIS'; sym_list(2,464) = 'state_data'
   sym_list(1,465) = 'PSMOM_ERRCK'; sym_list(2,465) = 'profile'
   sym_list(1,466) = 'PSMOM_NC'; sym_list(2,466) = 'profile'
   sym_list(1,467) = 'PSMOM_NUM'; sym_list(2,467) = 'item_list'
   sym_list(1,468) = 'P_EQ'; sym_list(2,468) = 'profile'
   sym_list(1,469) = 'QATOM_ALL'; sym_list(2,469) = 'species_list'
   sym_list(1,470) = 'QATOM_ALLA'; sym_list(2,470) = 'species_list'
   sym_list(1,471) = 'QATOM_RFMIN'; sym_list(2,471) = 'species_list'
   sym_list(1,472) = 'QATOM_S'; sym_list(2,472) = 'species_list'
   sym_list(1,473) = 'QATOM_SA'; sym_list(2,473) = 'species_list'
   sym_list(1,474) = 'QATOM_SFUS'; sym_list(2,474) = 'species_list'
   sym_list(1,475) = 'QATOM_SGAS'; sym_list(2,475) = 'species_list'
   sym_list(1,476) = 'QATOM_SIMP0'; sym_list(2,476) = 'species_list'
   sym_list(1,477) = 'QATOM_SIMPI'; sym_list(2,477) = 'species_list'
   sym_list(1,478) = 'QATOM_SNBI'; sym_list(2,478) = 'species_list'
   sym_list(1,479) = 'QBEAMI'; sym_list(2,479) = 'profile'
   sym_list(1,480) = 'QCOMP_E'; sym_list(2,480) = 'profile'
   sym_list(1,481) = 'QCOMP_I'; sym_list(2,481) = 'profile'
   sym_list(1,482) = 'QIE'; sym_list(2,482) = 'profile'
   sym_list(1,483) = 'QIONIZ'; sym_list(2,483) = 'profile'
   sym_list(1,484) = 'QL_OPERATOR'; sym_list(2,484) = 'state_data'
   sym_list(1,485) = 'QQCX'; sym_list(2,485) = 'profile'
   sym_list(1,486) = 'QROT_CONV'; sym_list(2,486) = 'profile'
   sym_list(1,487) = 'QROT_DIFF'; sym_list(2,487) = 'profile'
   sym_list(1,488) = 'Q_ALL'; sym_list(2,488) = 'species_list'
   sym_list(1,489) = 'Q_ALLA'; sym_list(2,489) = 'species_list'
   sym_list(1,490) = 'Q_EQ'; sym_list(2,490) = 'profile'
   sym_list(1,491) = 'Q_RFMIN'; sym_list(2,491) = 'species_list'
   sym_list(1,492) = 'Q_S'; sym_list(2,492) = 'species_list'
   sym_list(1,493) = 'Q_SA'; sym_list(2,493) = 'species_list'
   sym_list(1,494) = 'Q_SFUS'; sym_list(2,494) = 'species_list'
   sym_list(1,495) = 'Q_SGAS'; sym_list(2,495) = 'species_list'
   sym_list(1,496) = 'Q_SIMP0'; sym_list(2,496) = 'species_list'
   sym_list(1,497) = 'Q_SIMPI'; sym_list(2,497) = 'species_list'
   sym_list(1,498) = 'Q_SNBI'; sym_list(2,498) = 'species_list'
   sym_list(1,499) = 'R0_MOMEQ'; sym_list(2,499) = 'profile'
   sym_list(1,500) = 'RAD_CODE_INFO'; sym_list(2,500) = 'simulation_initialization'
END SUBROUTINE ps_print_category_init5

SUBROUTINE ps_print_category_init6(i1,i2,sym_list)
   implicit none
   integer,      intent(in)    :: i1,i2
   character*32, intent(inout) :: sym_list(i1,i2)

   sym_list(1,501) = 'RAD_DATA_INFO'; sym_list(2,501) = 'simulation_initialization'
   sym_list(1,502) = 'RATE_SINB0I'; sym_list(2,502) = 'profile'
   sym_list(1,503) = 'RATE_SINB0X'; sym_list(2,503) = 'profile'
   sym_list(1,504) = 'RATE_SINB0XS'; sym_list(2,504) = 'profile'
   sym_list(1,505) = 'RATE_SINF0I'; sym_list(2,505) = 'profile'
   sym_list(1,506) = 'RATE_SINF0X'; sym_list(2,506) = 'profile'
   sym_list(1,507) = 'RATE_SINF0XS'; sym_list(2,507) = 'profile'
   sym_list(1,508) = 'REAL_ANT_COEF'; sym_list(2,508) = 'shot_configuration'
   sym_list(1,509) = 'RES_SN'; sym_list(2,509) = 'profile'
   sym_list(1,510) = 'RES_TE'; sym_list(2,510) = 'profile'
   sym_list(1,511) = 'RES_TI'; sym_list(2,511) = 'profile'
   sym_list(1,512) = 'RES_TQ'; sym_list(2,512) = 'profile'
   sym_list(1,513) = 'RFMIN_NAME'; sym_list(2,513) = 'species_list'
   sym_list(1,514) = 'RFMIN_TO_ALL'; sym_list(2,514) = 'simulation_initialization'
   sym_list(1,515) = 'RFMIN_TO_ALLA'; sym_list(2,515) = 'simulation_initialization'
   sym_list(1,516) = 'RFMIN_TYPE'; sym_list(2,516) = 'species_list'
   sym_list(1,517) = 'RHO'; sym_list(2,517) = 'grid'
   sym_list(1,518) = 'RHOPSI0LH'; sym_list(2,518) = 'shot_configuration'
   sym_list(1,519) = 'RHO_ANOM'; sym_list(2,519) = 'grid'
   sym_list(1,520) = 'RHO_ANOM2'; sym_list(2,520) = 'grid'
   sym_list(1,521) = 'RHO_ANOMTH'; sym_list(2,521) = 'grid'
   sym_list(1,522) = 'RHO_BDY_NS'; sym_list(2,522) = 'state_data'
   sym_list(1,523) = 'RHO_BDY_OMEGAT'; sym_list(2,523) = 'state_data'
   sym_list(1,524) = 'RHO_BDY_TE'; sym_list(2,524) = 'state_data'
   sym_list(1,525) = 'RHO_BDY_TI'; sym_list(2,525) = 'state_data'
   sym_list(1,526) = 'RHO_ECRF'; sym_list(2,526) = 'grid'
   sym_list(1,527) = 'RHO_EQ'; sym_list(2,527) = 'grid'
   sym_list(1,528) = 'RHO_EQ_GEO'; sym_list(2,528) = 'grid'
   sym_list(1,529) = 'RHO_FUS'; sym_list(2,529) = 'grid'
   sym_list(1,530) = 'RHO_GAS'; sym_list(2,530) = 'grid'
   sym_list(1,531) = 'RHO_ICRF'; sym_list(2,531) = 'grid'
   sym_list(1,532) = 'RHO_LHRF'; sym_list(2,532) = 'grid'
   sym_list(1,533) = 'RHO_LMHD'; sym_list(2,533) = 'grid'
   sym_list(1,534) = 'RHO_MIST'; sym_list(2,534) = 'grid'
   sym_list(1,535) = 'RHO_NBI'; sym_list(2,535) = 'grid'
   sym_list(1,536) = 'RHO_PEL'; sym_list(2,536) = 'grid'
   sym_list(1,537) = 'RHO_RAD'; sym_list(2,537) = 'grid'
   sym_list(1,538) = 'RHO_RW'; sym_list(2,538) = 'grid'
   sym_list(1,539) = 'RLIM'; sym_list(2,539) = 'machine_description'
   sym_list(1,540) = 'RLOC_COIL'; sym_list(2,540) = 'machine_description'
   sym_list(1,541) = 'RMAJOR_MEAN'; sym_list(2,541) = 'profile'
   sym_list(1,542) = 'RMINOR_MEAN'; sym_list(2,542) = 'profile'
   sym_list(1,543) = 'RUNAWAY_CODE_INFO'; sym_list(2,543) = 'simulation_initialization'
   sym_list(1,544) = 'RUNID'; sym_list(2,544) = 'simulation_initialization'
   sym_list(1,545) = 'R_ANT'; sym_list(2,545) = 'shot_configuration'
   sym_list(1,546) = 'R_ANTGEO'; sym_list(2,546) = 'machine_description'
   sym_list(1,547) = 'R_AXIS'; sym_list(2,547) = 'state_data'
   sym_list(1,548) = 'R_EC_LAUNCH'; sym_list(2,548) = 'machine_description'
   sym_list(1,549) = 'R_GEO'; sym_list(2,549) = 'profile'
   sym_list(1,550) = 'R_GRID'; sym_list(2,550) = 'grid'
   sym_list(1,551) = 'R_MAX_BOX'; sym_list(2,551) = 'machine_description'
   sym_list(1,552) = 'R_MAX_LCFS'; sym_list(2,552) = 'state_data'
   sym_list(1,553) = 'R_MIDP_IN'; sym_list(2,553) = 'profile'
   sym_list(1,554) = 'R_MIDP_OUT'; sym_list(2,554) = 'profile'
   sym_list(1,555) = 'R_MIN_BOX'; sym_list(2,555) = 'machine_description'
   sym_list(1,556) = 'R_MIN_LCFS'; sym_list(2,556) = 'state_data'
   sym_list(1,557) = 'R_RIPPLE'; sym_list(2,557) = 'grid'
   sym_list(1,558) = 'R_SURFMAX'; sym_list(2,558) = 'profile'
   sym_list(1,559) = 'R_SURFMIN'; sym_list(2,559) = 'profile'
   sym_list(1,560) = 'S0RECO'; sym_list(2,560) = 'profile'
   sym_list(1,561) = 'S0RECO_E'; sym_list(2,561) = 'profile'
   sym_list(1,562) = 'S0RECO_RECAP'; sym_list(2,562) = 'profile'
   sym_list(1,563) = 'SA_INDEX'; sym_list(2,563) = 'simulation_initialization'
   sym_list(1,564) = 'SA_NAME'; sym_list(2,564) = 'species_list'
   sym_list(1,565) = 'SA_TYPE'; sym_list(2,565) = 'species_list'
   sym_list(1,566) = 'SB0HALO'; sym_list(2,566) = 'profile'
   sym_list(1,567) = 'SB0HALO_RECAP'; sym_list(2,567) = 'profile'
   sym_list(1,568) = 'SBEDEP'; sym_list(2,568) = 'profile'
   sym_list(1,569) = 'SBEHALO'; sym_list(2,569) = 'profile'
   sym_list(1,570) = 'SBSCE'; sym_list(2,570) = 'profile'
   sym_list(1,571) = 'SBTHERM'; sym_list(2,571) = 'profile'
   sym_list(1,572) = 'SC0'; sym_list(2,572) = 'state_data'
   sym_list(1,573) = 'SC0_TO_SGAS'; sym_list(2,573) = 'simulation_initialization'
   sym_list(1,574) = 'SC_ANOM'; sym_list(2,574) = 'profile'
   sym_list(1,575) = 'SFSCE'; sym_list(2,575) = 'profile'
   sym_list(1,576) = 'SFTHERM'; sym_list(2,576) = 'profile'
   sym_list(1,577) = 'SFUS_NAME'; sym_list(2,577) = 'species_list'
   sym_list(1,578) = 'SFUS_TO_ALL'; sym_list(2,578) = 'simulation_initialization'
   sym_list(1,579) = 'SFUS_TO_ALLA'; sym_list(2,579) = 'simulation_initialization'
   sym_list(1,580) = 'SFUS_TYPE'; sym_list(2,580) = 'species_list'
   sym_list(1,581) = 'SGAS_NAME'; sym_list(2,581) = 'species_list'
   sym_list(1,582) = 'SGAS_TO_S'; sym_list(2,582) = 'simulation_initialization'
   sym_list(1,583) = 'SGAS_TYPE'; sym_list(2,583) = 'species_list'
   sym_list(1,584) = 'SHOT_NUMBER'; sym_list(2,584) = 'shot_configuration'
   sym_list(1,585) = 'SII_XS'; sym_list(2,585) = 'profile'
   sym_list(1,586) = 'SIMP0_NAME'; sym_list(2,586) = 'species_list'
   sym_list(1,587) = 'SIMP0_TO_S'; sym_list(2,587) = 'simulation_initialization'
   sym_list(1,588) = 'SIMP0_TYPE'; sym_list(2,588) = 'species_list'
   sym_list(1,589) = 'SIMPI_NAME'; sym_list(2,589) = 'species_list'
   sym_list(1,590) = 'SIMPI_TO_S'; sym_list(2,590) = 'simulation_initialization'
   sym_list(1,591) = 'SIMPI_TYPE'; sym_list(2,591) = 'species_list'
   sym_list(1,592) = 'SNBI_NAME'; sym_list(2,592) = 'species_list'
   sym_list(1,593) = 'SNBI_TO_ALL'; sym_list(2,593) = 'simulation_initialization'
   sym_list(1,594) = 'SNBI_TO_ALLA'; sym_list(2,594) = 'simulation_initialization'
   sym_list(1,595) = 'SNBI_TYPE'; sym_list(2,595) = 'species_list'
   sym_list(1,596) = 'SN_TRANS'; sym_list(2,596) = 'profile'
   sym_list(1,597) = 'SN_TRANSCAT'; sym_list(2,597) = 'profile'
   sym_list(1,598) = 'SPROF0'; sym_list(2,598) = 'profile'
   sym_list(1,599) = 'SPROF0E'; sym_list(2,599) = 'profile'
   sym_list(1,600) = 'SPSCE'; sym_list(2,600) = 'profile'
END SUBROUTINE ps_print_category_init6

SUBROUTINE ps_print_category_init7(i1,i2,sym_list)
   implicit none
   integer,      intent(in)    :: i1,i2
   character*32, intent(inout) :: sym_list(i1,i2)

   sym_list(1,601) = 'SQUARELO'; sym_list(2,601) = 'profile'
   sym_list(1,602) = 'SQUAREUO'; sym_list(2,602) = 'profile'
   sym_list(1,603) = 'SRTCEN'; sym_list(2,603) = 'machine_description'
   sym_list(1,604) = 'SURF'; sym_list(2,604) = 'profile'
   sym_list(1,605) = 'S_NAME'; sym_list(2,605) = 'species_list'
   sym_list(1,606) = 'S_TO_SA'; sym_list(2,606) = 'simulation_initialization'
   sym_list(1,607) = 'S_TYPE'; sym_list(2,607) = 'species_list'
   sym_list(1,608) = 'T0'; sym_list(2,608) = 'state_data'
   sym_list(1,609) = 'T0CX'; sym_list(2,609) = 'profile'
   sym_list(1,610) = 'T0SC0'; sym_list(2,610) = 'profile'
   sym_list(1,611) = 'T0_HALO'; sym_list(2,611) = 'profile'
   sym_list(1,612) = 'T0_RECO'; sym_list(2,612) = 'profile'
   sym_list(1,613) = 'T1'; sym_list(2,613) = 'state_data'
   sym_list(1,614) = 'TEFLUX_KY_TGLF'; sym_list(2,614) = 'profile'
   sym_list(1,615) = 'TE_BDY'; sym_list(2,615) = 'state_data'
   sym_list(1,616) = 'TE_KY_TGLF'; sym_list(2,616) = 'profile'
   sym_list(1,617) = 'TFINAL'; sym_list(2,617) = 'simulation_initialization'
   sym_list(1,618) = 'TFRIP2_LOG'; sym_list(2,618) = 'profile'
   sym_list(1,619) = 'TFRIP_LOG'; sym_list(2,619) = 'profile'
   sym_list(1,620) = 'TF_DATA_INFO'; sym_list(2,620) = 'simulation_initialization'
   sym_list(1,621) = 'THEGRILH'; sym_list(2,621) = 'shot_configuration'
   sym_list(1,622) = 'TH_EQ'; sym_list(2,622) = 'grid'
   sym_list(1,623) = 'TI'; sym_list(2,623) = 'profile'
   sym_list(1,624) = 'TIFLUX_KY_TGLF'; sym_list(2,624) = 'profile'
   sym_list(1,625) = 'TINIT'; sym_list(2,625) = 'simulation_initialization'
   sym_list(1,626) = 'TI_BDY'; sym_list(2,626) = 'state_data'
   sym_list(1,627) = 'TI_KY_TGLF'; sym_list(2,627) = 'profile'
   sym_list(1,628) = 'TMODEL'; sym_list(2,628) = 'profile'
   sym_list(1,629) = 'TMODEL_BDY'; sym_list(2,629) = 'state_data'
   sym_list(1,630) = 'TOKAMAK_ID'; sym_list(2,630) = 'machine_description'
   sym_list(1,631) = 'TORNUM_BALCRIT'; sym_list(2,631) = 'state_data'
   sym_list(1,632) = 'TOR_MODE_LABEL'; sym_list(2,632) = 'item_list'
   sym_list(1,633) = 'TOR_MODE_NO'; sym_list(2,633) = 'simulation_initialization'
   sym_list(1,634) = 'TQ0_RECO'; sym_list(2,634) = 'profile'
   sym_list(1,635) = 'TQB0_HALO'; sym_list(2,635) = 'profile'
   sym_list(1,636) = 'TQBE'; sym_list(2,636) = 'profile'
   sym_list(1,637) = 'TQBI'; sym_list(2,637) = 'profile'
   sym_list(1,638) = 'TQBJXB'; sym_list(2,638) = 'profile'
   sym_list(1,639) = 'TQBTH'; sym_list(2,639) = 'profile'
   sym_list(1,640) = 'TQCX_HALO'; sym_list(2,640) = 'profile'
   sym_list(1,641) = 'TQCX_RECO'; sym_list(2,641) = 'profile'
   sym_list(1,642) = 'TQIONIZ'; sym_list(2,642) = 'profile'
   sym_list(1,643) = 'TQQCX'; sym_list(2,643) = 'profile'
   sym_list(1,644) = 'TQSC_HALO'; sym_list(2,644) = 'profile'
   sym_list(1,645) = 'TQSC_RECO'; sym_list(2,645) = 'profile'
   sym_list(1,646) = 'TQ_ANOM'; sym_list(2,646) = 'profile'
   sym_list(1,647) = 'TQ_TRANS'; sym_list(2,647) = 'profile'
   sym_list(1,648) = 'TQ_TRANSCAT'; sym_list(2,648) = 'profile'
   sym_list(1,649) = 'TRACE_FLAG'; sym_list(2,649) = 'simulation_initialization'
   sym_list(1,650) = 'TRCAT'; sym_list(2,650) = 'item_list'
   sym_list(1,651) = 'TRIANG'; sym_list(2,651) = 'profile'
   sym_list(1,652) = 'TRIANGL'; sym_list(2,652) = 'profile'
   sym_list(1,653) = 'TRIANGU'; sym_list(2,653) = 'profile'
   sym_list(1,654) = 'TRIANG_MILLER_L'; sym_list(2,654) = 'profile'
   sym_list(1,655) = 'TRIANG_MILLER_U'; sym_list(2,655) = 'profile'
   sym_list(1,656) = 'TRMODELS'; sym_list(2,656) = 'simulation_initialization'
   sym_list(1,657) = 'TS'; sym_list(2,657) = 'profile'
   sym_list(1,658) = 'TS_DATA_INFO'; sym_list(2,658) = 'simulation_initialization'
   sym_list(1,659) = 'TS_IS_INPUT'; sym_list(2,659) = 'state_data'
   sym_list(1,660) = 'TZFLUX_KY_TGLF'; sym_list(2,660) = 'profile'
   sym_list(1,661) = 'TZ_KY_TGLF'; sym_list(2,661) = 'profile'
   sym_list(1,662) = 'T_EINJ_STANDARD'; sym_list(2,662) = 'machine_description'
   sym_list(1,663) = 'T_FFULL_STANDARD'; sym_list(2,663) = 'machine_description'
   sym_list(1,664) = 'T_FHALF_STANDARD'; sym_list(2,664) = 'machine_description'
   sym_list(1,665) = 'UPWIND_PFRAC_NS'; sym_list(2,665) = 'profile'
   sym_list(1,666) = 'UPWIND_PFRAC_OMEGA'; sym_list(2,666) = 'profile'
   sym_list(1,667) = 'UPWIND_PFRAC_TE'; sym_list(2,667) = 'profile'
   sym_list(1,668) = 'UPWIND_PFRAC_TI'; sym_list(2,668) = 'profile'
   sym_list(1,669) = 'VEE_TRANS'; sym_list(2,669) = 'profile'
   sym_list(1,670) = 'VEE_TRANSCAT'; sym_list(2,670) = 'profile'
   sym_list(1,671) = 'VELB_FUSI'; sym_list(2,671) = 'profile'
   sym_list(1,672) = 'VELB_NBI'; sym_list(2,672) = 'profile'
   sym_list(1,673) = 'VELB_RFMI'; sym_list(2,673) = 'profile'
   sym_list(1,674) = 'VELNE_NCLASS'; sym_list(2,674) = 'profile'
   sym_list(1,675) = 'VELNH_NCLASS'; sym_list(2,675) = 'profile'
   sym_list(1,676) = 'VELNI_DRBM'; sym_list(2,676) = 'profile'
   sym_list(1,677) = 'VELNS_ANOM'; sym_list(2,677) = 'profile'
   sym_list(1,678) = 'VELNS_GLF'; sym_list(2,678) = 'profile'
   sym_list(1,679) = 'VELNS_GTCNEO'; sym_list(2,679) = 'profile'
   sym_list(1,680) = 'VELNS_MMM71'; sym_list(2,680) = 'profile'
   sym_list(1,681) = 'VELNS_NCLASS'; sym_list(2,681) = 'profile'
   sym_list(1,682) = 'VELNS_NEO'; sym_list(2,682) = 'profile'
   sym_list(1,683) = 'VELNS_TGLF'; sym_list(2,683) = 'profile'
   sym_list(1,684) = 'VELNX_NCLASS'; sym_list(2,684) = 'profile'
   sym_list(1,685) = 'VELPPHI_ANOM'; sym_list(2,685) = 'profile'
   sym_list(1,686) = 'VELPPHI_GLF'; sym_list(2,686) = 'profile'
   sym_list(1,687) = 'VELPPHI_GTCNEO'; sym_list(2,687) = 'profile'
   sym_list(1,688) = 'VELPPHI_MMM71'; sym_list(2,688) = 'profile'
   sym_list(1,689) = 'VELPPHI_NEO'; sym_list(2,689) = 'profile'
   sym_list(1,690) = 'VELPPHI_TGLF'; sym_list(2,690) = 'profile'
   sym_list(1,691) = 'VELTE_ANOM'; sym_list(2,691) = 'profile'
   sym_list(1,692) = 'VELTE_GLF'; sym_list(2,692) = 'profile'
   sym_list(1,693) = 'VELTE_GTCNEO'; sym_list(2,693) = 'profile'
   sym_list(1,694) = 'VELTE_MMM71'; sym_list(2,694) = 'profile'
   sym_list(1,695) = 'VELTE_NCLASS'; sym_list(2,695) = 'profile'
   sym_list(1,696) = 'VELTE_NEO'; sym_list(2,696) = 'profile'
   sym_list(1,697) = 'VELTE_PALEO'; sym_list(2,697) = 'profile'
   sym_list(1,698) = 'VELTE_TGLF'; sym_list(2,698) = 'profile'
   sym_list(1,699) = 'VELTI_ANOM'; sym_list(2,699) = 'profile'
   sym_list(1,700) = 'VELTI_GLF'; sym_list(2,700) = 'profile'
END SUBROUTINE ps_print_category_init7

SUBROUTINE ps_print_category_init8(i1,i2,sym_list)
   implicit none
   integer,      intent(in)    :: i1,i2
   character*32, intent(inout) :: sym_list(i1,i2)

   sym_list(1,701) = 'VELTI_GTCNEO'; sym_list(2,701) = 'profile'
   sym_list(1,702) = 'VELTI_MMM71'; sym_list(2,702) = 'profile'
   sym_list(1,703) = 'VELTI_NCLASS'; sym_list(2,703) = 'profile'
   sym_list(1,704) = 'VELTI_NEO'; sym_list(2,704) = 'profile'
   sym_list(1,705) = 'VELTI_TGLF'; sym_list(2,705) = 'profile'
   sym_list(1,706) = 'VIE_TRANS'; sym_list(2,706) = 'profile'
   sym_list(1,707) = 'VIE_TRANSCAT'; sym_list(2,707) = 'profile'
   sym_list(1,708) = 'VMO_TRANS'; sym_list(2,708) = 'profile'
   sym_list(1,709) = 'VMO_TRANSCAT'; sym_list(2,709) = 'profile'
   sym_list(1,710) = 'VN_TRANS'; sym_list(2,710) = 'profile'
   sym_list(1,711) = 'VN_TRANSCAT'; sym_list(2,711) = 'profile'
   sym_list(1,712) = 'VOL'; sym_list(2,712) = 'profile'
   sym_list(1,713) = 'VPHI0_AV'; sym_list(2,713) = 'state_data'
   sym_list(1,714) = 'VPOL_DATA_INFO'; sym_list(2,714) = 'simulation_initialization'
   sym_list(1,715) = 'VPOL_INMP'; sym_list(2,715) = 'profile'
   sym_list(1,716) = 'VPOL_IS_INPUT'; sym_list(2,716) = 'state_data'
   sym_list(1,717) = 'VPOL_OMP'; sym_list(2,717) = 'profile'
   sym_list(1,718) = 'VREP_COIL_COUNT'; sym_list(2,718) = 'machine_description'
   sym_list(1,719) = 'VREP_COIL_SPACING'; sym_list(2,719) = 'machine_description'
   sym_list(1,720) = 'VSIZE_COIL'; sym_list(2,720) = 'machine_description'
   sym_list(1,721) = 'VSUR'; sym_list(2,721) = 'state_data'
   sym_list(1,722) = 'VSUR_DATA_INFO'; sym_list(2,722) = 'simulation_initialization'
   sym_list(1,723) = 'VTOR_DATA_INFO'; sym_list(2,723) = 'simulation_initialization'
   sym_list(1,724) = 'VTOR_INMP'; sym_list(2,724) = 'profile'
   sym_list(1,725) = 'VTOR_IS_INPUT'; sym_list(2,725) = 'state_data'
   sym_list(1,726) = 'VTOR_OMP'; sym_list(2,726) = 'profile'
   sym_list(1,727) = 'V_LOOP'; sym_list(2,727) = 'profile'
   sym_list(1,728) = 'V_PARS'; sym_list(2,728) = 'profile'
   sym_list(1,729) = 'V_PERS'; sym_list(2,729) = 'profile'
   sym_list(1,730) = 'WT_NPHI'; sym_list(2,730) = 'shot_configuration'
   sym_list(1,731) = 'WT_NPHI_ABS'; sym_list(2,731) = 'state_data'
   sym_list(1,732) = 'WT_NPHI_EXT'; sym_list(2,732) = 'state_data'
   sym_list(1,733) = 'XRJCOS_MOMEQ'; sym_list(2,733) = 'profile'
   sym_list(1,734) = 'XRJSIN_MOMEQ'; sym_list(2,734) = 'profile'
   sym_list(1,735) = 'XS'; sym_list(2,735) = 'state_data'
   sym_list(1,736) = 'XS_NAME'; sym_list(2,736) = 'item_list'
   sym_list(1,737) = 'XZJCOS_MOMEQ'; sym_list(2,737) = 'profile'
   sym_list(1,738) = 'XZJSIN_MOMEQ'; sym_list(2,738) = 'profile'
   sym_list(1,739) = 'Z0MAX'; sym_list(2,739) = 'simulation_initialization'
   sym_list(1,740) = 'Z0_MOMEQ'; sym_list(2,740) = 'profile'
   sym_list(1,741) = 'ZBAP'; sym_list(2,741) = 'machine_description'
   sym_list(1,742) = 'ZBSC'; sym_list(2,742) = 'machine_description'
   sym_list(1,743) = 'ZEFF'; sym_list(2,743) = 'profile'
   sym_list(1,744) = 'ZEFF_DATA_INFO'; sym_list(2,744) = 'simulation_initialization'
   sym_list(1,745) = 'ZEFF_FI'; sym_list(2,745) = 'profile'
   sym_list(1,746) = 'ZEFF_TH'; sym_list(2,746) = 'profile'
   sym_list(1,747) = 'ZIMP1'; sym_list(2,747) = 'simulation_initialization'
   sym_list(1,748) = 'ZIMP2'; sym_list(2,748) = 'simulation_initialization'
   sym_list(1,749) = 'ZLIM'; sym_list(2,749) = 'machine_description'
   sym_list(1,750) = 'ZLOC_COIL'; sym_list(2,750) = 'machine_description'
   sym_list(1,751) = 'Z_ANT'; sym_list(2,751) = 'shot_configuration'
   sym_list(1,752) = 'Z_ANTGEO'; sym_list(2,752) = 'machine_description'
   sym_list(1,753) = 'Z_AXIS'; sym_list(2,753) = 'state_data'
   sym_list(1,754) = 'Z_EC_LAUNCH'; sym_list(2,754) = 'machine_description'
   sym_list(1,755) = 'Z_GEO'; sym_list(2,755) = 'profile'
   sym_list(1,756) = 'Z_GRID'; sym_list(2,756) = 'grid'
   sym_list(1,757) = 'Z_MAX_BOX'; sym_list(2,757) = 'machine_description'
   sym_list(1,758) = 'Z_MAX_LCFS'; sym_list(2,758) = 'state_data'
   sym_list(1,759) = 'Z_MIDP'; sym_list(2,759) = 'profile'
   sym_list(1,760) = 'Z_MID_ANT'; sym_list(2,760) = 'shot_configuration'
   sym_list(1,761) = 'Z_MIN_BOX'; sym_list(2,761) = 'machine_description'
   sym_list(1,762) = 'Z_MIN_LCFS'; sym_list(2,762) = 'state_data'
   sym_list(1,763) = 'Z_RIPPLE'; sym_list(2,763) = 'grid'
   sym_list(1,764) = 'Z_SURFMAX'; sym_list(2,764) = 'profile'
   sym_list(1,765) = 'Z_SURFMIN'; sym_list(2,765) = 'profile'
END SUBROUTINE ps_print_category_init8
