FinalizeFunctional Subroutine

public subroutine FinalizeFunctional(sf)

finalize the type functional

Arguments

Type IntentOptional Attributes Name
class(t_functional), intent(inout), ALLOCATABLE :: sf

self

Called by

proc~~finalizefunctional~~CalledByGraph proc~finalizefunctional FinalizeFunctional proc~finalize Finalize proc~finalize->proc~finalizefunctional proc~rungvec rungvec proc~rungvec->proc~finalizefunctional program~gvec_post GVEC_POST program~gvec_post->proc~finalizefunctional proc~start_rungvec start_rungvec proc~start_rungvec->proc~rungvec program~gvec GVEC program~gvec->proc~rungvec

Source Code

SUBROUTINE FinalizeFunctional(sf)
! MODULES
IMPLICIT NONE
!-----------------------------------------------------------------------------------------------------------------------------------
! INPUT VARIABLES
!-----------------------------------------------------------------------------------------------------------------------------------
! OUTPUT VARIABLES
  CLASS(t_functional), ALLOCATABLE,INTENT(INOUT) :: sf !! self
!-----------------------------------------------------------------------------------------------------------------------------------
! LOCAL VARIABLES
!===================================================================================================================================
  CALL sf%free()

END SUBROUTINE FinalizeFunctional