
c[y*(SI b>-a ALORS d SINON e-x-y), f, g[h]]:=i/(j*(k-g[-m]))

