Allocate

Allocate memory for RealVector.

Interface

܀ Interface

INTERFACE
  MODULE PURE SUBROUTINE Allocate(obj, Dims)
    CLASS(RealVector_), INTENT(INOUT) :: obj
    INTEGER(I4B), INTENT(IN) :: Dims
  END SUBROUTINE Allocate
END INTERFACE 

️܀ See example

This example show how to initiate an instance of RealVector_

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

Allocate the size of the vector using Allocate method.

  CALL Allocate(obj, 10)
  CALL Display( obj, "test1")

  obj = RealVector(10)
  CALL Display( obj, "test1")

Initiate an instance of RealVector_ by using Initiate.

  CALL Initiate(obj, 10)
  CALL Display( obj, "test1")

END PROGRAM main

↢