src/HOL/SPARK/Manual/loop_invariant/proc2.fdl
author berghofe
Thu, 22 Sep 2011 16:50:23 +0200
changeset 45044 2fae15f8984d
permissions -rw-r--r--
Added documentation for HOL-SPARK

           {*******************************************************}
                               {FDL Declarations}
    {Examiner Pro Edition, Version 9.1.0, Build Date 20101119, Build 19039}
             {Copyright (C) 2010 Altran Praxis Limited, Bath, U.K.}
           {*******************************************************}


                        {DATE : 22-SEP-2011 11:10:50.42}

                       {procedure Loop_Invariant.Proc2}


title procedure proc2;

  function round__(real) : integer;
  type word32 = integer;
  const word32__base__first : integer = pending; 
  const word32__base__last : integer = pending; 
  const natural__base__first : integer = pending; 
  const natural__base__last : integer = pending; 
  const integer__base__first : integer = pending; 
  const integer__base__last : integer = pending; 
  const word32__first : integer = pending; 
  const word32__last : integer = pending; 
  const word32__modulus : integer = pending; 
  const word32__size : integer = pending; 
  const natural__first : integer = pending; 
  const natural__last : integer = pending; 
  const natural__size : integer = pending; 
  const integer__first : integer = pending; 
  const integer__last : integer = pending; 
  const integer__size : integer = pending; 
  var a : integer;
  var b : integer;
  var c : integer;
  var loop__1__i : integer;

end;