lambda_destroy Subroutine

public subroutine lambda_destroy(self)

Arguments

Type	Intent	Optional	Attributes		Name
type(lambda_obj)				::	self

Contents

Source Code

Source Code

      subroutine lambda_destroy(self)
         implicit none
         type(lambda_obj) :: self
         if (associated(self%lambdaptr)) nullify(self%lambdaptr)
      end subroutine lambda_destroy