paranoia.sbk

lcc source code enjoy your self

fmuld %f24,%f28,%f28
faddd %f26,%f28,%f28
fsubd %f30,%f28,%f28
faddd %f28,%f30,%f28
fsubd %f30,%f28,%f28
faddd %f28,%f30,%f30
st %f30,[%l2]; st %f31,[%l2+4]
.L128:
set Z,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set Z1,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbule .L130; nop
set Zero,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f30,%f28; nop; fbug .L127; nop
.L130:
.L131:
.L134:
set Y1,%l3
set Y,%l2
ld [%l2],%f30; ld [%l2+4],%f31
st %f30,[%l3]; st %f31,[%l3+4]
set Half,%l1
ld [%l1],%f30; ld [%l1+4],%f31
ld [%l3],%f28; ld [%l3+4],%f29
fmuld %f30,%f28,%f26
set ThirtyTwo,%l3
ld [%l3],%f24; ld [%l3+4],%f25
fmuld %f24,%f28,%f24
fmuld %f24,%f28,%f28
faddd %f26,%f28,%f28
fsubd %f30,%f28,%f28
faddd %f28,%f30,%f28
fsubd %f30,%f28,%f28
faddd %f28,%f30,%f30
st %f30,[%l2]; st %f31,[%l2+4]
.L135:
set Y,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set Y1,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbule .L137; nop
set Zero,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f30,%f28; nop; fbug .L134; nop
.L137:
set X1,%l3
set X,%l2
ld [%l2],%f30; ld [%l2+4],%f31
st %f30,[%l3]; st %f31,[%l3+4]
ld [%l3],%f30; ld [%l3+4],%f31
set F9,%l3
ld [%l3],%f28; ld [%l3+4],%f29
set Half,%l3
ld [%l3],%f26; ld [%l3+4],%f27
fmuld %f26,%f30,%f26
set ThirtyTwo,%l3
ld [%l3],%f24; ld [%l3+4],%f25
fmuld %f24,%f30,%f24
fmuld %f24,%f30,%f30
faddd %f26,%f30,%f30
fsubd %f30,%f28,%f30
faddd %f30,%f28,%f30
st %f30,[%l2]; st %f31,[%l2+4]
.L132:
set X,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set X1,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbule .L138; nop
set Zero,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f30,%f28; nop; fbug .L131; nop
.L138:
set X1,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set Y1,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f30,%f28; nop; fbne .L141; nop
set Z1,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f30,%f28; nop; fbe .L139; nop
.L141:
set 1,%o0
set .L142,%o1
call BadCond; nop
set .L143,%o0
set X1,%l3
ld [%l3],%f30; ld [%l3+4],%f31
st %f30,[%sp+4*1+68]
st %f31,[%sp+4*2+68]
ld [%sp+4*1+68],%o1
ld [%sp+4*2+68],%o2
set Y1,%l3
ld [%l3],%f30; ld [%l3+4],%f31
st %f30,[%sp+4*3+68]
st %f31,[%sp+4*4+68]
ld [%sp+4*3+68],%o3
ld [%sp+4*4+68],%o4
set Z1,%l3
ld [%l3],%f30; ld [%l3+4],%f31
st %f30,[%sp+4*5+68]
st %f31,[%sp+4*6+68]
ld [%sp+4*5+68],%o5
call printf; nop
set .L144,%o0
call printf; nop
set .L145,%o0
call printf; nop
set .L146,%o0
call notify; nop
set U1,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set X1,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbe .L150; nop
set Y1,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbe .L150; nop
set Z1,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbne .L140; nop
.L150:
set .L151,%o0
call printf; nop
ba .L140; nop
.L139:
set Z1,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set U1,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f30,%f28; nop; fbne .L154; nop
set Z2,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set U2,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f30,%f28; nop; fbe .L152; nop
.L154:
set Z1,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set U1,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f30,%f28; nop; fbuge .L157; nop
set Z2,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set U2,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f30,%f28; nop; fbul .L155; nop
.L157:
mov %g0,%o0
set .L158,%o1
call BadCond; nop
set .L159,%o0
call notify; nop
set .L160,%o0
set U1,%l3
ld [%l3],%f30; ld [%l3+4],%f31
st %f30,[%sp+4*1+68]
st %f31,[%sp+4*2+68]
ld [%sp+4*1+68],%o1
ld [%sp+4*2+68],%o2
set Z1,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fsubd %f28,%f30,%f30
st %f30,[%sp+4*3+68]
st %f31,[%sp+4*4+68]
ld [%sp+4*3+68],%o3
ld [%sp+4*4+68],%o4
call printf; nop
set .L161,%o0
set U2,%l3
ld [%l3],%f30; ld [%l3+4],%f31
st %f30,[%sp+4*1+68]
st %f31,[%sp+4*2+68]
ld [%sp+4*1+68],%o1
ld [%sp+4*2+68],%o2
set Z2,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fsubd %f28,%f30,%f30
st %f30,[%sp+4*3+68]
st %f31,[%sp+4*4+68]
ld [%sp+4*3+68],%o3
ld [%sp+4*4+68],%o4
call printf; nop
ba .L156; nop
.L155:
set Zero,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set Z1,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbule .L164; nop
set Z2,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbug .L162; nop
.L164:
set .L165,%o0
set Radix,%l3
ld [%l3],%f30; ld [%l3+4],%f31
st %f30,[%sp+4*1+68]
st %f31,[%sp+4*2+68]
ld [%sp+4*1+68],%o1
ld [%sp+4*2+68],%o2
call printf; nop
set .L166,%o0
call printf; nop
set .L167,%o0
set Z1,%l3
ld [%l3],%f30; ld [%l3+4],%f31
st %f30,[%sp+4*1+68]
st %f31,[%sp+4*2+68]
ld [%sp+4*1+68],%o1
ld [%sp+4*2+68],%o2
set Z2,%l3
ld [%l3],%f30; ld [%l3+4],%f31
st %f30,[%sp+4*3+68]
st %f31,[%sp+4*4+68]
ld [%sp+4*3+68],%o3
ld [%sp+4*4+68],%o4
call printf; nop
set .L168,%o0
call notify; nop
.L162:
set Z1,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set Z2,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f30,%f28; nop; fbne .L171; nop
set Zero,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f30,%f28; nop; fbule .L169; nop
.L171:
set X,%l3
set Z1,%l2
ld [%l2],%f30; ld [%l2+4],%f31
set U1,%l2
ld [%l2],%f28; ld [%l2+4],%f29
fdivd %f30,%f28,%f30
st %f30,[%l3]; st %f31,[%l3+4]
set Y,%l2
set Z2,%l1
ld [%l1],%f30; ld [%l1+4],%f31
set U2,%l1
ld [%l1],%f28; ld [%l1+4],%f29
fdivd %f30,%f28,%f30
st %f30,[%l2]; st %f31,[%l2+4]
ld [%l2],%f30; ld [%l2+4],%f31
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f30,%f28; nop; fbule .L172; nop
set X,%l3
set Y,%l2
ld [%l2],%f30; ld [%l2+4],%f31
st %f30,[%l3]; st %f31,[%l3+4]
.L172:
set X,%l3
ld [%l3],%f30; ld [%l3+4],%f31
st %f30,[%sp+4*0+68]
st %f31,[%sp+4*1+68]
ld [%sp+4*0+68],%o0
ld [%sp+4*1+68],%o1
call log; nop
fmovs %f0,%f30; fmovs %f1,%f31
set Q,%l3
fnegs %f30,%f30; fmovs %f31,%f31
st %f30,[%l3]; st %f31,[%l3+4]
set .L174,%o0
call printf; nop
set Radix,%l3
ld [%l3],%f30; ld [%l3+4],%f31
st %f30,[%sp+4*0+68]
st %f31,[%sp+4*1+68]
ld [%sp+4*0+68],%o0
ld [%sp+4*1+68],%o1
call log; nop
fmovs %f0,%f30; fmovs %f1,%f31
set .L175,%o0
set Q,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fdivd %f28,%f30,%f30
st %f30,[%sp+4*1+68]
st %f31,[%sp+4*2+68]
ld [%sp+4*1+68],%o1
ld [%sp+4*2+68],%o2
call printf; nop
set .L94,%l3
ld [%l3],%f30; ld [%l3+4],%f31
st %f30,[%sp+4*0+68]
st %f31,[%sp+4*1+68]
ld [%sp+4*0+68],%o0
ld [%sp+4*1+68],%o1
call log; nop
fmovs %f0,%f30; fmovs %f1,%f31
set .L176,%o0
set Q,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fdivd %f28,%f30,%f30
st %f30,[%sp+4*1+68]
st %f31,[%sp+4*2+68]
ld [%sp+4*1+68],%o1
ld [%sp+4*2+68],%o2
call printf; nop
.L169:
set .L151,%o0
call printf; nop
.L156:
.L152:
.L140:
call Pause; nop
set Milestone,%l3
set 35,%l2
st %l2,[%l3]
set Radix,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set Two,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f30,%f28; nop; fbul .L177; nop
set X,%l3
set Radix,%l2
ld [%l2],%f30; ld [%l2+4],%f31
set W,%l2
ld [%l2],%f28; ld [%l2+4],%f29
fmuld %f30,%f30,%f30
fdivd %f28,%f30,%f30
st %f30,[%l3]; st %f31,[%l3+4]
set Y,%l2
ld [%l3],%f30; ld [%l3+4],%f31
set One,%l1
ld [%l1],%f28; ld [%l1+4],%f29
faddd %f30,%f28,%f28
st %f28,[%l2]; st %f29,[%l2+4]
set Z,%l1
ld [%l2],%f28; ld [%l2+4],%f29
fsubd %f28,%f30,%f30
st %f30,[%l1]; st %f31,[%l1+4]
set T,%l2
ld [%l1],%f30; ld [%l1+4],%f31
set U2,%l1
ld [%l1],%f28; ld [%l1+4],%f29
faddd %f30,%f28,%f26
st %f26,[%l2]; st %f27,[%l2+4]
ld [%l2],%f26; ld [%l2+4],%f27
fsubd %f26,%f30,%f30
st %f30,[%l3]; st %f31,[%l3+4]
mov %g0,%o0
ld [%l3],%f30; ld [%l3+4],%f31
fcmpd %f30,%f28; nop; fbne .L181; nop
set 1,%l3
st %l3,[%fp+-24]
ba .L182; nop
.L181:
st %g0,[%fp+-24]
.L182:
ld [%fp+-24],%o1
set .L180,%o2
call TstCond; nop
set X,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set U2,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f30,%f28; nop; fbne .L183; nop
set .L185,%o0
call printf; nop
.L183:
.L177:
set .L186,%o0
call printf; nop
set Y,%l3
set F9,%l2
ld [%l2],%f30; ld [%l2+4],%f31
set One,%l2
ld [%l2],%f28; ld [%l2+4],%f29
fmuld %f30,%f28,%f26
st %f26,[%l3]; st %f27,[%l3+4]
set Z,%l2
fmuld %f28,%f30,%f26
st %f26,[%l2]; st %f27,[%l2+4]
set X,%l1
set Half,%l0
ld [%l0],%f26; ld [%l0+4],%f27
fsubd %f30,%f26,%f30
st %f30,[%l1]; st %f31,[%l1+4]
ld [%l1],%f30; ld [%l1+4],%f31
ld [%l3],%f24; ld [%l3+4],%f25
fsubd %f24,%f26,%f24
fsubd %f24,%f30,%f24
st %f24,[%l3]; st %f25,[%l3+4]
ld [%l2],%f24; ld [%l2+4],%f25
fsubd %f24,%f26,%f26
fsubd %f26,%f30,%f30
st %f30,[%l2]; st %f31,[%l2+4]
set U2,%l3
ld [%l3],%f30; ld [%l3+4],%f31
faddd %f28,%f30,%f26
st %f26,[%l1]; st %f27,[%l1+4]
set T,%l3
ld [%l1],%f26; ld [%l1+4],%f27
set Radix,%l2
ld [%l2],%f24; ld [%l2+4],%f25
fmuld %f26,%f24,%f22
st %f22,[%l3]; st %f23,[%l3+4]
set R,%l2
fmuld %f24,%f26,%f26
st %f26,[%l2]; st %f27,[%l2+4]
ld [%l3],%f26; ld [%l3+4],%f27
fsubd %f26,%f24,%f26
st %f26,[%l1]; st %f27,[%l1+4]
fmuld %f24,%f30,%f30
ld [%l1],%f26; ld [%l1+4],%f27
fsubd %f26,%f30,%f26
st %f26,[%l1]; st %f27,[%l1+4]
ld [%l2],%f26; ld [%l2+4],%f27
fsubd %f26,%f24,%f26
st %f26,[%l3]; st %f27,[%l3+4]
ld [%l3],%f26; ld [%l3+4],%f27
fsubd %f26,%f30,%f30
st %f30,[%l3]; st %f31,[%l3+4]
fsubd %f24,%f28,%f30
ld [%l1],%f28; ld [%l1+4],%f29
fmuld %f28,%f30,%f28
st %f28,[%l1]; st %f29,[%l1+4]
ld [%l3],%f28; ld [%l3+4],%f29
fmuld %f28,%f30,%f30
st %f30,[%l3]; st %f31,[%l3+4]
set Zero,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set X,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbne .L187; nop
set Y,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbne .L187; nop
set Z,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbne .L187; nop
set T,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbne .L187; nop
set GMult,%l3
set 1,%l2
st %l2,[%l3]
ba .L188; nop
.L187:
mov %g0,%l3
set GMult,%l2
st %l3,[%l2]
set 1,%o0
mov %l3,%o1
set .L189,%o2
call TstCond; nop
.L188:
set Z,%l3
set Radix,%l2
ld [%l2],%f30; ld [%l2+4],%f31
set U2,%l2
ld [%l2],%f28; ld [%l2+4],%f29
fmuld %f30,%f28,%f30
st %f30,[%l3]; st %f31,[%l3+4]
set X,%l2
ld [%l3],%f30; ld [%l3+4],%f31
set One,%l3
ld [%l3],%f28; ld [%l3+4],%f29
faddd %f28,%f30,%f28
st %f28,[%l2]; st %f29,[%l2+4]
ld [%l2],%f28; ld [%l2+4],%f29
faddd %f28,%f30,%f30
fmuld %f28,%f28,%f28
fsubd %f30,%f28,%f30
st %f30,[%sp+4*0+68]
st %f31,[%sp+4*1+68]
ld [%sp+4*0+68],%o0
ld [%sp+4*1+68],%o1
call fabs; nop
fmovs %f0,%f30; fmovs %f1,%f31
set U2,%l3
ld [%l3],%f28; ld [%l3+4],%f29
set Y,%l3
fsubd %f30,%f28,%f30
st %f30,[%l3]; st %f31,[%l3+4]
set X,%l3
set One,%l2
ld [%l2],%f30; ld [%l2+4],%f31
fsubd %f30,%f28,%f30
st %f30,[%l3]; st %f31,[%l3+4]
ld [%l3],%f30; ld [%l3+4],%f31
fsubd %f30,%f28,%f28
fmuld %f30,%f30,%f30
fsubd %f28,%f30,%f30
st %f30,[%sp+4*0+68]
st %f31,[%sp+4*1+68]
ld [%sp+4*0+68],%o0
ld [%sp+4*1+68],%o1
call fabs; nop
fmovs %f0,%f30; fmovs %f1,%f31
set Z,%l3
set U1,%l2
ld [%l2],%f28; ld [%l2+4],%f29
fsubd %f30,%f28,%f30
st %f30,[%l3]; st %f31,[%l3+4]
mov %g0,%o0
set Zero,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set Y,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbug .L192; nop
set Z,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbug .L192; nop
set 1,%l3
st %l3,[%fp+-24]
ba .L193; nop
.L192:
st %g0,[%fp+-24]
.L193:
ld [%fp+-24],%o1
set .L191,%o2
call TstCond; nop
set Y,%l3
set One,%l2
ld [%l2],%f30; ld [%l2+4],%f31
set U2,%l2
ld [%l2],%f28; ld [%l2+4],%f29
fsubd %f30,%f28,%f26
st %f26,[%l3]; st %f27,[%l3+4]
set X,%l2
faddd %f30,%f28,%f28
st %f28,[%l2]; st %f29,[%l2+4]
set Z,%l1
ld [%l3],%f28; ld [%l3+4],%f29
fdivd %f30,%f28,%f28
st %f28,[%l1]; st %f29,[%l1+4]
ld [%l1],%f28; ld [%l1+4],%f29
ld [%l2],%f26; ld [%l2+4],%f27
fsubd %f28,%f26,%f28
st %f28,[%l3]; st %f29,[%l3+4]
set Three,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fdivd %f30,%f28,%f30
st %f30,[%l2]; st %f31,[%l2+4]
set Nine,%l3
ld [%l3],%f30; ld [%l3+4],%f31
fdivd %f28,%f30,%f28
st %f28,[%l1]; st %f29,[%l1+4]
ld [%l1],%f28; ld [%l1+4],%f29
ld [%l2],%f26; ld [%l2+4],%f27
fsubd %f26,%f28,%f26
st %f26,[%l2]; st %f27,[%l2+4]
set T,%l3
set TwentySeven,%l2
ld [%l2],%f26; ld [%l2+4],%f27
fdivd %f30,%f26,%f30
st %f30,[%l3]; st %f31,[%l3+4]
ld [%l3],%f30; ld [%l3+4],%f31
fsubd %f28,%f30,%f30
st %f30,[%l1]; st %f31,[%l1+4]
set 2,%o0
set Zero,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set X,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbne .L196; nop
set Y,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbne .L196; nop
set Z,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbne .L196; nop
set 1,%l3
st %l3,[%fp+-28]
ba .L197; nop
.L196:
st %g0,[%fp+-28]
.L197:
ld [%fp+-28],%o1
set .L195,%o2
call TstCond; nop
set Y,%l3
set F9,%l2
ld [%l2],%f30; ld [%l2+4],%f31
set One,%l2
ld [%l2],%f28; ld [%l2+4],%f29
fdivd %f30,%f28,%f26
st %f26,[%l3]; st %f27,[%l3+4]
set X,%l2
set Half,%l1
ld [%l1],%f26; ld [%l1+4],%f27
fsubd %f30,%f26,%f30
st %f30,[%l2]; st %f31,[%l2+4]
ld [%l3],%f30; ld [%l3+4],%f31
fsubd %f30,%f26,%f30
ld [%l2],%f26; ld [%l2+4],%f27
fsubd %f30,%f26,%f30
st %f30,[%l3]; st %f31,[%l3+4]
set U2,%l3
ld [%l3],%f30; ld [%l3+4],%f31
faddd %f28,%f30,%f30
st %f30,[%l2]; st %f31,[%l2+4]
set T,%l3
ld [%l2],%f30; ld [%l2+4],%f31
fdivd %f30,%f28,%f28
st %f28,[%l3]; st %f29,[%l3+4]
ld [%l3],%f28; ld [%l3+4],%f29