Skip to main content

Monomial2D example 7

This example shows the usage of [[Monomial2D_]] class. This example shows the use of Monomials2D on quadrangles.

Modules and classes

  • [[Monomial2D_]]

Usage

PROGRAM main
use easifemBase
use easifemClasses
implicit none
type(Monomial2D_), allocatable :: f1(:), f2(:), f3(:)
integer( i4b ) :: ii, n

!!! note "Monomials2D"

  f1 = Monomials2D( order=1, name1="x", name2="y", elemType=Quadrangle)
n = size( f1 )
do ii = 1, n
call f1(ii)%display( "f(" // tostring(ii) // ")=" )
end do

!!! example "results"

f(1)=1f(1)=1 f(2)=x1f(2)=x^1 f(3)=y1f(3)= y^1 f(4)=x1y1f(4)=x^1 y^1

!!! note "Monomials2D"

  f2 = Monomials2D( order=2, name1="x", name2="y", elemType=Quadrangle )
n = size( f2 )
do ii = 1, n
call f2(ii)%display( "f(" // tostring(ii) // ")=" )
end do

!!! example "results"

f(1)=1f(1)=1 f(2)=x1f(2)=x^1 f(3)=x2f(3)=x^2 f(4)=y1f(4)= y^1 f(5)=x1y1f(5)=x^1 y^1 f(6)=x2y1f(6)=x^2 y^1 f(7)=y2f(7)= y^2 f(8)=x1y2f(8)=x^1 y^2 f(9)=x2y2f(9)=x^2 y^2
END PROGRAM main