Renamed iterative into map_iter_p and moved around a few theorems.

[helm.git] / helm / software / matita / dama / fields.ma

diff --git a/helm/software/matita/dama/fields.ma b/helm/software/matita/dama/fields.ma
index 2aac4f446faa08237fe5ca25265e51630de0b147..305c49764e9b651f368171ce00db323b29568956 100644 (file)
--- a/helm/software/matita/dama/fields.ma
+++ b/helm/software/matita/dama/fields.ma
@@ -55,5 +55,6 @@ theorem inv_inverse: ∀F:field.∀x:F.∀p: x ≠ 0. (inv ? x p)*x = 1.
  apply (inv_inverse_ ? ? (field_properties F)).
 qed.
 
+(*CSC: qua funzionava anche mettendo ? al posto della prima F*)
 definition sum_field ≝
- λF:field. sum ? (plus F) 0 1.
+ λF:field. sum F (plus F) 0 1.