1
function f1(n, m)
2
    print "hello";
3
    for i in [n..m] do
4
       print i;
5
    end for;
6
    return n+m;
7
end function;
8

9
function k(n)
10
    return n + 1;
11
end function;
12

13
intrinsic t(n::RngIntElt, m::RngIntElt) -> RngIntElt
14
{This intrinsic returns n + m.}
15
    return n + m;
16
end intrinsic;
17

18
intrinsic t(n::FldRatElt, m::FldRatElt) -> RngIntElt
19
{This intrinsic returns n + m.}
20
    return n* m;
21
end intrinsic;
22

23

24
procedure g1(n, m)
25
    print "hello";
26
end procedure;
27

28