# HG changeset patch # User haftmann # Date 1126764982 -7200 # Node ID 9147c880ada66afaae0bb92c45fb6eea6c37e0d1 # Parent 6ede71a506f5a5cc74ebfb864632d00aa06a40db fixed type annotation diff -r 6ede71a506f5 -r 9147c880ada6 src/HOL/Integ/reflected_presburger.ML --- a/src/HOL/Integ/reflected_presburger.ML Thu Sep 15 07:35:38 2005 +0200 +++ b/src/HOL/Integ/reflected_presburger.ML Thu Sep 15 08:16:22 2005 +0200 @@ -2,7 +2,7 @@ (* Caution: This file should not be modified. *) (* It is autmatically generated from HOL/ex/Reflected_Presburger.thy *) -fun (nat: IntInf.int -> IntInf.int) i = if i < 0 then 0 else i; +fun nat (i:IntInf.int) = if i < 0 then 0 else i : IntInf.int; structure Generated = struct diff -r 6ede71a506f5 -r 9147c880ada6 src/HOL/Tools/Presburger/reflected_presburger.ML --- a/src/HOL/Tools/Presburger/reflected_presburger.ML Thu Sep 15 07:35:38 2005 +0200 +++ b/src/HOL/Tools/Presburger/reflected_presburger.ML Thu Sep 15 08:16:22 2005 +0200 @@ -2,7 +2,7 @@ (* Caution: This file should not be modified. *) (* It is autmatically generated from HOL/ex/Reflected_Presburger.thy *) -fun (nat: IntInf.int -> IntInf.int) i = if i < 0 then 0 else i; +fun nat (i:IntInf.int) = if i < 0 then 0 else i : IntInf.int; structure Generated = struct