freescale porting

[helm.git] / helm / software / matita / contribs / ng_assembly / common / option.ma

diff --git a/helm/software/matita/contribs/ng_assembly/common/option.ma b/helm/software/matita/contribs/ng_assembly/common/option.ma
index 244f087f36b807d70b4b99541b84dd5a8c8eccb7..62da6590013f8edc1d5c9518904ccb96a8ae4ac0 100644 (file)
--- a/helm/software/matita/contribs/ng_assembly/common/option.ma
+++ b/helm/software/matita/contribs/ng_assembly/common/option.ma
@@ -31,7 +31,7 @@ ninductive option (A:Type) : Type ≝
 | Some : A → option A.
 
 ndefinition eq_option ≝
-λT.λop1,op2:option T.λf:T → T → bool.
+λT.λf:T → T → bool.λop1,op2:option T.
  match op1 with
   [ None ⇒ match op2 with [ None ⇒ true | Some _ ⇒ false ]
   | Some x1 ⇒ match op2 with [ None ⇒ false | Some x2 ⇒ f x1 x2 ]