Sign in
chromium
/
external
/
github.com
/
git
/
git
/
bdccf5e086e5e45e5feccc22f9da0633c2492da1
/
.
/
t
/
t4018
/
fortran-external-function
blob: 5a2d85d3aa410ea3fceb8eb23224afed06191753 [
file
] [
log
] [
blame
]
function
RIGHT
(
a
,
b
)
result
(
c
)
integer
,
intent
(
in
)
::
ChangeMe
integer
,
intent
(
in
)
::
b
integer
,
intent
(
out
)
::
c
c
=
a
+
b
end
function
RIGHT