diff options
Diffstat (limited to 'src/examples/logical.ft')
| -rw-r--r-- | src/examples/logical.ft | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/src/examples/logical.ft b/src/examples/logical.ft new file mode 100644 index 0000000..d7ac3dd --- /dev/null +++ b/src/examples/logical.ft @@ -0,0 +1,14 @@ +program logical +int::a +int::b +int::c +a=6 +b=10 +c=15 +if (a==6 .and. b==10) then +print*,"'and' executed" +end if +if (a==10 .or. c==15) then +print*,"'or' executed" +end if +end program logical
\ No newline at end of file |