X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Fcontribs%2Fng_assembly%2Ffreescale%2Ftable_HC08_tests.ma;h=76bed4e991d5df953c7800ca05e42d4b62205540;hb=f538a0b46ba4164a21a76e47a6ed3b3e9deb5041;hp=6060d41fb7314c997fe42ada84f382964217cbf4;hpb=a687cf5e3e9ae6fb6ead058c4a191002f21fa951;p=helm.git

diff --git a/helm/software/matita/contribs/ng_assembly/freescale/table_HC08_tests.ma b/helm/software/matita/contribs/ng_assembly/freescale/table_HC08_tests.ma
index 6060d41fb..76bed4e99 100755
--- a/helm/software/matita/contribs/ng_assembly/freescale/table_HC08_tests.ma
+++ b/helm/software/matita/contribs/ng_assembly/freescale/table_HC08_tests.ma
@@ -38,7 +38,7 @@ nlemma ok_byte_table_HC08 : forall_byte8 (λb.
  (test_not_impl_byte b HC08_not_impl_byte     ⊙ eq_nat (get_byte_count HC08 b 0 opcode_table_HC08) 1) ⊗
  (⊖ (test_not_impl_byte b HC08_not_impl_byte) ⊙ eq_nat (get_byte_count HC08 b 0 opcode_table_HC08) 0))
  = true.
- napply (refl_eq ??).
+ napply refl_eq.
 nqed.
 
 (* HC08: opcode non implementati come da manuale (0x9E+byte) *)
@@ -78,7 +78,7 @@ nlemma ok_word_table_HC08 : forall_byte8 (λb.
  (test_not_impl_byte b HC08_not_impl_word     ⊙ eq_nat (get_word_count HC08 b 0 opcode_table_HC08) 1) ⊗
  (⊖ (test_not_impl_byte b HC08_not_impl_word) ⊙ eq_nat (get_word_count HC08 b 0 opcode_table_HC08) 0))
  = true.
- napply (refl_eq ??).
+ napply refl_eq.
 nqed.
 
 (* HC08: pseudocodici non implementati come da manuale *)
@@ -89,7 +89,7 @@ nlemma ok_pseudo_table_HC08 : forall_opcode (λo.
  (test_not_impl_pseudo o HC08_not_impl_pseudo     ⊙ le_nat 1 (get_pseudo_count HC08 o 0 opcode_table_HC08)) ⊗
  (⊖ (test_not_impl_pseudo o HC08_not_impl_pseudo) ⊙ eq_nat (get_pseudo_count HC08 o 0 opcode_table_HC08) 0))
  = true.
- napply (refl_eq ??).
+ napply refl_eq.
 nqed.
 
 (* HC08: modalita' non implementate come da manuale *)
@@ -111,12 +111,12 @@ nlemma ok_mode_table_HC08 : forall_instr_mode (λi.
  (test_not_impl_mode i HC08_not_impl_mode     ⊙ le_nat 1 (get_mode_count HC08 i 0 opcode_table_HC08)) ⊗
  (⊖ (test_not_impl_mode i HC08_not_impl_mode) ⊙ eq_nat (get_mode_count HC08 i 0 opcode_table_HC08) 0))
  = true.
- napply (refl_eq ??).
+ napply refl_eq.
 nqed.
 
 nlemma ok_OpIm_table_HC08 :
  forall_instr_mode (λi:instr_mode.
  forall_opcode     (λop:opcode.
   le_nat (get_OpIm_count HC08 (anyOP HC08 op) i 0 opcode_table_HC08) 1)) = true.
- napply (refl_eq ??).
+ napply refl_eq.
 nqed.