Run R+dsb+po in model, using armmem

ARM R+dsb+po
"DSBdWW Wse PodWR Fre"
Cycle=Fre DSBdWW Wse PodWR
{
%x0=x; %y0=y;
%y1=y; %x1=x;
}
P0 | P1 ;
MOV R0, #1 | MOV R0, #2 ;
STR R0, [%x0] | STR R0, [%y1] ;
DSB | LDR R1, [%x1] ;
MOV R1, #1 | ;
STR R1, [%y0] | ;
exists
(y=2 /\ 1:R1=0)