Stellarator-Tools
restart_mod.f90 File Reference

Contains module restart_mod. More...

Modules

module  restart_mod
 Contains routines for writting the restart file.
 

Functions/Subroutines

integer function restart_mod::restart_read (restart_ext, wout_file, mpolin, ntorin, nfpi
 Reads the restart file. More...
 
subroutine restart_mod::restart_write_free (restart_ext)
 Write the free boundary information. More...
 
subroutine restart_mod::restart_write (restart_ext, wout_file)
 Write the restart file. More...
 
subroutine restart_mod::interpit (aold, anew, ns_old, ns_new, mpol_old, mpol_new, ntor_old, ntor_new, nfp_old, nfp_new, tor_modes_old, tor_modes_new, lhalf)
 Interpolate fourier quantites from the restart file. More...
 
subroutine restart_mod::interpit_1d (aold, anew, ns_old, ns_new, lhalf, parity)
 Interpolate radial quantites from the restart file. More...
 
subroutine restart_mod::restart_normalize (xmn, factor)
 Denormalize a quantity so the value written to the restart file can be summed directly. More...
 
subroutine restart_mod::restart_denormalize (xmn, factor)
 Denormalize a quantity so the value written to the restart file can be summed directly. More...
 

Variables

integer, parameter restart_mod::restart_version = 0
 Version number.
 
integer, parameter restart_mod::restart_lasym = 31
 Bit position for the lasym flag.
 
character(len= *), dimension(1), parameter restart_mod::radial_dim = (/ 'radius' /)
 Radial Dimension names.
 
character(len= *), dimension(3), parameter restart_mod::restart_dims = (/ 'm-mode', 'n-mode', radial_dim(1) /)
 Fourier Dimension names.
 
character(len= *), parameter restart_mod::vn_nsin = 'nrad'
 Name for the restart file number of radial points.
 
character(len= *), parameter restart_mod::vn_mpolin = 'mpol'
 Name for the restart file number of poloidal modes.
 
character(len= *), parameter restart_mod::vn_ntorin = 'ntor'
 Name for the restart file number of toroidal modes.
 
character(len= *), parameter restart_mod::vn_nfpin = 'nfp'
 Name for the restart file number of field periods.
 
character(len= *), parameter restart_mod::vn_wout = 'wout_file'
 Name for the restart file number of wout file modes.
 
character(len= *), parameter restart_mod::vn_flags = 'state_flags'
 Name for the restart file number of state flags modes.
 
character(len= *), parameter restart_mod::vn_tor_modes = 'tor_modes'
 Name for the restart file toroidal modes array.
 
character(len= *), parameter restart_mod::vn_jbsupss = 'JBsupssh_m_n_r_'
 Name for the restart file jbsupss.
 
character(len= *), parameter restart_mod::vn_jbsupuc = 'JBsupuch_m_n_r_'
 Name for the restart file jbsupuc.
 
character(len= *), parameter restart_mod::vn_jbsupvc = 'JBsupvch_m_n_r_'
 Name for the restart file jbsupvc.
 
character(len= *), parameter restart_mod::vn_jbsupsc = 'JBsupsch_m_n_r_'
 Name for the restart file jbsupsc.
 
character(len= *), parameter restart_mod::vn_jbsupus = 'JBsupush_m_n_r_'
 Name for the restart file jbsupus.
 
character(len= *), parameter restart_mod::vn_jbsupvs = 'JBsupvsh_m_n_r_'
 Name for the restart file jbsupus.
 
character(len= *), parameter restart_mod::vn_jpresc = 'jpresch_m_n_r_'
 Name for the restart file jpresc.
 
character(len= *), parameter restart_mod::vn_jpress = 'jpressh_m_n_r_'
 Name for the restart file jpress.
 
character(len= *), parameter restart_mod::vn_rmnc = 'rmnc_m_n_r_'
 Name for the restart file rmnc.
 
character(len= *), parameter restart_mod::vn_rmns = 'rmns_m_n_r_'
 Name for the restart file rmns.
 
character(len= *), parameter restart_mod::vn_zmnc = 'zmnc_m_n_r_'
 Name for the restart file zmnc.
 
character(len= *), parameter restart_mod::vn_zmns = 'zmns_m_n_r_'
 Name for the restart file zmns.
 
character(len= *), parameter restart_mod::vn_chipf = 'chipf(r)'
 Name for the restart file chipf.
 
character(len= *), parameter restart_mod::vn_phipf = 'phipf(r)'
 Name for the restart file phipf.
 
character(len= *), parameter restart_mod::vn_bsupsmns = 'bsupsmnsh_m_n_r_'
 Name for the restart file bsupsmns.
 
character(len= *), parameter restart_mod::vn_bsupsmnc = 'bsupsmnch_m_n_r_'
 Name for the restart file bsupsmnc.
 
character(len= *), parameter restart_mod::vn_bsupumns = 'bsupumnsh_m_n_r_'
 Name for the restart file bsupumns.
 
character(len= *), parameter restart_mod::vn_bsupumnc = 'bsupumnch_m_n_r_'
 Name for the restart file bsupumnc.
 
character(len= *), parameter restart_mod::vn_bsupvmns = 'bsupvmnsh_m_n_r_'
 Name for the restart file bsupvmns.
 
character(len= *), parameter restart_mod::vn_bsupvmnc = 'bsupvmnch_m_n_r_'
 Name for the restart file bsupvmnc.
 
character(len= *), parameter restart_mod::vn_bsubsmns = 'bsubsmnsh_m_n_r_'
 Name for the restart file bsubsmns.
 
character(len= *), parameter restart_mod::vn_bsubsmnc = 'bsubsmnch_m_n_r_'
 Name for the restart file bsubsmnc.
 
character(len= *), parameter restart_mod::vn_bsubumns = 'bsubumnsh_m_n_r_'
 Name for the restart file bsubumns.
 
character(len= *), parameter restart_mod::vn_bsubumnc = 'bsubumnch_m_n_r_'
 Name for the restart file bsubumnc.
 
character(len= *), parameter restart_mod::vn_bsubvmns = 'bsubvmnsh_m_n_r_'
 Name for the restart file bsubvmns.
 
character(len= *), parameter restart_mod::vn_bsubvmnc = 'bsubvmnch_m_n_r_'
 Name for the restart file bsubvmnc.
 
character(len= *), parameter restart_mod::vn_pmns = 'pmnsh_m_n_r_'
 Name for the restart file pmns.
 
character(len= *), parameter restart_mod::vn_pmnc = 'pmnch_m_n_r_'
 Name for the restart file pmnc.
 
character(len= *), parameter restart_mod::vn_jksupsmns = 'jksupsmnsf_m_n_r_'
 Name for the restart file jksupsmns.
 
character(len= *), parameter restart_mod::vn_jksupsmnc = 'jksupsmncf_m_n_r_'
 Name for the restart file jksupsmnc.
 
character(len= *), parameter restart_mod::vn_jksupumns = 'jksupumnsf_m_n_r_'
 Name for the restart file jksupumns.
 
character(len= *), parameter restart_mod::vn_jksupumnc = 'jksupumncf_m_n_r_'
 Name for the restart file jksupumnc.
 
character(len= *), parameter restart_mod::vn_jksupvmns = 'jksupvmnsf_m_n_r_'
 Name for the restart file jksupvmns.
 
character(len= *), parameter restart_mod::vn_jksupvmnc = 'jksupvmncf_m_n_r_'
 Name for the restart file jksupvmnc.
 
character(len= *), parameter restart_mod::vn_fsupsmns = 'fsupsmnsf_m_n_r_'
 Name for the restart file fsupsmns.
 
character(len= *), parameter restart_mod::vn_fsupsmnc = 'fsupsmncf_m_n_r_'
 Name for the restart file fsupsmnc.
 
character(len= *), parameter restart_mod::vn_fsupumns = 'fsupumnsf_m_n_r_'
 Name for the restart file fsupumns.
 
character(len= *), parameter restart_mod::vn_fsupumnc = 'fsupumncf_m_n_r_'
 Name for the restart file fsupumnc.
 
character(len= *), parameter restart_mod::vn_fsupvmns = 'fsupvmnsf_m_n_r_'
 Name for the restart file fsupvmns.
 
character(len= *), parameter restart_mod::vn_fsupvmnc = 'fsupvmncf_m_n_r_'
 Name for the restart file fsupvmnc.
 
character(len= *), parameter restart_mod::vn_fsubsmns = 'fsubsmnsf_m_n_r_'
 Name for the restart file fsubsmns.
 
character(len= *), parameter restart_mod::vn_fsubsmnc = 'fsubsmncf_m_n_r_'
 Name for the restart file fsubsmnc.
 
character(len= *), parameter restart_mod::vn_fsubumns = 'fsubumnsf_m_n_r_'
 Name for the restart file fsubumns.
 
character(len= *), parameter restart_mod::vn_fsubumnc = 'fsubumncf_m_n_r_'
 Name for the restart file fsubumnc.
 
character(len= *), parameter restart_mod::vn_fsubvmns = 'fsubvmnsf_m_n_r_'
 Name for the restart file fsubvmns.
 
character(len= *), parameter restart_mod::vn_fsubvmnc = 'fsubvmncf_m_n_r_'
 Name for the restart file fsubvmnc.
 
character(len= *), parameter restart_mod::vn_asubsmns = 'asubsmnsf_m_n_r_'
 Name for the restart file asubsmns.
 
character(len= *), parameter restart_mod::vn_asubumnc = 'asubumncf_m_n_r_'
 Name for the restart file asubumnc.
 
character(len= *), parameter restart_mod::vn_asubvmnc = 'asubvmncf_m_n_r_'
 Name for the restart file asubumnc.
 
character(len= *), parameter restart_mod::vn_asubsmnc = 'asubumncf_m_n_r_'
 Name for the restart file fsubumns.
 
character(len= *), parameter restart_mod::vn_asubumns = 'asubumnsf_m_n_r_'
 Name for the restart file fsubumnc.
 
character(len= *), parameter restart_mod::vn_asubvmns = 'asubvmnsf_m_n_r_'
 Name for the restart file fsubvmns.
 
character(len= *), parameter restart_mod::vn_lmns = 'lmns_m_n_r_'
 Name for the restart file lmns.
 
character(len= *), parameter restart_mod::vn_lmnc = 'lmnc_m_n_r_'
 Name for the restart file lmnc.
 
character(len= *), parameter restart_mod::vn_p_factor = 'p_factor'
 Name for the restart file p_factor.
 
character(len= *), parameter restart_mod::vn_b_factor = 'b_factor'
 Name for the restart file b_factor.
 
character(len= *), parameter restart_mod::vn_wb = 'wb'
 Name for the restart file wb.
 
character(len= *), parameter restart_mod::vn_wp = 'wp'
 Name for the restart file wb.
 
character(len= *), parameter restart_mod::vn_rmajor = 'rmajor'
 Name for the restart file rmajor.
 
character(len= *), parameter restart_mod::vn_curtor = 'curtor'
 Name for the restart file total toroidal current.
 
character(len= *), parameter restart_mod::vn_p_max = 'p_max'
 Name for the restart file p_max.
 
character(len= *), parameter restart_mod::vn_p_min = 'p_min'
 Name for the restart file p_min.
 
character(len= *), parameter restart_mod::vn_wtotal0 = 'wtotal0'
 Inital stored energy.
 

Detailed Description

Contains module restart_mod.