d:1350

w:~2!(+/2\{+/(d;x*x;3*x;2*x*y;y;y*y)}.)''(!50),/:\:!50
m:w*{1 1~x}''(!50),/:\:!50

-1+|/|/{~x . 31 39}{w*(x+x>0)|(+-1_'0,'+x)|(+1_'(+x),'0)|(1_'x,'0)|(0,'-1_'x)}/m
/ 92

+/+/0<50{w*(x+x>0)|(+-1_'0,'+x)|(+1_'(+x),'0)|(1_'x,'0)|(0,'-1_'x)}/m
/ 124