boundaryFromFile_new Subroutine

public subroutine boundaryFromFile_new(sf, fileString)

Allocate class and call init

Arguments

Type IntentOptional Attributes Name
class(t_boundaryFromFile), intent(inout), ALLOCATABLE :: sf

self
character(len=*), intent(in) :: fileString

Calls

proc~~boundaryfromfile_new~~CallsGraph proc~boundaryfromfile_new boundaryFromFile_new proc~bff_init t_boundaryFromFile%bff_init proc~boundaryfromfile_new->proc~bff_init proc~ncfile_init ncfile_init proc~bff_init->proc~ncfile_init proc~readnetcdf ReadNETCDF proc~bff_init->proc~readnetcdf proc~mpi_check_single_access mpi_check_single_access proc~ncfile_init->proc~mpi_check_single_access proc~ncfile_openfile t_ncfile%ncfile_openfile proc~ncfile_init->proc~ncfile_openfile proc~ncfile_closefile t_ncfile%ncfile_closefile proc~readnetcdf->proc~ncfile_closefile proc~ncfile_get_array t_ncfile%ncfile_get_array proc~readnetcdf->proc~ncfile_get_array proc~ncfile_get_scalar t_ncfile%ncfile_get_scalar proc~readnetcdf->proc~ncfile_get_scalar proc~ncfile_var_exists t_ncfile%ncfile_var_exists proc~readnetcdf->proc~ncfile_var_exists proc~ncfile_closefile->proc~mpi_check_single_access proc~ncfile_get_array->proc~mpi_check_single_access proc~ncfile_enter_groups t_ncfile%ncfile_enter_groups proc~ncfile_get_array->proc~ncfile_enter_groups proc~ncfile_get_scalar->proc~mpi_check_single_access proc~ncfile_get_scalar->proc~ncfile_enter_groups proc~ncfile_openfile->proc~mpi_check_single_access proc~ncfile_var_exists->proc~mpi_check_single_access proc~ncfile_var_exists->proc~ncfile_enter_groups proc~ncfile_enter_groups->proc~mpi_check_single_access proc~ncfile_enter_groups->proc~ncfile_openfile

Source Code

SUBROUTINE boundaryFromFile_new( sf,fileString)
! MODULES
IMPLICIT NONE
!-----------------------------------------------------------------------------------------------------------------------------------
! INPUT VARIABLES
CHARACTER(LEN=*)    , INTENT(IN   ) :: fileString
!-----------------------------------------------------------------------------------------------------------------------------------
! INPUT VARIABLES
!-----------------------------------------------------------------------------------------------------------------------------------
! OUTPUT VARIABLES
CLASS(t_boundaryFromFile), ALLOCATABLE,INTENT(INOUT)        :: sf !! self
!===================================================================================================================================
ALLOCATE(t_boundaryFromFile :: sf)
CALL sf%init(fileString)
END SUBROUTINE boundaryFromFile_new