From: Ferruccio Guidi <ferruccio.guidi@unibo.it> Date: Sat, 14 Dec 2013 22:29:06 +0000 (+0000) Subject: one file was still missing X-Git-Tag: make_still_working~1019 X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=commitdiff_plain;h=fbb1435e16f0c737f3941fae83140a7d6454997e;p=helm.git one file was still missing --- diff --git a/matita/matita/contribs/lambdadelta/basic_2/computation/fsb_aaa.ma b/matita/matita/contribs/lambdadelta/basic_2/computation/fsb_aaa.ma index 095d1fb11..49b11f971 100644 --- a/matita/matita/contribs/lambdadelta/basic_2/computation/fsb_aaa.ma +++ b/matita/matita/contribs/lambdadelta/basic_2/computation/fsb_aaa.ma @@ -28,7 +28,7 @@ theorem aaa_fsba: âh,g,G,L,T,A. â¦G, L⦠⢠T â A â â¦G, L⦠⢠⦥ /3 width=2 by fsb_fsba, aaa_fsb/ qed. (* Advanced eliminators on atomica arity assignment for terms ***************) - +(* fact aaa_ind_fpbu: âh,g. âR:relation3 genv lenv term. (âG1,L1,T1,A. â¦G1, L1⦠⢠T1 â A â (âG2,L2,T2. â¦G1, L1, T1⦠â»[h, g] â¦G2, L2, T2⦠â R G2 L2 T2) â @@ -37,4 +37,5 @@ fact aaa_ind_fpbu: âh,g. âR:relation3 genv lenv term. âG,L,T. â¦G, L⦠⢠â¬*[h, g] T â âA. â¦G, L⦠⢠T â A â R G L T. #h #g #R #IH #G #L #T #H @(csx_ind_fpbu ⦠H) -G -L -T #G1 #L1 #T1 #H1 #IH1 #A1 #HTA1 @IH -IH // -#G2 #L2 #T2 #H12 @IH1 // \ No newline at end of file +#G2 #L2 #T2 #H12 @IH1 // +*)