File size: 103 Bytes
17c6d62 | 1 2 3 4 5 6 7 | SUBROUTINE FOO()
INTEGER BAR(2, 3)
COMMON /BLOCK/ BAR
RETURN
END
|
17c6d62 | 1 2 3 4 5 6 7 | SUBROUTINE FOO()
INTEGER BAR(2, 3)
COMMON /BLOCK/ BAR
RETURN
END
|