-(* Sviluppato da: Cosimo Oliboni, oliboni@cs.unibo.it *)
-(* Cosimo Oliboni, oliboni@cs.unibo.it *)
+(* Sviluppato da: Ing. Cosimo Oliboni, oliboni@cs.unibo.it *)
+(* Ultima modifica: 05/08/2009 *)
(* *)
(* ********************************************************************** *)
include "freescale/memory_abs.ma".
include "freescale/opcode_base.ma".
(* *)
(* ********************************************************************** *)
include "freescale/memory_abs.ma".
include "freescale/opcode_base.ma".
| Some c1' ⇒ match c2 with
[ None ⇒ false | Some c2' ⇒ (eq_b8 (fst5T … c1') (fst5T … c2')) ⊗
(eq_anyop m (snd5T … c1') (snd5T … c2')) ⊗
| Some c1' ⇒ match c2 with
[ None ⇒ false | Some c2' ⇒ (eq_b8 (fst5T … c1') (fst5T … c2')) ⊗
(eq_anyop m (snd5T … c1') (snd5T … c2')) ⊗