Skip to main content

FEVariable example 4

!!! note "" This example show how to USE QuadratureVariable method to generate Scalar variables at the quadrature nodes of the element.

Use association​

  • [[FEVariable_]]

Usage​

!!! note "Import modules and declare variable"

PROGRAM main
  USE easifemBase
  IMPLICIT NONE
  TYPE(FEVariable_) :: obj

!!! note "QuadratureVariable, scalar, constant"

  obj = QuadratureVariable( 1.0_DFP, typeFEVariableScalar, typeFEVariableConstant )
  CALL Display(obj, "QuadratureVariable, Scalar, Constant")

!!! note "QuadratureVariable, scalar, space"

  obj = QuadratureVariable( arange(0.0_DFP, 3.0_DFP), typeFEVariableScalar, &
      & typeFEVariableSpace )
  CALL Display(obj, "QuadratureVariable, scalar, space")

!!! note "QuadratureVariable, scalar, time"

  obj = QuadratureVariable( arange(0.0_DFP, 3.0_DFP), typeFEVariableScalar, &
      & typeFEVariableTime )
  CALL Display(obj, "QuadratureVariable, scalar, time")

!!! note "QuadratureVariable, scalar, space-time"

  obj = QuadratureVariable( reshape(arange(1.0_DFP, 6.0_DFP), [3,2]), &
      & typeFEVariableScalar, &
      & typeFEVariableSpaceTime )
  CALL Display(obj, "QuadratureVariable, scalar, space-time")
END PROGRAM main