File: fortran-external-function

package info (click to toggle)
git 1%3A2.39.5-0%2Bdeb12u3
  • links: PTS, VCS
  • area: main
  • in suites: bookworm-proposed-updates
  • size: 56,868 kB
  • sloc: ansic: 276,518; sh: 234,536; perl: 30,909; tcl: 22,191; makefile: 4,185; python: 3,412; javascript: 772; csh: 45; ruby: 43; lisp: 12
file content (9 lines) | stat: -rw-r--r-- 144 bytes parent folder | download | duplicates (9) 
1
2
3
4
5
6
7
8
9
 
function RIGHT(a, b) result(c)

integer, intent(in) :: ChangeMe
integer, intent(in) :: b
integer, intent(out) :: c

c = a+b

end function RIGHT