int(logBASE(abs(A),2->B
0->dim(L1
fPart(abs(A/(2^B->D
While Ans and 23>dim(L1
	int(2Ans->L1(1+dim(L1
	fPart(2D->D
End
augment({not(1+tanh(A|E9))},2fPart(.5int((B+127)2^seq(X,X,~7,0
If dim(L1
augment(Ans,L1
Ans->L1
32->dim(L1