Sign in
eclipse
/
gerrit
/
ptp
/
org.eclipse.photran
/
3d8d6c031fe2055f48f724ff2a34ff21191b2fce
/
.
/
org.eclipse.photran.core.vpg.tests
/
encapsulate-variable-test-code
/
test-encap-06a-fail-array.f90
blob: 1d2e6c2d29cc3fb59750b3c4f9a054869f9c3139 [
file
] [
log
] [
blame
]
module
mod
implicit
none
integer
,
dimension
(
3
)
::
variable
!
3
,
28
,
8
end
module
program encap1
use
mod
implicit
none
variable
=
(
/ 1, 2, 3 /
)
print
*,
variable
end
program encap1