Skip to main content

JacobiSpace1D example 1

  • This example shows how to construct an instance of [[JacobiSpace1D_]].
  • Following methods are tested.
  • [[JacobiSpace1D_#JacobiSpace1D function]]
  • [[JacobiSpace1D_#JacobiSpace1D_Pointer]]
  • [[JacobiSpace1D_#GetParam]]

Modules and classes​

  • [[JacobiSpace1D_]]

Usage​

PROGRAM main
use easifembase
use easifemclasses
implicit none
type(JacobiSpace1D_) :: obj
class(AbstractOrthopolSpace1D_), pointer :: aptr

!!! note "Constructor" Construct an instance of JacobiSpace1D_ by specifying α>−1.0\alpha>-1.0 and β>−1.0\beta>-1.0.

  obj = JacobiSpace1D(alpha=0.0_DFP, beta=0.0_DFP)

!!! note "Display" Display the contents of obj

  CALL obj%display("obj = ")

!!! example "result" domain=​

-1.00000 1.00000 alpha=0.00000 beta=0.00000

!!! note "JacobiSpace1D_Pointer"

  aptr => JacobiSpace1D_Pointer(alpha=0.0_DFP, beta=0.0_DFP)
  call aptr%Display("aptr= ")

!!! example "result" domain=​

-1.00000 1.00000 alpha=0.00000 beta=0.00000

!!! note "GetParam"

  CALL Display(obj%GetParam(), "alpha, beta = ")

!!! note "Deallocate"

  CALL obj%Deallocate()
  CALL aptr%Deallocate()
  Deallocate(aptr)
END PROGRAM main