Skip to main content

ReferencePrism example 1

Modules and classes

  • [[ReferencePrism_]]

Usage

program main
use easifembase
use easifemclasses
implicit none
type( test_referencePrism_ ) :: obj
real( dfp ) :: avar
integer( i4b ), parameter :: nsd=3_I4B

!!! note "Initiate" Initiate an instance of [[ReferencePrism_]]

  CALL obj%Initiate(nsd=nsd)
CALL obj%display( 'Obj : ' )
END PROGRAM main