t_hmap_frenet Interface

public interface t_hmap_frenet

Calls

interface~~t_hmap_frenet~~CallsGraph interface~t_hmap_frenet t_hmap_frenet proc~hmap_frenet_init hmap_frenet_init interface~t_hmap_frenet->proc~hmap_frenet_init proc~hmap_frenet_init_params hmap_frenet_init_params interface~t_hmap_frenet->proc~hmap_frenet_init_params proc~hmap_frenet_init->proc~hmap_frenet_init_params getint getint proc~hmap_frenet_init->getint getlogical getlogical proc~hmap_frenet_init->getlogical getrealarray getrealarray proc~hmap_frenet_init->getrealarray swrite swrite proc~hmap_frenet_init->swrite proc~checkzerocurvature checkZeroCurvature proc~hmap_frenet_init_params->proc~checkzerocurvature proc~hmap_frenet_test hmap_frenet_test proc~hmap_frenet_init_params->proc~hmap_frenet_test proc~visufrenet VisuFrenet proc~hmap_frenet_init_params->proc~visufrenet proc~hmap_frenet_init_params->swrite interface~cross CROSS proc~checkzerocurvature->interface~cross proc~hmap_frenet_eval_x0_fromrz t_hmap_frenet%hmap_frenet_eval_X0_fromRZ proc~checkzerocurvature->proc~hmap_frenet_eval_x0_fromrz proc~hmap_frenet_test->swrite proc~hmap_frenet_eval t_hmap_frenet%hmap_frenet_eval proc~hmap_frenet_test->proc~hmap_frenet_eval proc~hmap_frenet_eval_all t_hmap_frenet%hmap_frenet_eval_all proc~hmap_frenet_test->proc~hmap_frenet_eval_all proc~hmap_frenet_eval_dxdq t_hmap_frenet%hmap_frenet_eval_dxdq proc~hmap_frenet_test->proc~hmap_frenet_eval_dxdq proc~hmap_frenet_eval_gij t_hmap_frenet%hmap_frenet_eval_gij proc~hmap_frenet_test->proc~hmap_frenet_eval_gij proc~hmap_frenet_eval_gij_dq t_hmap_frenet%hmap_frenet_eval_gij_dq proc~hmap_frenet_test->proc~hmap_frenet_eval_gij_dq proc~hmap_frenet_eval_jh t_hmap_frenet%hmap_frenet_eval_Jh proc~hmap_frenet_test->proc~hmap_frenet_eval_jh proc~hmap_frenet_eval_jh_dq t_hmap_frenet%hmap_frenet_eval_Jh_dq proc~hmap_frenet_test->proc~hmap_frenet_eval_jh_dq proc~hmap_frenet_get_ddx_dqij t_hmap_frenet%hmap_frenet_get_ddx_dqij proc~hmap_frenet_test->proc~hmap_frenet_get_ddx_dqij proc~hmap_frenet_get_dx_dqi t_hmap_frenet%hmap_frenet_get_dx_dqi proc~hmap_frenet_test->proc~hmap_frenet_get_dx_dqi proc~hmap_frenet_init_aux hmap_frenet_init_aux proc~hmap_frenet_test->proc~hmap_frenet_init_aux proc~visufrenet->interface~cross proc~visufrenet->proc~hmap_frenet_eval_x0_fromrz proc~hmap_frenet_sigma t_hmap_frenet%hmap_frenet_sigma proc~visufrenet->proc~hmap_frenet_sigma proc~writedatatonetcdf WriteDataToNETCDF proc~visufrenet->proc~writedatatonetcdf proc~writedatatovtk WriteDataToVTK proc~visufrenet->proc~writedatatovtk writedatatocsv writedatatocsv proc~visufrenet->writedatatocsv interface~cross->interface~cross proc~hmap_frenet_eval->interface~cross proc~hmap_frenet_eval->proc~hmap_frenet_eval_x0_fromrz proc~hmap_frenet_eval->proc~hmap_frenet_sigma proc~hmap_frenet_eval_all_e hmap_frenet_eval_all_e proc~hmap_frenet_eval_all->proc~hmap_frenet_eval_all_e proc~hmap_frenet_eval_dxdq->interface~cross proc~hmap_frenet_eval_dxdq->proc~hmap_frenet_eval_x0_fromrz proc~hmap_frenet_eval_dxdq->proc~hmap_frenet_sigma proc~hmap_frenet_eval_gij->interface~cross proc~hmap_frenet_eval_gij->proc~hmap_frenet_eval_x0_fromrz proc~hmap_frenet_eval_gij->proc~hmap_frenet_sigma proc~hmap_frenet_eval_gij_dq->interface~cross proc~hmap_frenet_eval_gij_dq->proc~hmap_frenet_eval_x0_fromrz proc~hmap_frenet_eval_gij_dq->proc~hmap_frenet_sigma proc~hmap_frenet_eval_jh->interface~cross proc~hmap_frenet_eval_jh->proc~hmap_frenet_eval_x0_fromrz proc~hmap_frenet_eval_jh->proc~hmap_frenet_sigma proc~hmap_frenet_eval_jh_dq->interface~cross proc~hmap_frenet_eval_jh_dq->proc~hmap_frenet_eval_x0_fromrz proc~hmap_frenet_eval_jh_dq->proc~hmap_frenet_sigma proc~eval_fourier1d eval_fourier1d proc~hmap_frenet_eval_x0_fromrz->proc~eval_fourier1d proc~hmap_frenet_get_ddx_dqij->interface~cross proc~hmap_frenet_get_ddx_dqij->proc~hmap_frenet_eval_x0_fromrz proc~hmap_frenet_get_ddx_dqij->proc~hmap_frenet_sigma proc~hmap_frenet_get_dx_dqi->interface~cross proc~hmap_frenet_get_dx_dqi->proc~hmap_frenet_eval_x0_fromrz proc~hmap_frenet_get_dx_dqi->proc~hmap_frenet_sigma proc~hmap_frenet_init_aux->interface~cross proc~hmap_frenet_init_aux->proc~hmap_frenet_eval_x0_fromrz proc~hmap_frenet_init_aux->proc~hmap_frenet_sigma proc~ncfile_def_dim t_ncfile%ncfile_def_dim proc~writedatatonetcdf->proc~ncfile_def_dim proc~ncfile_end_def_mode t_ncfile%ncfile_end_def_mode proc~writedatatonetcdf->proc~ncfile_end_def_mode proc~ncfile_init ncfile_init proc~writedatatonetcdf->proc~ncfile_init proc~ncfile_put_array t_ncfile%ncfile_put_array proc~writedatatonetcdf->proc~ncfile_put_array proc~ncfile_put_attributes_char t_ncfile%ncfile_put_attributes_char proc~writedatatonetcdf->proc~ncfile_put_attributes_char proc~ncfile_put_char t_ncfile%ncfile_put_char proc~writedatatonetcdf->proc~ncfile_put_char interface~getfreeunit GETFREEUNIT proc~writedatatovtk->interface~getfreeunit sizeof_f sizeof_f proc~writedatatovtk->sizeof_f interface~getfreeunit->interface~getfreeunit nf90_def_dim nf90_def_dim proc~ncfile_def_dim->nf90_def_dim proc~mpi_check_single_access mpi_check_single_access proc~ncfile_def_dim->proc~mpi_check_single_access proc~ncfile_handle_error t_ncfile%ncfile_handle_error proc~ncfile_def_dim->proc~ncfile_handle_error nf90_enddef nf90_enddef proc~ncfile_end_def_mode->nf90_enddef proc~ncfile_end_def_mode->proc~mpi_check_single_access proc~ncfile_end_def_mode->proc~ncfile_handle_error proc~ncfile_init->proc~mpi_check_single_access proc~ncfile_openfile t_ncfile%ncfile_openfile proc~ncfile_init->proc~ncfile_openfile nf90_def_var nf90_def_var proc~ncfile_put_array->nf90_def_var nf90_inq_varid nf90_inq_varid proc~ncfile_put_array->nf90_inq_varid nf90_put_var nf90_put_var proc~ncfile_put_array->nf90_put_var proc~ncfile_put_array->proc~mpi_check_single_access proc~ncfile_put_array->proc~ncfile_handle_error proc~ncfile_put_array->proc~ncfile_openfile proc~ncfile_put_attributes_char->nf90_inq_varid nf90_put_att nf90_put_att proc~ncfile_put_attributes_char->nf90_put_att proc~ncfile_put_attributes_char->proc~mpi_check_single_access proc~ncfile_put_attributes_char->proc~ncfile_handle_error proc~ncfile_put_char->nf90_def_var proc~ncfile_put_char->nf90_inq_varid proc~ncfile_put_char->nf90_put_var proc~ncfile_put_char->proc~mpi_check_single_access proc~ncfile_put_char->proc~ncfile_handle_error proc~ncfile_handle_error->proc~mpi_check_single_access nf90_strerror nf90_strerror proc~ncfile_handle_error->nf90_strerror proc~ncfile_openfile->proc~mpi_check_single_access proc~ncfile_openfile->proc~ncfile_handle_error nf90_create nf90_create proc~ncfile_openfile->nf90_create nf90_open nf90_open proc~ncfile_openfile->nf90_open

Module Procedures

public function hmap_frenet_init() result(sf)

initialize the type hmap_frenet, reading from parameterfile and then call init_params

Arguments

None

Return Value type(t_hmap_frenet)

self

public function hmap_frenet_init_params(nfp, n_max, nvisu, Rc, Rs, Zc, Zs, omnig) result(sf)

initialize the type hmap_frenet with number of elements

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: nfp

number of field periods
integer, intent(in) :: n_max

maximum mode number of guiding curve
integer, intent(in) :: nvisu

number of visualization points per field period (-1: no visualization)
real(kind=wp), intent(in) :: Rc(0:n_max)

R cos(-n*zeta) modes of guiding curve, 0..n_max
real(kind=wp), intent(in) :: Rs(0:n_max)

R sin(-n*zeta) modes of guiding curve, 0..n_max
real(kind=wp), intent(in) :: Zc(0:n_max)

Z cos(-n*zeta) modes of guiding curve, 0..n_max
real(kind=wp), intent(in) :: Zs(0:n_max)

Z sin(-n*zeta) modes of guiding curve, 0..n_max
logical, intent(in) :: omnig

omnigeneity, gives sign function of Frenet frame. False: sigma=1, True: sigma=+1 for 0<=zeta<=pi/nfp, and -1 for pi/nfp<zeta<2pi

Return Value type(t_hmap_frenet)

self