terminate Subroutine

private subroutine terminate(me)

Can be called by the user in the function to terminate the computation. This will set ifail=-1.

Type Bound

diff_func

Arguments

Type IntentOptional Attributes Name
class(diff_func), intent(inout) :: me

Source Code

    subroutine terminate(me)

    implicit none

    class(diff_func),intent(inout) :: me

    me%stop = .true.

    end subroutine terminate