home *** CD-ROM | disk | FTP | other *** search
/ Crawly Crypt Collection 1 / crawlyvol1.bin / program / compiler / vici_102 / examples / ff.e < prev    next >
Text File  |  1992-10-20  |  257b  |  21 lines

  1. class ff
  2. feature
  3.     i: integer;
  4.     create is
  5.     do
  6.     from
  7.     i:=0;
  8.     until i = 10
  9.     loop io.putint(i);io.new_line;i:=i+1
  10.     end;
  11.     
  12.     from i :=10
  13.     invariant i >=0 and i <=10
  14.     variant i
  15.     until i = 0
  16.     loop
  17.         io.putint(i);io.new_line;i:=i-1
  18.     end
  19.     end
  20. end
  21.