initialize the type hmap_axisNB, reading from parameterfile and call init_params
self
FUNCTION hmap_axisNB_init() RESULT(sf) ! MODULES USE MODgvec_ReadInTools,ONLY: GETLOGICAL,GETINT,GETSTR IMPLICIT NONE !----------------------------------------------------------------------------------------------------------------------------------- ! OUTPUT VARIABLES TYPE(t_hmap_axisNB) :: sf !! self !----------------------------------------------------------------------------------------------------------------------------------- ! LOCAL VARIABLES CHARACTER(LEN=512) :: ncfile INTEGER :: nvisu !=================================================================================================================================== SWRITE(UNIT_stdOut,'(4X,A)')'INIT HMAP :: axisNB FRAME OF A CLOSED CURVE. GET PARAMETERS:' ncfile=GETSTR("hmap_ncfile") nvisu=GETINT("hmap_nvisu",-1) sf = hmap_axisNB_init_params(ncfile,nvisu) END FUNCTION hmap_axisNB_init