freescale porting, work in progress

[helm.git] / helm / software / matita / contribs / CoRN-Decl / algebra / CVectorSpace.ma

diff --git a/helm/software/matita/contribs/CoRN-Decl/algebra/CVectorSpace.ma b/helm/software/matita/contribs/CoRN-Decl/algebra/CVectorSpace.ma
index afaa471d20ba07010bfb1a8d2efa2887a55ddd55..7c3b812504fe2952b2830c0d8fe653711e1fa9f5 100644 (file)
--- a/helm/software/matita/contribs/CoRN-Decl/algebra/CVectorSpace.ma
+++ b/helm/software/matita/contribs/CoRN-Decl/algebra/CVectorSpace.ma
@@ -44,7 +44,7 @@ Unset Strict Implicit.
 
 inline "cic:/CoRN/algebra/CVectorSpace/VSpace.ind".
 
-coercion "cic:/matita/CoRN-Decl/algebra/CVectorSpace/vs_vs.con" 0 (* compounds *).
+coercion cic:/matita/CoRN-Decl/algebra/CVectorSpace/vs_vs.con 0 (* compounds *).
 
 (* begin hide *)
 
@@ -66,6 +66,10 @@ Hint Resolve vs_assoc vs_unit vs_distl vs_distr: algebra.
 Implicit Arguments vs_op [F v].
 *)
 
+(* NOTATION
+Infix "[']" := vs_op (at level 30, no associativity).
+*)
+
 (*#*
 %\begin{convention}%
 Let [F] be a fiels and let [V] be a vector space over [F]
@@ -73,12 +77,12 @@ Let [F] be a fiels and let [V] be a vector space over [F]
 *)
 
 (* UNEXPORTED
-Section VS_basics.
+Section VS_basics
 *)
 
-inline "cic:/CoRN/algebra/CVectorSpace/F.var".
+alias id "F" = "cic:/CoRN/algebra/CVectorSpace/VS_basics/F.var".
 
-inline "cic:/CoRN/algebra/CVectorSpace/V.var".
+alias id "V" = "cic:/CoRN/algebra/CVectorSpace/VS_basics/V.var".
 
 inline "cic:/CoRN/algebra/CVectorSpace/vs_op_zero.con".
 
@@ -115,7 +119,7 @@ inline "cic:/CoRN/algebra/CVectorSpace/vs_op_resp_ap_zero.con".
 inline "cic:/CoRN/algebra/CVectorSpace/vs_op_resp_ap_lft.con".
 
 (* UNEXPORTED
-End VS_basics.
+End VS_basics
 *)
 
 (* UNEXPORTED