Mindshift: Part 19, sample 10

mindshift19_10.js

// Helper functions to reify the NUMBER function returned by DIV
var magnitude_quot = numFn => magnitude(HEAD(TAIL(numFn)));
var magnitude_rem  = numFn => magnitude(TAIL(TAIL(numFn)));

var div_result = numFn =>
  ({ isPos : sign(numFn),
     quot  : magnitude_quot(numFn),
     rem   : magnitude_rem(numFn)
  });