SUBROUTINE FOO ( A, M, N )

Argument Definitions (+ indicates altered content)
INTEGER            m,          n
REAL               a(m,n)
Source file:t208l.f