immersed_vessel_m Module

Immersed boundary module, based on vessel function from equilibrium


Uses

  • module~~immersed_vessel_m~~UsesGraph module~immersed_vessel_m immersed_vessel_m module~equilibrium_m equilibrium_m module~immersed_vessel_m->module~equilibrium_m module~immersed_m immersed_m module~immersed_vessel_m->module~immersed_m module~mesh_cart_m mesh_cart_m module~immersed_vessel_m->module~mesh_cart_m module~precision_m precision_m module~immersed_vessel_m->module~precision_m module~equilibrium_m->module~precision_m module~immersed_m->module~equilibrium_m module~immersed_m->module~mesh_cart_m module~immersed_m->module~precision_m module~list_operations_m list_operations_m module~immersed_m->module~list_operations_m module~mesh_cart_m->module~equilibrium_m module~mesh_cart_m->module~precision_m iso_c_binding iso_c_binding module~mesh_cart_m->iso_c_binding module~comm_handling_m comm_handling_m module~mesh_cart_m->module~comm_handling_m module~descriptors_m descriptors_m module~mesh_cart_m->module~descriptors_m module~error_handling_m error_handling_m module~mesh_cart_m->module~error_handling_m module~slab_equilibrium_m slab_equilibrium_m module~mesh_cart_m->module~slab_equilibrium_m module~status_codes_m status_codes_m module~mesh_cart_m->module~status_codes_m netcdf netcdf module~mesh_cart_m->netcdf module~precision_m->iso_c_binding iso_fortran_env iso_fortran_env module~precision_m->iso_fortran_env mpi mpi module~precision_m->mpi module~precision_m->netcdf module~comm_handling_m->mpi module~screen_io_m screen_io_m module~descriptors_m->module~screen_io_m module~error_handling_m->module~precision_m module~error_handling_m->module~comm_handling_m module~error_handling_m->module~status_codes_m module~error_handling_m->mpi module~error_handling_m->netcdf module~error_handling_m->module~screen_io_m module~list_operations_m->module~precision_m module~list_operations_m->module~screen_io_m module~slab_equilibrium_m->module~equilibrium_m module~slab_equilibrium_m->module~precision_m module~slab_equilibrium_m->module~descriptors_m module~params_equi_slab_m params_equi_slab_m module~slab_equilibrium_m->module~params_equi_slab_m module~slab_equilibrium_m->module~screen_io_m module~params_equi_slab_m->module~precision_m module~params_equi_slab_m->iso_fortran_env module~params_equi_slab_m->module~error_handling_m module~params_equi_slab_m->module~status_codes_m module~params_equi_slab_m->module~screen_io_m module~screen_io_m->module~precision_m module~screen_io_m->iso_fortran_env module~screen_io_m->netcdf

Used by

  • module~~immersed_vessel_m~~UsedByGraph module~immersed_vessel_m immersed_vessel_m module~immersed_factory_m immersed_factory_m module~immersed_factory_m->module~immersed_vessel_m

Derived Types

type, public, extends(immersed_t) ::  immersed_vessel_t

Immersed boundary type based on vessel

Components

Type Visibility Attributes Name Initial
real(kind=FP), public, allocatable, dimension(:) :: charfun

Characteristic function of immersed boundary, commonly referred chi
real(kind=FP), public, allocatable, dimension(:) :: dirindfun

Function indicating direction of magnetic field (towards/away from target), commonly referred xi
integer, public, allocatable, dimension(:) :: inds

Mesh indices which lie in immersed boundary region
integer, public :: n_inds

Size of inds
integer, public, allocatable, dimension(:) :: adj_inds

Mesh indices, which are adjacent to the immersed boundary region
integer, public :: n_adj_inds

Size of adj_inds

Finalizations Procedures

final :: destructor_immersed_vessel_t

Type-Bound Procedures

procedure, public :: build_inds
procedure, public :: build_adj_inds
procedure, public :: write_netcdf => write_netcdf_immersed
procedure, public :: read_netcdf => read_netcdf_immersed
procedure, public :: init
procedure, public :: display

Subroutines

public subroutine init(self, equi, mesh, filename)

Arguments

Type IntentOptional Attributes Name
class(immersed_vessel_t), intent(inout) :: self
class(equilibrium_t), intent(inout) :: equi
type(mesh_cart_t), intent(in) :: mesh
character(len=*), intent(in), optional :: filename

public subroutine display(self)

Arguments

Type IntentOptional Attributes Name
class(immersed_vessel_t), intent(in) :: self

public subroutine destructor_immersed_vessel_t(self)

Destructor for immersed_vessel_t

Arguments

Type IntentOptional Attributes Name
type(immersed_vessel_t), intent(inout) :: self