MappedGeometryClass Module

Returns the jacobian of the transformation computed from the three co-variant coordinate vectors.

Returns in result the cross product u x v

Returns the dot product u.v

Returns the 2-norm of u


Uses


Derived Types

type, public ::  MappedGeometry

Components

Type Visibility Attributes Name Initial
integer, public :: Nx
integer, public :: Ny
integer, public :: Nz
real(kind=RP), public, DIMENSION(:,:,:,:), ALLOCATABLE :: jGradXi
real(kind=RP), public, DIMENSION(:,:,:,:), ALLOCATABLE :: jGradEta
real(kind=RP), public, DIMENSION(:,:,:,:), ALLOCATABLE :: jGradZeta
real(kind=RP), public, DIMENSION(:,:,:,:), ALLOCATABLE :: x
real(kind=RP), public, DIMENSION(:,:,:), ALLOCATABLE :: jacobian
real(kind=RP), public, DIMENSION(:,:,:), ALLOCATABLE :: invJacobian
real(kind=RP), public :: volume
real(kind=RP), public, dimension(:,:,:), allocatable :: dWall
real(kind=RP), public, dimension(:,:,:,:), allocatable :: normal
real(kind=RP), public, dimension(:,:,:,:), allocatable :: ncXi
real(kind=RP), public, dimension(:,:,:,:), allocatable :: ncEta
real(kind=RP), public, dimension(:,:,:,:), allocatable :: ncZeta
real(kind=RP), public, dimension(:,:,:,:), allocatable :: t1cXi
real(kind=RP), public, dimension(:,:,:,:), allocatable :: t1cEta
real(kind=RP), public, dimension(:,:,:,:), allocatable :: t1cZeta
real(kind=RP), public, dimension(:,:,:,:), allocatable :: t2cXi
real(kind=RP), public, dimension(:,:,:,:), allocatable :: t2cEta
real(kind=RP), public, dimension(:,:,:,:), allocatable :: t2cZeta
real(kind=RP), public, dimension(:,:,:), allocatable :: JfcXi
real(kind=RP), public, dimension(:,:,:), allocatable :: JfcEta
real(kind=RP), public, dimension(:,:,:), allocatable :: JfcZeta

Type-Bound Procedures

procedure, public :: construct => ConstructMappedGeometry
procedure, public :: destruct => DestructMappedGeometry

type, public ::  MappedGeometryFace

Components

Type Visibility Attributes Name Initial
real(kind=RP), public, dimension(:,:,:), allocatable :: x
real(kind=RP), public, dimension(:,:), allocatable :: jacobian
real(kind=RP), public, dimension(:,:,:), allocatable :: GradXi
real(kind=RP), public, dimension(:,:,:), allocatable :: GradEta
real(kind=RP), public, dimension(:,:,:), allocatable :: GradZeta
real(kind=RP), public, dimension(:,:,:), allocatable :: normal
real(kind=RP), public, dimension(:,:,:), allocatable :: t1
real(kind=RP), public, dimension(:,:,:), allocatable :: t2
real(kind=RP), public, dimension(:,:), allocatable :: dWall
real(kind=RP), public :: surface
real(kind=RP), public :: h

Type-Bound Procedures

procedure, public :: construct => ConstructMappedGeometryFace
procedure, public :: destruct => DestructMappedGeometryFace

Functions

public function vDot(u, v)

Arguments

Type IntentOptional Attributes Name
real(kind=RP), DIMENSION(3) :: u
real(kind=RP), DIMENSION(3) :: v

Return Value real(kind=RP)


Subroutines

public subroutine vCross(u, v, result)

Arguments

Type IntentOptional Attributes Name
real(kind=RP), DIMENSION(3) :: u
real(kind=RP), DIMENSION(3) :: v
real(kind=RP), DIMENSION(3) :: result

public subroutine SetMappingsToCrossProduct()

Arguments

None