Sign in
eclipse
/
ptp
/
org.eclipse.photran
/
84f4159c907f6a2576e4e85006e91ffb3824cdb2
/
.
/
org.eclipse.photran.core.vpg.tests
/
refactoring-test-code
/
rename2
/
test1
/
test.f90
blob: 28083ee91a30e78f276396e0962973e475faa028 [
file
] [
log
] [
blame
]
implicit
none
integer
::
three
=
3
;
integer
::
only_once
=
0
!<<<<<
2
,
34
,
z
,
true
,
!<<<<<
2
,
34
,
three
,
false
,
print
*,
three
!
FIXME
3
,
10
,
x
,
true
,
!
FIXME
3
,
10
,
abcdefghijklmnop
,
true
,
print
*,
three
+
(
three
*
3
-
three
)
end
program