(test_not_impl_byte b RS08_not_impl_byte ⊙ eq_nat (get_byte_count RS08 b 0 opcode_table_RS08) 1) ⊗
(⊖ (test_not_impl_byte b RS08_not_impl_byte) ⊙ eq_nat (get_byte_count RS08 b 0 opcode_table_RS08) 0))
= true.
- napply (refl_eq ??).
+ napply refl_eq.
nqed.
(* RS08: pseudocodici non implementati come da manuale *)
(test_not_impl_pseudo o RS08_not_impl_pseudo ⊙ le_nat 1 (get_pseudo_count RS08 o 0 opcode_table_RS08)) ⊗
(⊖ (test_not_impl_pseudo o RS08_not_impl_pseudo) ⊙ eq_nat (get_pseudo_count RS08 o 0 opcode_table_RS08) 0))
= true.
- napply (refl_eq ??).
+ napply refl_eq.
nqed.
(* RS08: modalita' non implementate come da manuale *)
(test_not_impl_mode i RS08_not_impl_mode ⊙ le_nat 1 (get_mode_count RS08 i 0 opcode_table_RS08)) ⊗
(⊖ (test_not_impl_mode i RS08_not_impl_mode) ⊙ eq_nat (get_mode_count RS08 i 0 opcode_table_RS08) 0))
= true.
- napply (refl_eq ??).
+ napply refl_eq.
nqed.
nlemma ok_OpIm_table_RS08 :
forall_instr_mode (λi:instr_mode.
forall_opcode (λop:opcode.
le_nat (get_OpIm_count RS08 (anyOP RS08 op) i 0 opcode_table_RS08) 1)) = true.
- napply (refl_eq ??).
+ napply refl_eq.
nqed.