diff options
Diffstat (limited to 'src/examples')
-rw-r--r-- | src/examples/iteration.ft | 8 | ||||
-rw-r--r-- | src/examples/selection.ft | 6 |
2 files changed, 14 insertions, 0 deletions
diff --git a/src/examples/iteration.ft b/src/examples/iteration.ft new file mode 100644 index 0000000..22a2bfb --- /dev/null +++ b/src/examples/iteration.ft @@ -0,0 +1,8 @@ +int dimension(5)::test +int::i +do i=0,4 +test(i)=i +end do +do i=0,4 +print*,test(i) +end do
\ No newline at end of file diff --git a/src/examples/selection.ft b/src/examples/selection.ft new file mode 100644 index 0000000..21100b2 --- /dev/null +++ b/src/examples/selection.ft @@ -0,0 +1,6 @@ +character (len=10)::hello +hello="hello" +if 4==5 then +hello="goodbye " +endif +print *,hello,6," world" endprint
\ No newline at end of file |