diff options
Diffstat (limited to 'src/examples/subroutine.ft')
| -rw-r--r-- | src/examples/subroutine.ft | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/src/examples/subroutine.ft b/src/examples/subroutine.ft new file mode 100644 index 0000000..58171b8 --- /dev/null +++ b/src/examples/subroutine.ft @@ -0,0 +1,9 @@ +program subroutineExample +calc(3,4,5) +end program subroutineExample + +subroutine calc(int a,int b,int c) +int::total +total=a*b*c +print*,total +end
\ No newline at end of file |