Define R0 | o[3..0]; 
    Sig 1111 temp; 
    Or bb temp o; 
Endef; 

Define R1 | o[3..0]; 
    Sig 0101 temp; 
    Or bb temp o; 
Endef; 

Define R2 | o[3..0]; 
    Sig 0011 temp; 
    Or bb temp o; 
Endef; 

Define R3 | o[3..0]; 
    Sig 1010 temp; 
    Or bb temp o; 
Endef; 


Probe ad R33; 
Probe ae R32; 
Probe af R31; 
Probe ag R30;

R3 bd-bg | R33 R32 R31 R30;

Probe cd R23; 
Probe ce R22; 
Probe cf R21; 
Probe cg R20;

R2 dd-dg | R23 R22 R21 R20;

Probe ed R13; 
Probe ee R12; 
Probe ef R11; 
Probe eg R10;
R1 fd-fg | R13 R12 R11 R10;

Probe gd R03; 
Probe ge R02;
Probe gf R01;
Probe gg R00;
R0 hd-hg | R03 R02 R01 R00;


Dec aa-ha ONE sw1 sw0 | sel3 sel2 sel1 sel0;

Switch ka sw0 '1' ZERO;
Switch ja sw1 '2' ZERO;

Tsb bi R33 sel3 out3;
Tsb bi R32 sel3 out2;
Tsb bi R31 sel3 out1;
Tsb bi R30 sel3 out0;

Tsb di R23 sel2 out3;
Tsb di R22 sel2 out2;
Tsb di R21 sel2 out1;
Tsb di R20 sel2 out0;

Tsb fi R13 sel1 out3;
Tsb fi R12 sel1 out2;
Tsb fi R11 sel1 out1;
Tsb fi R10 sel1 out0;

Tsb hi R03 sel0 out3;
Tsb hi R02 sel0 out2;
Tsb hi R01 sel0 out1;
Tsb hi R00 sel0 out0;


Probe bb sel3;
Probe db sel2;
Probe fb sel1;
Probe hb sel0;

Probe dl out3;
Probe dm out2;
Probe dn out1;
Probe do out0;