let assigns_goal m1 assigned m2 =
    model_ishavoc m1.alloc m1.store (region m1 assigned) m2.store