Subroutine TERMINATE5

subroutine TERMINATE5

        ! Calls
    call TERMINATE
    call rite

end subroutine TERMINATE5