LBL "SPLIT"
STO "m"
RSUM
DET
STO 01
RCL "m"
DIM?
RCL 01
X<>Y
÷
STO 02
RCL 01
X<>Y
RCL "m"
X<>Y
-
RCL 02
X<>Y
END