magnetic_response.f File Reference

Contains module magnetic_response. More...

Data Types
type	magnetic_response::magnetic_response_class
	Base class representing a magnetic signal response function. More...
interface	magnetic_response::magnetic_response_construct
	Interface for the construction of magnetic_response_class types using magnetic_response_construct_new, & magnetic_response_construct_point or & magnetic_response_construct_netcdf. More...

Modules
module	magnetic_response
	Defines the base class of the type magnetic_response_class.

Functions/Subroutines
type(magnetic_response_class) function, pointer	magnetic_response::magnetic_response_construct_new (name, date, coil_id, inductance, current_scale, num_t, num_t_shell, rmin, rmax, zmin, zmax, n_field_periods, stell_sym, a_r, a_f, a_z, a_s_r, a_s_f, a_s_z, svd_cut_off)
	Construct a magnetic_response_class object.
type(magnetic_response_class) function, pointer	magnetic_response::magnetic_response_construct_point (name, date, coil_id, position, direction, vacuum, current_scale)
	Construct a magnetic_response_class object.
type(magnetic_response_class) function, pointer	magnetic_response::magnetic_response_construct_netcdf (mdsig_iou, svd_cut_off)
	Construct a magnetic_response_class object.
subroutine	magnetic_response::magnetic_response_destruct (this)
	Deconstruct a magnetic_response_class object.
logical function	magnetic_response::magnetic_response_is_stell_sym (this)
	Checks if the stellarator symmetric flag is set.
logical function	magnetic_response::magnetic_response_use_plasma (this)
	Checks if the plasma flag is set.
logical function	magnetic_response::magnetic_response_use_shell (this)
	Checks if the conducting shell flag is set.
logical function	magnetic_response::magnetic_response_use_coil (this)
	Checks if the coil response flag is set.
subroutine	magnetic_response::magnetic_response_clr_use_coil (this)
	Clears the coil response bit.
logical function	magnetic_response::magnetic_response_is_point (this)
	Checks if the coil response flag is set.
subroutine	magnetic_response::magnetic_response_define (this, mdsig_iou)
	Defines the variables for the NETCDF file.
subroutine	magnetic_response::magnetic_response_write (this, mdsig_iou)
	Write variables to the NETCDF file.

Variables
character(len= *), parameter	magnetic_response::magnetic_response_current = 'MRC 2015-04-27'
	Version for the MDSIG files. This version adds the point diagnostics.
character(len= *), parameter	magnetic_response::magnetic_response_20140928 = 'MRC 2014-09-28'
	Version for the MDSIG files. This version adds the conducting shell.
integer, parameter	magnetic_response::magnetic_response_len = 80
	Length for strings.
integer, parameter	magnetic_response::magnetic_response_use_coil_flag = 1
	Bit position for the use coil response flag.
integer, parameter	magnetic_response::magnetic_response_use_plasma_flag = 2
	Bit position for the force coil response flag.
integer, parameter	magnetic_response::magnetic_response_stell_sym_flag = 3
	Bit position for the stellerator symmetry flag.
integer, parameter	magnetic_response::magnetic_response_use_shell_flag = 4
	Bit position for the use conducting shell flag.
integer, parameter	magnetic_response::magnetic_response_is_point_flag = 5
	Bit position for the use conducting shell flag.
character(len= *), parameter	magnetic_response::nc_flags = 'mddc_mrf_flags'
	NETCDF configureation flags.
character(len= *), parameter	magnetic_response::nc_name = 'mddc_mrf_code_name'
	NETCDF code name variable.
character(len= *), parameter	magnetic_response::nc_version = 'mddc_mrf_code_version'
	NETCDF version variable.
character(len= *), parameter	magnetic_response::nc_date = 'mddc_mrf_date_run'
	NETCDF date run variable.
character(len= *), parameter	magnetic_response::nc_coil_id = 'mddc_mrf_field_coils_id'
	NETCDF coil identifier variable.
character(len= *), parameter	magnetic_response::nc_n_field_cg = 'mddc_mrf_n_field_cg'
	NETCDF number of field coils variable.
character(len= *), parameter	magnetic_response::nc_inductance = 'mddc_mrf_rdiag_coilg_1'
	NETCDF mutual inductance variable.
character(len= *), parameter	magnetic_response::nc_current_scale = 'mddc_mrf_extcur_mg'
	NETCDF current scale variable.
character(len= *), parameter	magnetic_response::nc_num_t = 'mddc_mrf_kp'
	NETCDF number torodial planes variable.
character(len= *), parameter	magnetic_response::nc_num_r = 'mddc_mrf_ir'
	NETCDF number radial grid points variable.
character(len= *), parameter	magnetic_response::nc_num_z = 'mddc_mrf_jz'
	NETCDF number vertical grid points variable.
character(len= *), parameter	magnetic_response::nc_rmin = 'mddc_mrf_rmin'
	NETCDF minimum radial grid variable.
character(len= *), parameter	magnetic_response::nc_rmax = 'mddc_mrf_rmax'
	NETCDF maximum radial grid variable.
character(len= *), parameter	magnetic_response::nc_zmin = 'mddc_mrf_zmin'
	NETCDF minimum vertical grid variable.
character(len= *), parameter	magnetic_response::nc_zmax = 'mddc_mrf_zmax'
	NETCDF maximum vertical grid variable.
character(len= *), parameter	magnetic_response::nc_n_field_periods = 'mddc_mrf_n_field_periods'
	NETCDF number of field periods variable.
character(len= *), parameter	magnetic_response::nc_stell_sym = 'mddc_mrf_lstell_sym'
	NETCDF stell symmetric variable.
character(len= *), parameter	magnetic_response::nc_a_r = 'mddc_mrf_a_r'
	NETCDF radial response grid variable.
character(len= *), parameter	magnetic_response::nc_a_f = 'mddc_mrf_a_f'
	NETCDF toroidal response grid variable.
character(len= *), parameter	magnetic_response::nc_a_z = 'mddc_mrf_a_z'
	NETCDF vertical response grid variable.
character(len= *), parameter	magnetic_response::nc_use_shell = 'mddc_mrf_use_con_shell'
	NETCDF use conducting shell variable.
character(len= *), parameter	magnetic_response::nc_num_t_shell = 'mddc_mrf_kp_shell'
	NETCDF number torodial shell grid points variable.
character(len= *), parameter	magnetic_response::nc_a_s_r = 'mddc_mrf_a_s_r'
	NETCDF radial response shell grid variable.
character(len= *), parameter	magnetic_response::nc_a_s_f = 'mddc_mrf_a_s_f'
	NETCDF toroidal response shell grid variable.
character(len= *), parameter	magnetic_response::nc_a_s_z = 'mddc_mrf_a_s_z'
	NETCDF vertical response shell grid variable.
character(len= *), parameter	magnetic_response::nc_position = 'mddc_mrf_position'
	NETCDF use conducting shell variable.
character(len= *), parameter	magnetic_response::nc_direction = 'mddc_mrf_direction'
	NETCDF number torodial shell grid points variable.

Detailed Description

Contains module magnetic_response.