FE_MESH Derived Type

  1. mod_mesh.f90
  2. mesh
  3. FE_MESH

type, public :: FE_MESH


Inherits

type~~fe_mesh~~InheritsGraph type~fe_mesh FE_MESH type~fe_edge FE_EDGE type~fe_mesh->type~fe_edge ed

Contents

Variables

Source Code

FE_MESH

Components

TypeVisibility AttributesNameInitial
real(kind=R8), public :: lx

size of rectangle
real(kind=R8), public :: ly

size of rectangle
real(kind=R8), public :: zx

coordinates of first point
real(kind=R8), public :: zy

coordinates of first point
integer(kind=I4), public :: nx

number of nodes in , directions
integer(kind=I4), public :: ny

number of nodes in , directions
integer(kind=I4), public :: n

number of nodes
integer(kind=I4), public :: ne

number of elements
integer(kind=I4), public :: ned

number of edges
integer(kind=I4), public :: nc

number of corners
real(kind=R8), public, dimension(:), allocatable:: x

nodes coordinates
real(kind=R8), public, dimension(:), allocatable:: y

nodes coordinates
real(kind=R8), public, dimension(:), allocatable:: z

nodes coordinates
integer(kind=I4), public, dimension(:,:), allocatable:: con

connectivity table
integer(kind=I4), public, dimension(:), allocatable:: el_t

element type
integer(kind=I4), public, dimension(:), allocatable:: el_n

element number of lines
type(FE_EDGE), public, dimension(:), allocatable:: ed

edges of the mesh
integer(kind=I4), public, dimension(:), allocatable:: cor

number of the corner node

Source Code

type FE_MESH
   real(kind=R8)    :: lx, ly                               !! *size of rectangle*
   real(kind=R8)    :: zx, zy                               !! *coordinates of first point*
   integer(kind=I4) :: nx, ny                               !! *number of nodes in \(x\), \(y\) directions*

   integer(kind=I4) :: n                                    !! *number of nodes*
   integer(kind=I4) :: ne                                   !! *number of elements*
   integer(kind=I4) :: ned                                  !! *number of edges*
   integer(kind=I4) :: nc                                   !! *number of corners*
   real(kind=R8),    dimension(:),   allocatable :: x, y, z !! *nodes coordinates*
   integer(kind=I4), dimension(:,:), allocatable :: con     !! *connectivity table*
   integer(kind=I4), dimension(:),   allocatable :: el_t    !! *element type*
   integer(kind=I4), dimension(:),   allocatable :: el_n    !! *element number of lines*
   type(FE_EDGE),    dimension(:),   allocatable :: ed      !! *edges of the mesh*
   integer(kind=I4), dimension(:),   allocatable :: cor     !! *number of the corner node*
endtype FE_MESH