SUBROUTINE FOO END