Sign in
eclipse
/
ptp
/
org.eclipse.photran
/
73e71635dd4a111800980048c8cedd2a6a62f142
/
.
/
org.eclipse.photran.core.vpg.tests
/
rename-test-code
/
bug278320-prog.f90
blob: ef0f5c721c218275b9f4bb539f348028316362d3 [
file
] [
log
] [
blame
]
PROGRAM
MyProgram
USE
Mod1
IMPLICIT NONE
INTEGER
::
local_array
(
3
)
module_array
(
1
)
=
1
!
5
,
5
local_array
(
module_array
(
2
))
=
1
!
6
,
17
END
PROGRAM
MyProgram