| 1 | test_mmul = ->
|
| 2 | i = 0
|
| 3 | j = 0
|
| 4 | m = 0
|
| 5 | logout("test mmul\n")
|
| 6 | for i in [-100..100]
|
| 7 | for j in [-100..100]
|
| 8 | test_mmulf(i, j, i * j)
|
| 9 | logout("ok\n")
|
| 10 |
|
| 11 | test_mmulf = (na, nb, nc) ->
|
| 12 |
|
| 13 | a = mint(na)
|
| 14 | b = mint(nb)
|
| 15 | c = mint(nc)
|
| 16 |
|
| 17 | d = mmul(a, b)
|
| 18 |
|
| 19 | if (mcmp(c, d) == 0)
|
| 20 | return
|
| 21 | else
|
| 22 | throw new Error("test_mmulf error")
|
| 23 |
|
| 24 | test_mdiv = ->
|
| 25 | i = 0
|
| 26 | j = 0
|
| 27 | m = 0
|
| 28 | logout("test mdiv\n")
|
| 29 | for i in [-100..100]
|
| 30 | for j in [-100..100]
|
| 31 | if (j)
|
| 32 | if i/j > 0
|
| 33 | expectedResult = Math.floor(i / j)
|
| 34 | else
|
| 35 | expectedResult = Math.ceil(i / j)
|
| 36 | test_mdivf(i, j, expectedResult)
|
| 37 | logout("ok\n")
|
| 38 |
|
| 39 | test_mdivf = (na, nb, nc) ->
|
| 40 |
|
| 41 | a = mint(na)
|
| 42 | b = mint(nb)
|
| 43 | c = mint(nc)
|
| 44 |
|
| 45 | d = mdiv(a, b)
|
| 46 |
|
| 47 | if (mcmp(c, d) == 0)
|
| 48 | return
|
| 49 | else
|
| 50 | debugger
|
| 51 | throw new Error("test_mdivf error")
|
| 52 |
|
| 53 |
|
| 54 | test_mmod = ->
|
| 55 | i = 0
|
| 56 | j = 0
|
| 57 | m = 0
|
| 58 | logout("test mmod\n")
|
| 59 | for i in [-100..100]
|
| 60 | for j in [-100..100]
|
| 61 | if (j)
|
| 62 | test_mmodf(i, j, i % j)
|
| 63 | logout("ok\n")
|
| 64 |
|
| 65 | test_mmodf = (na,nb,nc) ->
|
| 66 |
|
| 67 | a = mint(na)
|
| 68 | b = mint(nb)
|
| 69 | c = mint(nc)
|
| 70 |
|
| 71 | d = mmod(a, b)
|
| 72 |
|
| 73 | if (mcmp(c, d) == 0)
|
| 74 | return
|
| 75 | else
|
| 76 | throw new Error("test_mmodf error")
|
| 77 |
|
| 78 |
|
| 79 |
|