SUBROUTINE FOO ( D )

Argument Definitions (+ indicates altered content)
integer            D(*,*)
Source file:dims.f
Intrinsic Functions Called
character          CHAR
integer            ICHAR,      LEN
External Functions and Subroutines Called
character          STR
Parameter Variables Used
integer            N                  (N = 1)
integer            M                  (M = 2)
integer            K                  (K = 3)
Local Variables (+ indicates altered content)
character*10      +C(LEN('won''t'))
integer           +A(1:M*N,-N+2)