MODgvec_gvec_to_jorek Module

Module gvec_to_jorek


Uses

  • module~~modgvec_gvec_to_jorek~~UsesGraph module~modgvec_gvec_to_jorek MODgvec_gvec_to_jorek module~modgvec_globals MODgvec_Globals module~modgvec_gvec_to_jorek->module~modgvec_globals iso_fortran_env iso_fortran_env module~modgvec_globals->iso_fortran_env

Used by

  • module~~modgvec_gvec_to_jorek~~UsedByGraph module~modgvec_gvec_to_jorek MODgvec_gvec_to_jorek program~convert_gvec_to_jorek CONVERT_GVEC_TO_JOREK program~convert_gvec_to_jorek->module~modgvec_gvec_to_jorek

Interfaces

private interface get_cla_gvec_to_jorek

private interface init_gvec_to_jorek

private interface gvec_to_jorek_prepare

public interface gvec_to_jorek_writeToFile

private interface finalize_gvec_to_jorek


Subroutines

public subroutine get_CLA_gvec_to_jorek()

Get command line arguments

Read more…

Arguments

None

public subroutine init_gvec_to_jorek()

Initialize Module

Arguments

None

private subroutine Init_Base(mn_max, fac_nyq)

initialize base classes declared in _vars module, needed for computation of output fields

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: mn_max(2)
integer, intent(in) :: fac_nyq

public subroutine gvec_to_jorek_prepare(X1_base_in, X1_in, X2_base_in, X2_in, LG_base_in, LG_in)

prepare all data to be written

Read more…

Arguments

Type IntentOptional Attributes Name
class(t_base), intent(in) :: X1_base_in
real(kind=wp), intent(in) :: X1_in(1:X1_base_in%s%nBase,1:X1_base_in%f%modes)
class(t_base), intent(in) :: X2_base_in
real(kind=wp), intent(in) :: X2_in(1:X2_base_in%s%nBase,1:X2_base_in%f%modes)
class(t_base), intent(in) :: LG_base_in
real(kind=wp), intent(in) :: LG_in(1:LG_base_in%s%nBase,1:LG_base_in%f%modes)

private subroutine Get_Field(field_type, vector_component, field_out)

compute different fields depending on the input parameters field_type and vector_component,

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: field_type
integer, intent(in) :: vector_component
real(kind=wp), intent(inout) :: field_out(out_base%s%nBase,out_base%f%modes)

private subroutine gvec_to_jorek_writeToFile_ASCII()

write data to file

Arguments

None

public subroutine finalize_gvec_to_jorek()

Finalize Module

Arguments

None