Sign in
eclipse
/
ptp
/
org.eclipse.photran
/
a21b85c92aeb0491365dd3fefba9574145955477
/
.
/
org.eclipse.photran.core.vpg.tests
/
refactoring-test-code
/
add-subroutine-parameter
/
test1-basic
/
add_subroutine_parameter_1.f90
blob: 6434c526ab362d75b7f0556dc98b5a35ae58ed54 [
file
] [
log
] [
blame
]
program basic
!
basic test
,
adding an integer
with
intent
in
,
default
value
0
,
at position
0.
end
program basic
subroutine
sub
(
z
)
!<<<<<
4
,
1
,
4
,
5
,
integer
;
intent
(
in
)
::
y
,
0
,
0
,
pass
integer
,
intent
(
in
)
::
z
end
subroutine