Sign in
eclipse
/
gerrit
/
ptp
/
org.eclipse.photran
/
65cdf33e0d42740b5aebad638082ce794093e0f0
/
.
/
org.eclipse.photran-samples
/
src-common
/
change_c.f90
blob: d028d90d1889a4e8351127ef050f2938f4b1c98c [
file
] [
log
] [
blame
]
subroutine change_c
implicit
none
!
Now
k
is
the same
as
c
in
main
.
f90
common
/
common
/
k
complex
::
k
k
=
(
5
,
6
)
end
subroutine