Subroutine TERMINATE4

subroutine TERMINATE4

        ! Calls
    call TERMINATE
    call rite

end subroutine TERMINATE4