src/examples/example.ft


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21

program example
int::a
int::b
int::c
a=2+3
b=3
c=a**b
print*,c

end program example


function int power(int value,int power)
int::i
int::final
final=1
do i=0,power-1
final=final*value
end do
return final
end