`idiv', `irem'
--------------

idiv(I1,I2)
     :: $@@0?t=|;;$K$h$k>&(J.
irem(I1,I2)
     :: $@@0?t=|;;$K$h$k>jM>(J.

RETURN
     $@@0?t(J
I1,I2
     $@@0?t(J

   * I1 $@$N(J I2 $@$K$h$k@0?t=|;;$K$h$k>&(J, $@>jM>$r5a$a$k(J.
   * I2 $@$O(J 0 $@$G$"$C$F$O$J$i$J$$(J.
   * $@Ho=|?t$,Ii$N>l9g(J, $@@dBPCM$KBP$9$kCM$K%^%$%J%9$r$D$1$?CM$rJV$9(J.
   * I1 `%' I2 $@$O(J, $@7k2L$,@5$K@55,2=$5$l$k$3$H$r=|$1$P(J`irem()' $@$NBe$o$j(J
     $@$KMQ$$$k$3$H$,$G$-$k(J.
   * $@B?9`<0$N>l9g$O(J `sdiv', `srem' $@$rMQ$$$k(J.

     [0] idiv(100,7);
     14
     [0] idiv(-100,7);
     -14
     [1] irem(100,7);
     2
     [1] irem(-100,7);
     -2

$@;2>H(J
     `sdiv', `srem', `%'

