! written by nbigen.py
! *** do not edit *** (use nbigen.py instead)
 
subroutine nbi_fld_bufget
 
  use nbi_com
  use nbi_bcastbuf
  use nbi_random
  use rngdef
  use nbi_idhdr
  implicit NONE
  integer :: inumi,inumr,inumc,inuml
  integer :: NBI_STATE_INDX
  real(double), dimension(0:rng_k-1) :: NBI_STATE_ARR
 
  inumi=0
  inumr=0
  inumc=0
  inuml=0
 
  call getdat(init_sys,inuml)
  call getdat(runid,inumc)
  call getdat(mission,inumc)
  call getdat(workpath,inumc)
  call getdat(nonlin,inumi)
  call getdat(nseed,inumi)
  call getdat(nlbout,inuml)
  call getdat(lunnbx,inumi)
  call getdat(lunres,inumi)
  call getdat(mrstrt,inumi)
  call getdat(nclass,inumi)
  call getdat(only_io,inuml)
  call getdat(ref_namelist,inuml)
  call getdat(quasi_check,inuml)
  call getdat(nltest_output,inuml)
  call getdat(BLK_MPI_BCAST_INT,inumi)
  call getdat(BLK_MPI_BCAST_R8,inumi)
  call getdat(init_times,inuml)
  call getdat(tbm1,inumr)
  call getdat(tbm2,inumr)
  call getdat(init_grid,inuml)
  call getdat(nzones,inumi)
  call getdat(nzone_fb,inumi)
  call getdat(nlsym2b,inuml)
  call getdat(nth0,inumi)
  call getdat(xbmbnd,inumr)
  call getdat(id_mcgrid,inumi)
  call getdat(nthets,inumi)
  call getdat(ebdmax,inumr)
  call getdat(xplasma_in_memory,inumi)
  call getdat(nznbma,inumi)
  call getdat(nznbme,inumi)
  call getdat(nznbma0,inumi)
  call getdat(nznbme0,inumi)
  call getdat(ngyro,inumi)
  call getdat(init_beams,inuml)
  call getdat(ngmax,inumi)
  call getdat(backz,inumr)
  call getdat(aplasm,inumr)
  call getdat(nbeam,inumi)
  call getdat(xzbeama,inumr)
  call getdat(abeama,inumr)
  call getdat(nlco,inuml)
  call getdat(ntrace,inumi)
  call getdat(rtcena,inumr)
  call getdat(xlbtna,inumr)
  call getdat(xybsca,inumr)
  call getdat(xbzeta,inumr)
  call getdat(nbshapa,inumi)
  call getdat(bmwidra,inumr)
  call getdat(bmwidza,inumr)
  call getdat(divra,inumr)
  call getdat(divza,inumr)
  call getdat(foclra,inumr)
  call getdat(foclza,inumr)
  call getdat(nbapsha,inumi)
  call getdat(rapedga,inumr)
  call getdat(xzpedga,inumr)
  call getdat(xlbapa,inumr)
  call getdat(xybapa,inumr)
  call getdat(xrapoffa,inumr)
  call getdat(xzapoffa,inumr)
  call getdat(nbapsh2,inumi)
  call getdat(rapedg2,inumr)
  call getdat(xzpedg2,inumr)
  call getdat(xlbapa2,inumr)
  call getdat(xrapoff2,inumr)
  call getdat(xzapoff2,inumr)
  call getdat(init_impurity,inuml)
  call getdat(nrhix,inumi)
  call getdat(xzimpx,inumr)
  call getdat(aimpx,inumr)
  call getdat(init_minority,inuml)
  call getdat(nmini,inumi)
  call getdat(xzmini,inumr)
  call getdat(amini,inumr)
  call getdat(nthrf,inumi)
  call getdat(init_powers,inuml)
  call getdat(einjmin,inumr)
  call getdat(einja,inumr)
  call getdat(pinja,inumr)
  call getdat(ffulla,inumr)
  call getdat(fhalfa,inumr)
  call getdat(orbrzv_toric_Prftot0,inumr)
  call getdat(orbrzv_toric_frnm,inumr)
  call getdat(init_fusion,inuml)
  call getdat(nlfhe3,inuml)
  call getdat(nlfhe4,inuml)
  call getdat(nlfst,inuml)
  call getdat(nlfsp,inuml)
  call getdat(nlfsp14,inuml)
  call getdat(nlusf3,inuml)
  call getdat(xdatsf3,inumr)
  call getdat(nlusfa,inuml)
  call getdat(xdatsfa,inumr)
  call getdat(nlusft,inuml)
  call getdat(xdatsft,inumr)
  call getdat(nlusfp,inuml)
  call getdat(xdatsfp,inumr)
  call getdat(nlusfp14,inuml)
  call getdat(xdatsp3,inumr)
  call getdat(plfhe3,inumr)
  call getdat(plfhe4,inumr)
  call getdat(plfst,inumr)
  call getdat(plfsp,inumr)
  call getdat(plfsp14,inumr)
  call getdat(nlfatom,inuml)
  call getdat(init_fpp,inuml)
  call getdat(nlbfpp,inuml)
  call getdat(init_num,inuml)
  call getdat(cxsplt,inumr)
  call getdat(dxbsmoo,inumr)
  call getdat(dxbsm_nc,inumr)
  call getdat(nptcls,inumi)
  call getdat(nptclf,inumi)
  call getdat(nptclh,inumi)
  call getdat(NFAST_MAP,inumi)
  call getdat(xpand_nptcl,inumr)
  call getdat(frac_depmax,inumr)
  call getdat(frac_dep_lim,inumr)
  call getdat(frac_depmin,inumr)
  call getdat(frac_orbrr,inumr)
  call getdat(nptcl_max,inumi)
  call getdat(nltrk_dep0,inuml)
  call getdat(NLDEP0_GATHER,inuml)
  call getdat(ndep0,inumi)
  call getdat(NDEP0_MAX,inumi)
  call getdat(ndep_set_beam,inumi)
  call getdat(ndep_set_ien,inumi)
  call getdat(nbbcal,inumi)
  call getdat(ncx0,inumi)
  call getdat(nper_cx,inumi)
  call getdat(LEV_NBIDEP,inumi)
  call getdat(LEV_TTNUK,inumi)
  call getdat(LEVMOD_HALO,inumi)
  call getdat(NSPLT,inumi)
  call getdat(NSPLT_GEO,inumi)
  call getdat(NSPLT_KIN,inumi)
  call getdat(NSPLT_GEN,inumi)
  call getdat(nmimp,inumi)
  call getdat(AIMP,inumr)
  call getdat(XZIMP,inumr)
  call getdat(NTEST_MAX,inumi)
  call getdat(BI_MAX_PL,inumr)
  call getdat(BI_MAX_PR,inumr)
  call getdat(wghta,inumr)
  call getdat(goocon,inumr)
  call getdat(NGOOCON_VPVBIN,inumi)
  call getdat(NGOOCON_EBIN,inumi)
  call getdat(NGOOCON_RBIN,inumi)
  call getdat(cxpcon,inumr)
  call getdat(fppcon,inumr)
  call getdat(fdtnxy,inumr)
  call getdat(nchdvp,inumi)
  call getdat(dtn,inumr)
  call getdat(dt_acc,inumr)
  call getdat(orbrzv_option,inumi)
  call getdat(orbrzv_rf_option,inumi)
  call getdat(nlmcrf_on,inuml)
  call getdat(orbrzv_nr,inumi)
  call getdat(orbrzv_nz,inumi)
  call getdat(orbrzv_zzerr_con,inumr)
  call getdat(init_atomic,inuml)
  call getdat(nsmax,inumi)
  call getdat(khalo,inumi)
  call getdat(dn0out,inumr)
  call getdat(nmsigx,inumi)
  call getdat(nlminsv,inuml)
  call getdat(nlebei,inuml)
  call getdat(nsigexc,inumi)
  call getdat(xdepmod,inumr)
  call getdat(nlbbcx,inuml)
  call getdat(nbbcx_avg,inumi)
  call getdat(nbbcx_bb,inumi)
  call getdat(nbfallgr,inumi)
  call getdat(nlbeamcx,inuml)
  call getdat(nlhvion,inuml)
  call getdat(init_collid,inuml)
  call getdat(xcfanbi,inumr)
  call getdat(xdfanbi,inumr)
  call getdat(xefanbi,inumr)
  call getdat(xcfafus,inumr)
  call getdat(xdfafus,inumr)
  call getdat(xefafus,inumr)
  call getdat(nlbcde,inuml)
  call getdat(nlbcoh,inuml)
  call getdat(nlbcpa,inuml)
  call getdat(nlorbo,inuml)
  call getdat(init_flr,inuml)
  call getdat(nlbflr,inuml)
  call getdat(nlfbmflr,inuml)
  call nbi_alloc2_init
  call getdat(nlbgflr,inuml)
  call getdat(gflr_min,inumr)
  call getdat(gflr_rl,inumr)
  call getdat(gflr_ll,inumr)
  call getdat(gflr_xv,inumr)
  call getdat(gflr_op,inumr)
  call getdat(init_saw,inuml)
  call getdat(sawflag,inuml)
  call getdat(nlsawb,inuml)
  call getdat(nlsawf,inuml)
  call getdat(xswfrac_allfast,inumr)
  call getdat(xswfrac_beam,inumr)
  call getdat(xswfrac_fusn,inumr)
  call getdat(nmix_kdsaw,inumi)
  call getdat(fporcelli,inumr)
  call getdat(init_adif,inuml)
  call getdat(nkaep,inumi)
  call getdat(AEP_ASCALE,inumr)
  call getdat(AEP_USCALE,inumr)
  call getdat(TAEP_FAC,inumr)
  call getdat(nmdifb,inumi)
  call getdat(nkdifb,inumi)
  call getdat(ndifbe,inumi)
  call getdat(fdifbe,inumr)
  call getdat(edifbe,inumr)
  call getdat(x_qlim0,inumr)
  call getdat(ndifbe_2d,inumi)
  call getdat(dif2d_conv,inumr)
  call getdat(dif2d_dpa,inumr)
  call getdat(ngradd_opt,inumi)
  call getdat(init_ripple,inuml)
  call getdat(nrip,inumi)
  call getdat(taurip,inumr)
  call getdat(id_ripple,inumi)
  call getdat(id_ripple2,inumi)
  call getdat(ncoils,inumi)
  call getdat(ncoils_2,inumi)
  call getdat(asrd,inumr)
  call getdat(bsrd,inumr)
  call getdat(init_outcon,inuml)
  call getdat(nerngfi,inumi)
  call getdat(erngfi,inumr)
  call getdat(nsdbgb,inumi)
  call getdat(init_fishbone,inuml)
  call getdat(nlfbon,inuml)
  call getdat(fbemin,inumr)
  call getdat(fbemax,inumr)
  call getdat(fvpvmn,inumr)
  call getdat(fvpvmx,inumr)
  call getdat(fbltim,inumr)
  call getdat(fshper,inumr)
  call getdat(fshwid,inumr)
  call getdat(tfshon,inumr)
  call getdat(tfshof,inumr)
  call getdat(xfishmin,inumr)
  call getdat(xfishmax,inumr)
  call getdat(nfbon_vpvopt,inumi)
  call getdat(fbtrap_depth,inumr)
  call getdat(nfbon_species,inumi)
  call getdat(init_box,inuml)
  call getdat(nbbox,inumi)
  call getdat(nbsbox,inumi)
  call getdat(nsample_box,inumi)
  call getdat(xninja_box,inumr)
  call getdat(xninjs_box,inumr)
  call getdat(xninj_box,inumr)
  call getdat(nbebox,inumi)
  call getdat(nxbox,inumi)
  call getdat(nybox,inumi)
  call getdat(nlbox,inumi)
  call getdat(xboxhw,inumr)
  call getdat(yboxhw,inumr)
  call getdat(xlbox1,inumr)
  call getdat(xlbox2,inumr)
  call getdat(ndepbox,inumi)
  call getdat(init_tube,inuml)
  call getdat(nbtube,inumi)
  call getdat(nbstube,inumi)
  call getdat(nbetube,inumi)
  call getdat(Rtube,inumr)
  call getdat(Ytube,inumr)
  call getdat(XZETAtube,inumr)
  call getdat(PHItube,inumr)
  call getdat(THETAtube,inumr)
  call getdat(LMIDtube,inumi)
  call getdat(XL1tube,inumr)
  call getdat(XL2tube,inumr)
  call getdat(NSEGtube,inumi)
  call getdat(RHOtube,inumr)
  call getdat(NDEPtube,inumi)
  call getdat(init_misc,inuml)
  call getdat(plhgt,inumr)
  call getdat(nlcprb,inuml)
  call getdat(nlpsirz,inuml)
  call getdat(edbfac,inumr)
  call getdat(nmcurb,inumi)
  call getdat(nlfdep,inuml)
  call getdat(init_profiles,inuml)
  call getdat(id_te,inumi)
  call getdat(id_ti,inumi)
  call getdat(id_tifusn,inumi)
  call getdat(id_ne,inumi)
  call getdat(ng,inumi)
  call getdat(id_nh,inumi)
  call getdat(id_nimp,inumi)
  call getdat(id_nrf,inumi)
  call getdat(id_eperpmin,inumi)
  call getdat(id_epllmin,inumi)
  call getdat(id_nfast,inumi)
  call getdat(id_eperpfast,inumi)
  call getdat(id_epllfast,inumi)
  call getdat(id_aimp,inumi)
  call getdat(id_zimp,inumi)
  call getdat(id_omega,inumi)
  call getdat(id_epot,inumi)
  call getdat(id_vpoh,inumi)
  call getdat(id_curt,inumi)
  call getdat(id_difb,inumi)
  call getdat(id_velb,inumi)
  call getdat(id_difb_bi,inumi)
  call getdat(id_velb_bi,inumi)
  call getdat(id_difb_fi,inumi)
  call getdat(id_velb_fi,inumi)
  call getdat(id_fd0,inumi)
  call getdat(id_fdb,inumi)
  call getdat(id_fdp,inumi)
  call getdat(id_fdq,inumi)
  call getdat(id_fdr,inumi)
  call getdat(id_fds,inumi)
  call getdat(id_n0,inumi)
  call getdat(id_t0,inumi)
  call getdat(id_omeg0,inumi)
 
  call getdat(debug_mpi,inuml)
  call getdat(nbsteps,inumi)
  call getdat(nsigexc_use,inumi)
  call getdat(ebb_rel_co,inumr)
  call getdat(ebb_rel2_co,inumr)
  call getdat(rms_ebb_co,inumr)
  call getdat(ebb_relx_co,inumr)
  call getdat(rms_ebbx_co,inumr)
  call getdat(ebb_rel_cnt,inumr)
  call getdat(ebb_rel2_cnt,inumr)
  call getdat(rms_ebb_cnt,inumr)
  call getdat(ebb_relx_cnt,inumr)
  call getdat(rms_ebbx_cnt,inumr)
  call getdat(bnb_ien2,inumr)
  call getdat(bnb_ienx,inumr)
  call getdat(ebb_rel_fn,inumr)
  call getdat(ebb_rel2_fn,inumr)
  call getdat(rms_ebb_fn,inumr)
  call getdat(ebb_relx_fn,inumr)
  call getdat(rms_ebbx_fn,inumr)
  call getdat(bnb_fn,inumr)
  call getdat(bnb_fnx,inumr)
  call getdat(flag_dt_reset,inuml)
  call getdat(frac_survive,inumr)
  call getdat(ndepmod,inumi)
  call getdat(bbnvol,inumr)
  call getdat(bdns2p,inumr)
  call getdat(be0cx2,inumr)
  call getdat(be20cx2,inumr)
  call getdat(be0x2p,inumr)
  call getdat(bn0cx2,inumr)
  call getdat(bn0x2p,inumr)
  call getdat(bntots,inumr)
  call getdat(btntn2,inumr)
  call getdat(bv0cx2,inumr)
  call getdat(bv0x2p,inumr)
  call getdat(bvrhocx2,inumr)
  call getdat(bvrhox2p,inumr)
  call getdat(bvthcx2,inumr)
  call getdat(bvthx2p,inumr)
  call getdat(bvpllcx2,inumr)
  call getdat(bvpllx2p,inumr)
  call getdat(balpha_gyro,inumr)
  call getdat(balpha_gyrop,inumr)
  call getdat(delt,inumr)
  call getdat(tbm2p,inumr)
  call getdat(dvbox,inumr)
  call getdat(eb2plp,inumr)
  call getdat(eb2ppp,inumr)
  call getdat(efbm,inumr)
  call getdat(efbmb,inumr)
  call getdat(einj,inumr)
  call getdat(einjs,inumr)
  call getdat(vmins,inumr)
  call getdat(fbz,inumr)
  call getdat(dt_adj0,inumr)
  call getdat(dt_adj0s,inumr)
  call getdat(hexbbxrp,inumr)
  call getdat(init_xplasma,inumi)
  call getdat(write_xplasma,inumi)
  call getdat(lrunid,inumi)
  call getdat(nadrbox,inumi)
  call getdat(nbi_init_flag,inuml)
  call getdat(need_read_ptcl,inuml)
  call getdat(sawflag2,inuml)
  call getdat(nbouta,inumi)
  call getdat(nbs,inumi)
  call getdat(nlfprod,inuml)
  call getdat(nout,inumi)
  call getdat(nreact,inumi)
  call getdat(puseyp,inumr)
  call getdat(nwrite_global,inumi)
  call getdat(nznbmr,inumi)
  call getdat(nznbmri,inumi)
  call getdat(nthzsm0,inumi)
  call getdat(phibsce,inumr)
  call getdat(sn00i2,inumr)
  call getdat(sn00x2,inumr)
  call getdat(snb0i2,inumr)
  call getdat(snbn02,inumr)
  if(levmod_halo.eq.2) then
     call getdat(svn3vii_h,inumr)
  endif
  if(levmod_halo.eq.2) then
     call getdat(svn3vii_he,inumr)
  endif
  if(levmod_halo.eq.2) then
     call getdat(svn3vcx_h,inumr)
  endif
  if(levmod_halo.eq.2) then
     call getdat(svn3vcx_he,inumr)
  endif
  call getdat(srbn02,inumr)
  call getdat(tfluxp,inumr)
  call getdat(vbtr2p,inumr)
  call getdat(xibado,inumr)
  call getdat(xiliml,inumr)
  call getdat(ebcons,inumr)
  call getdat(xwght0,inumr)
  call getdat(wnlight,inumr)
  call getdat(wbav,inumr)
  call getdat(wbav_kill,inumr)
  call getdat(tausl_avg,inumr)
  call getdat(tuben0,inumr)
  call getdat(tubedot,inumr)
  call getdat(tubes0,inumr)
 
  call getdat(bdenss,inumr)
  call getdat(mc_dens,inumr)
  call getdat(bdenssw,inumr)
  call getdat(udensplw,inumr)
  call getdat(udensppw,inumr)
  call getdat(mc_newdens,inumr)
  call getdat(einjav,inumr)
  call getdat(nbs_step,inumi)
  call getdat(n_outtim,inumi)
  call getdat(bnb_ien,inumr)
  call getdat(bn0cx,inumr)
  call getdat(ebavps,inumr)
  call getdat(nmc,inumr)
  call getdat(wnmc,inumr)
  call getdat(nmctot,inumi)
  call getdat(wnmctot,inumr)
  call getdat(naeptot,inumi)
  call getdat(nstep_aep,inumi)
  call getdat(nnew,inumi)
  call getdat(omegabsw,inumr)
  call getdat(sorbn0s,inumr)
  call getdat(sorbn0s_dep,inumr)
  call getdat(xzbmav,inumr)
  call getdat(pinjs_res,inumr)
  call getdat(bphcons,inumr)
 
  RNG_CURSTATE%INDEX=NBI_STATE_INDX
  RNG_CURSTATE%ARRAY(0:RNG_K-1)=NBI_STATE_ARR(0:RNG_K-1)
 
 
end subroutine nbi_fld_bufget
