%begin
  %integerfn Sum(%integer i)
    %if i<=1 %then %result=i %else %result=i+sum(i-1)
  %end
  %integer j=sum(4)
%endofprogram