GenerateFromMesh_SEMHex Subroutine

  1. SELF_Geometry_3D.f90
  2. SELF_Geometry_3D
  3. GenerateFromMesh_SEMHex

public subroutine GenerateFromMesh_SEMHex(myGeom, mesh)

Arguments

TypeIntentOptionalAttributesName
class(SEMHex), intent(inout) :: myGeom
type(Mesh3D), intent(in) :: mesh

Contents

Source Code

GenerateFromMesh_SEMHex

Source Code

  subroutine GenerateFromMesh_SEMHex(myGeom,mesh)
    implicit none
    class(SEMHex),intent(inout) :: myGeom
    type(Mesh3D),intent(in) :: mesh

    call myGeom%GenerateFromNodeCoords(mesh%nodeCoords,mesh%nGeo,mesh%quadrature,mesh%nElem)
    call myGeom%x%UpdateDevice()
    call myGeom%x%BoundaryInterp() ! Boundary interp will run on GPU if enabled, hence why we close in update host/device
    call myGeom%x%UpdateHost()
    call myGeom%CalculateMetricTerms()

  endsubroutine GenerateFromMesh_SEMHex