fact: Definition default_table : table := fun op => match op with | OpBCall => ≪ TRUE , LabPC , JOIN Lab1 LabPC≫ | OpBRet => ≪ TRUE , JOIN Lab2 LabPC , Lab1 ≫ | OpNop => ≪ TRUE , __ , LabPC ≫ | OpPush => ≪ TRUE , BOT , LabPC ≫ | OpAdd => ≪ TRUE , JOIN Lab1 Lab2, LabPC ≫ | OpLoad => ≪ TRUE , JOIN Lab1 Lab2 , LabPC ≫ | OpStore => ≪ LE (JOIN Lab1 LabPC) Lab3, JOIN LabPC (JOIN Lab1 Lab2) , LabPC ≫ end.
imports: ZArith List MSetPositive