Subroutine TERMINATE7
subroutine TERMINATE7 ! Calls call TERMINATE call rite end subroutine TERMINATE7