...

diff --git a/helm/software/matita/tests/a.ma b/helm/software/matita/tests/a.ma
index 1061544d0b5891ab04689722b1a3057c69673b1e..8ca9e669aa06681de53c3cfb98a4d3ce1883317b 100644 (file)
--- a/helm/software/matita/tests/a.ma
+++ b/helm/software/matita/tests/a.ma
@@ -23,8 +23,8 @@ notation "#" non associative with precedence 90 for @{ 'sharp }.
 interpretation "a" 'sharp = a.
 interpretation "b" 'sharp = b. 
 
-ntheorem prova : (A → B → C) → C.
-napply (λH.?);
-napply (H ? ?);
+ntheorem prova : ((A → A → B) → (A → B) → C) → C.
+# H;
+napply (H ? ?) [#L | #K1; #K2]
 napply #.
 nqed. 
\ No newline at end of file