##################################################### #####################################################
##################################################### #####################################################
##################################################### #####################################################
################################################## ##################################################
################################################## ##################################################
################################################## ##################################################
################################################## ##################################################
################################################## ##################################################
################################################## ##################################################
###################################### ######################################
###################################### ######################################
###################################### ######################################
###################################### ######################################
###################################### ######################################
###################################### ######################################
###################################### ######################################
###################################### ######################################
###################################### ######################################
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
real(kind=real64), | public, | allocatable | :: | Nmat(:) | |||
real(kind=real64), | public, | allocatable | :: | dNdgzi(:,:) | |||
real(kind=real64), | public, | allocatable | :: | dNdgzidgzi(:,:) | |||
real(kind=real64), | public, | allocatable | :: | gzi(:) | |||
real(kind=real64), | public, | allocatable | :: | GaussPoint(:,:) | |||
real(kind=real64), | public, | allocatable | :: | GaussIntegWei(:) | |||
real(kind=real64), | public, | allocatable | :: | Jmat(:,:) | |||
real(kind=real64), | public, | allocatable | :: | JmatInv(:,:) | |||
real(kind=real64), | public, | allocatable | :: | ElemCoord(:,:) | |||
real(kind=real64), | public, | allocatable | :: | ElemCoord_n(:,:) | |||
real(kind=real64), | public, | allocatable | :: | du(:,:) | |||
real(kind=real64), | public | :: | detJ | ||||
integer(kind=int32), | public | :: | NumOfNode | ||||
integer(kind=int32), | public | :: | NumOfOrder | ||||
integer(kind=int32), | public | :: | NumOfDim | = | 0 | ||
integer(kind=int32), | public | :: | NumOfGp | = | 0 | ||
integer(kind=int32), | public | :: | GpID | ||||
integer(kind=int32), | public | :: | ierr | ||||
integer(kind=int32), | public | :: | currentGpID | ||||
integer(kind=int32), | public | :: | ElementID | ||||
logical, | public | :: | ReducedIntegration | = | .false. | ||
logical, | public | :: | Empty | = | .true. | ||
character(len=70), | public | :: | ElemType | ||||
character(len=60), | public | :: | ErrorMsg |
procedure, public :: init => initShapeFunction | |
procedure, public :: update => updateShapeFunction | |
procedure, public :: SetType => SetShapeFuncType | |
procedure, public :: GetAll => GetAllShapeFunc | |
procedure, public :: get => GetAllShapeFunc | |
procedure, public :: getOnlyNvec => GetShapeFunction | |
procedure, public :: Deallocate => DeallocateShapeFunction | |
procedure, public :: getType => getShapeFuncType | |
procedure, public :: GetGaussPoint | |
procedure, public :: export => exportShapeFunction | |
procedure, public :: remove => removeShapeFunction | |
procedure, public :: save => saveShapeFunction | |
procedure, public :: open => openShapeFunction | |
procedure, public :: getNvec => getNvecShapeFunction |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(ShapeFunction_), | intent(in) | :: | obj | |||
real(kind=real64), | intent(in), | optional | :: | x | ||
real(kind=real64), | intent(in), | optional | :: | y | ||
real(kind=real64), | intent(in), | optional | :: | z |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(ShapeFunction_), | intent(inout) | :: | obj | |||
character(len=*), | intent(in) | :: | path | |||
character(len=*), | intent(in), | optional | :: | name |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(ShapeFunction_), | intent(inout) | :: | obj | |||
character(len=*), | intent(in) | :: | path | |||
character(len=*), | intent(in), | optional | :: | name |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(ShapeFunction_), | intent(inout) | :: | obj |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(ShapeFunction_), | intent(inout) | :: | obj | |||
character(len=*), | intent(in), | optional | :: | ElemType |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(ShapeFunction_), | intent(inout) | :: | obj | |||
character(len=*), | intent(in), | optional | :: | ElemType | ||
real(kind=real64), | intent(in) | :: | NodCoord(:,:) | |||
integer(kind=int32), | intent(in) | :: | ElemNod(:,:) | |||
integer(kind=int32), | intent(in) | :: | ElemID | |||
integer(kind=int32), | intent(in) | :: | GpID |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(ShapeFunction_), | intent(inout) | :: | obj | |||
integer(kind=int32), | intent(in), | optional | :: | NumOfDim | ||
integer(kind=int32), | intent(in), | optional | :: | NumOfNodePerElem | ||
logical, | intent(in), | optional | :: | ReducedIntegration |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(ShapeFunction_), | intent(inout) | :: | obj | |||
integer(kind=int32), | intent(in) | :: | NumOfDim | |||
integer(kind=int32), | intent(in) | :: | NumOfNodePerElem |
call GetShapeFuncDer2(obj)
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(ShapeFunction_), | intent(inout) | :: | obj | |||
integer(kind=int32), | intent(in), | optional | :: | elem_id | ||
real(kind=real64), | intent(in), | optional | :: | nod_coord(:,:) | ||
real(kind=real64), | intent(in), | optional | :: | nod_coord_n(:,:) | ||
integer(kind=int32), | intent(in), | optional | :: | elem_nod(:,:) | ||
integer(kind=int32), | intent(in), | optional | :: | OptionalNumOfNode | ||
integer(kind=int32), | intent(in), | optional | :: | OptionalNumOfOrder | ||
integer(kind=int32), | intent(in), | optional | :: | OptionalNumOfDim | ||
integer(kind=int32), | intent(in), | optional | :: | OptionalNumOfGp | ||
integer(kind=int32), | intent(in), | optional | :: | OptionalGpID | ||
logical, | intent(in), | optional | :: | ReducedIntegration | ||
integer(kind=int32), | intent(in), | optional | :: | NumOfDim | ||
integer(kind=int32), | intent(in), | optional | :: | NumOfNodePerElem |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(ShapeFunction_), | intent(inout) | :: | obj |
Triangular or Tetrahedral
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(ShapeFunction_), | intent(inout) | :: | obj | include "./GetGaussPoint.f90" |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(ShapeFunction_), | intent(inout) | :: | obj |
######################################################################### ####### ####### ####### + (1) ####### ####### ####### ####### ####### ######################################################################### ######################################################################### ####### ####### ####### +-----------------------+ ####### ####### (1) (2) ####### ####### ####### #########################################################################
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(ShapeFunction_), | intent(inout) | :: | obj |
######################################################################### ####### ####### ####### + (1) ####### ####### ####### ####### ####### ######################################################################### ######################################################################### ####### ####### ####### +-----------------------+ ####### ####### (1) (2) ####### ####### ####### #########################################################################
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(ShapeFunction_), | intent(inout) | :: | obj |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(ShapeFunction_), | intent(inout) | :: | obj |
print *, obj%ElemCoord(j,1:m)
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(ShapeFunction_), | intent(inout) | :: | obj | |||
real(kind=real64), | intent(in) | :: | nod_coord(:,:) | |||
integer(kind=int32), | intent(in) | :: | elem_nod(:,:) | |||
integer(kind=int32), | intent(in) | :: | elem_id |
print *, obj%ElemCoord_n(j,1:m)
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(ShapeFunction_), | intent(inout) | :: | obj | |||
real(kind=real64), | intent(in) | :: | nod_coord_n(:,:) | |||
integer(kind=int32), | intent(in) | :: | elem_nod(:,:) | |||
integer(kind=int32), | intent(in) | :: | elem_id |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(ShapeFunction_), | intent(inout) | :: | obj |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(ShapeFunction_), | intent(inout) | :: | obj |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(ShapeFunction_), | intent(inout) | :: | obj | |||
logical, | intent(in), | optional | :: | restart | ||
character(len=*), | intent(in) | :: | path |