Subroutine TERMINATE23

subroutine TERMINATE23

        ! Calls
    call TERMINATE
    call rite

end subroutine TERMINATE23