ReferenceTopology

This method returns the topology of reference element.

Interface

Interface

MODULE PURE FUNCTION ReferenceTopology(nptrs, name) RESULT(obj)
  TYPE(ReferenceTopology_) :: obj
  INTEGER(I4B), INTENT(IN) :: nptrs(:)
  INTEGER(I4B), INTENT(IN) :: name
END FUNCTION ReferenceTopology

example

In this example you will learn how to create a ReferenceTopology.

PROGRAM main
  USE easifemBase
  TYPE( ReferenceTopology_ ) :: obj

  obj = ReferenceTopology( nptrs = [1,2,3], name=Triangle3 )
  CALL Display( obj, "test-1 obj : ")
  CALL OK( (.NNE. obj) .eq. 3, "nne : ")
END PROGRAM main

↢ close