Sign in
eclipse
/
ptp
/
org.eclipse.photran
/
a21b85c92aeb0491365dd3fefba9574145955477
/
.
/
org.eclipse.photran.core.vpg.tests
/
refactoring-test-code
/
rename
/
bug278103-mod.f90
blob: c5e94d747e892f7710c12accdc3bfac9c783a14b [
file
] [
log
] [
blame
]
MODULE
Mod1
INTEGER
,
PARAMETER
::
DIM
=
5
!
3
,
27
CONTAINS
SUBROUTINE
PrintDim
print
*,
'DIM IS:'
print
*,
DIM
!
11
,
22
END
SUBROUTINE
PrintDim
END
MODULE
Mod1