[decnum-dynpmcs] r158 committed - Add our first DecInt test file. 121 tests (0 failures) for the DecInt ...

1 view

Skip to first unread message

codesite...@google.com

unread,

Aug 9, 2009, 12:57:48 AM8/9/09

to decnum-...@googlegroups.com

Revision: 158
Author: arbelo
Date: Sat Aug 8 21:56:56 2009
Log: Add our first DecInt test file. 121 tests (0 failures) for the DecInt
modulus VTABLE.

http://code.google.com/p/decnum-dynpmcs/source/detail?r=158

Added:
/trunk/t/remaindernear.t

=======================================
--- /dev/null
+++ /trunk/t/remaindernear.t Sat Aug 8 21:56:56 2009
@@ -0,0 +1,2574 @@
+#! /usr/bin/env parrot
+
+.namespace []
+.sub "tests" :subid("10_1249793477")
+.annotate "line", 0
+ .const 'Sub' $P732 = "131_1249793477"
+ capture_lex $P732
+ .const 'Sub' $P726 = "130_1249793477"
+ capture_lex $P726
+ .const 'Sub' $P720 = "129_1249793477"
+ capture_lex $P720
+ .const 'Sub' $P714 = "128_1249793477"
+ capture_lex $P714
+ .const 'Sub' $P708 = "127_1249793477"
+ capture_lex $P708
+ .const 'Sub' $P702 = "126_1249793477"
+ capture_lex $P702
+ .const 'Sub' $P696 = "125_1249793477"
+ capture_lex $P696
+ .const 'Sub' $P690 = "124_1249793477"
+ capture_lex $P690
+ .const 'Sub' $P684 = "123_1249793477"
+ capture_lex $P684
+ .const 'Sub' $P678 = "122_1249793477"
+ capture_lex $P678
+ .const 'Sub' $P672 = "121_1249793477"
+ capture_lex $P672
+ .const 'Sub' $P666 = "120_1249793477"
+ capture_lex $P666
+ .const 'Sub' $P660 = "119_1249793477"
+ capture_lex $P660
+ .const 'Sub' $P654 = "118_1249793477"
+ capture_lex $P654
+ .const 'Sub' $P648 = "117_1249793477"
+ capture_lex $P648
+ .const 'Sub' $P642 = "116_1249793477"
+ capture_lex $P642
+ .const 'Sub' $P636 = "115_1249793477"
+ capture_lex $P636
+ .const 'Sub' $P630 = "114_1249793477"
+ capture_lex $P630
+ .const 'Sub' $P624 = "113_1249793477"
+ capture_lex $P624
+ .const 'Sub' $P618 = "112_1249793477"
+ capture_lex $P618
+ .const 'Sub' $P612 = "111_1249793477"
+ capture_lex $P612
+ .const 'Sub' $P606 = "110_1249793477"
+ capture_lex $P606
+ .const 'Sub' $P600 = "109_1249793477"
+ capture_lex $P600
+ .const 'Sub' $P594 = "108_1249793477"
+ capture_lex $P594
+ .const 'Sub' $P588 = "107_1249793477"
+ capture_lex $P588
+ .const 'Sub' $P582 = "106_1249793477"
+ capture_lex $P582
+ .const 'Sub' $P576 = "105_1249793477"
+ capture_lex $P576
+ .const 'Sub' $P570 = "104_1249793477"
+ capture_lex $P570
+ .const 'Sub' $P564 = "103_1249793477"
+ capture_lex $P564
+ .const 'Sub' $P558 = "102_1249793477"
+ capture_lex $P558
+ .const 'Sub' $P552 = "101_1249793477"
+ capture_lex $P552
+ .const 'Sub' $P546 = "100_1249793477"
+ capture_lex $P546
+ .const 'Sub' $P540 = "99_1249793477"
+ capture_lex $P540
+ .const 'Sub' $P534 = "98_1249793477"
+ capture_lex $P534
+ .const 'Sub' $P528 = "97_1249793477"
+ capture_lex $P528
+ .const 'Sub' $P522 = "96_1249793477"
+ capture_lex $P522
+ .const 'Sub' $P516 = "95_1249793477"
+ capture_lex $P516
+ .const 'Sub' $P510 = "94_1249793477"
+ capture_lex $P510
+ .const 'Sub' $P504 = "93_1249793477"
+ capture_lex $P504
+ .const 'Sub' $P498 = "92_1249793477"
+ capture_lex $P498
+ .const 'Sub' $P492 = "91_1249793477"
+ capture_lex $P492
+ .const 'Sub' $P486 = "90_1249793477"
+ capture_lex $P486
+ .const 'Sub' $P480 = "89_1249793477"
+ capture_lex $P480
+ .const 'Sub' $P474 = "88_1249793477"
+ capture_lex $P474
+ .const 'Sub' $P468 = "87_1249793477"
+ capture_lex $P468
+ .const 'Sub' $P462 = "86_1249793477"
+ capture_lex $P462
+ .const 'Sub' $P456 = "85_1249793477"
+ capture_lex $P456
+ .const 'Sub' $P450 = "84_1249793477"
+ capture_lex $P450
+ .const 'Sub' $P444 = "83_1249793477"
+ capture_lex $P444
+ .const 'Sub' $P438 = "82_1249793477"
+ capture_lex $P438
+ .const 'Sub' $P432 = "81_1249793477"
+ capture_lex $P432
+ .const 'Sub' $P426 = "80_1249793477"
+ capture_lex $P426
+ .const 'Sub' $P420 = "79_1249793477"
+ capture_lex $P420
+ .const 'Sub' $P414 = "78_1249793477"
+ capture_lex $P414
+ .const 'Sub' $P408 = "77_1249793477"
+ capture_lex $P408
+ .const 'Sub' $P402 = "76_1249793477"
+ capture_lex $P402
+ .const 'Sub' $P396 = "75_1249793477"
+ capture_lex $P396
+ .const 'Sub' $P390 = "74_1249793477"
+ capture_lex $P390
+ .const 'Sub' $P384 = "73_1249793477"
+ capture_lex $P384
+ .const 'Sub' $P378 = "72_1249793477"
+ capture_lex $P378
+ .const 'Sub' $P372 = "71_1249793477"
+ capture_lex $P372
+ .const 'Sub' $P366 = "70_1249793477"
+ capture_lex $P366
+ .const 'Sub' $P360 = "69_1249793477"
+ capture_lex $P360
+ .const 'Sub' $P354 = "68_1249793477"
+ capture_lex $P354
+ .const 'Sub' $P348 = "67_1249793477"
+ capture_lex $P348
+ .const 'Sub' $P342 = "66_1249793477"
+ capture_lex $P342
+ .const 'Sub' $P336 = "65_1249793477"
+ capture_lex $P336
+ .const 'Sub' $P330 = "64_1249793477"
+ capture_lex $P330
+ .const 'Sub' $P324 = "63_1249793477"
+ capture_lex $P324
+ .const 'Sub' $P318 = "62_1249793477"
+ capture_lex $P318
+ .const 'Sub' $P312 = "61_1249793477"
+ capture_lex $P312
+ .const 'Sub' $P306 = "60_1249793477"
+ capture_lex $P306
+ .const 'Sub' $P300 = "59_1249793477"
+ capture_lex $P300
+ .const 'Sub' $P294 = "58_1249793477"
+ capture_lex $P294
+ .const 'Sub' $P288 = "57_1249793477"
+ capture_lex $P288
+ .const 'Sub' $P282 = "56_1249793477"
+ capture_lex $P282
+ .const 'Sub' $P276 = "55_1249793477"
+ capture_lex $P276
+ .const 'Sub' $P270 = "54_1249793477"
+ capture_lex $P270
+ .const 'Sub' $P264 = "53_1249793477"
+ capture_lex $P264
+ .const 'Sub' $P258 = "52_1249793477"
+ capture_lex $P258
+ .const 'Sub' $P252 = "51_1249793477"
+ capture_lex $P252
+ .const 'Sub' $P246 = "50_1249793477"
+ capture_lex $P246
+ .const 'Sub' $P240 = "49_1249793477"
+ capture_lex $P240
+ .const 'Sub' $P234 = "48_1249793477"
+ capture_lex $P234
+ .const 'Sub' $P228 = "47_1249793477"
+ capture_lex $P228
+ .const 'Sub' $P222 = "46_1249793477"
+ capture_lex $P222
+ .const 'Sub' $P216 = "45_1249793477"
+ capture_lex $P216
+ .const 'Sub' $P210 = "44_1249793477"
+ capture_lex $P210
+ .const 'Sub' $P204 = "43_1249793477"
+ capture_lex $P204
+ .const 'Sub' $P198 = "42_1249793477"
+ capture_lex $P198
+ .const 'Sub' $P192 = "41_1249793477"
+ capture_lex $P192
+ .const 'Sub' $P186 = "40_1249793477"
+ capture_lex $P186
+ .const 'Sub' $P180 = "39_1249793477"
+ capture_lex $P180
+ .const 'Sub' $P174 = "38_1249793477"
+ capture_lex $P174
+ .const 'Sub' $P168 = "37_1249793477"
+ capture_lex $P168
+ .const 'Sub' $P162 = "36_1249793477"
+ capture_lex $P162
+ .const 'Sub' $P156 = "35_1249793477"
+ capture_lex $P156
+ .const 'Sub' $P150 = "34_1249793477"
+ capture_lex $P150
+ .const 'Sub' $P144 = "33_1249793477"
+ capture_lex $P144
+ .const 'Sub' $P138 = "32_1249793477"
+ capture_lex $P138
+ .const 'Sub' $P132 = "31_1249793477"
+ capture_lex $P132
+ .const 'Sub' $P126 = "30_1249793477"
+ capture_lex $P126
+ .const 'Sub' $P120 = "29_1249793477"
+ capture_lex $P120
+ .const 'Sub' $P114 = "28_1249793477"
+ capture_lex $P114
+ .const 'Sub' $P108 = "27_1249793477"
+ capture_lex $P108
+ .const 'Sub' $P102 = "26_1249793477"
+ capture_lex $P102
+ .const 'Sub' $P96 = "25_1249793477"
+ capture_lex $P96
+ .const 'Sub' $P90 = "24_1249793477"
+ capture_lex $P90
+ .const 'Sub' $P84 = "23_1249793477"
+ capture_lex $P84
+ .const 'Sub' $P78 = "22_1249793477"
+ capture_lex $P78
+ .const 'Sub' $P72 = "21_1249793477"
+ capture_lex $P72
+ .const 'Sub' $P66 = "20_1249793477"
+ capture_lex $P66
+ .const 'Sub' $P60 = "19_1249793477"
+ capture_lex $P60
+ .const 'Sub' $P54 = "18_1249793477"
+ capture_lex $P54
+ .const 'Sub' $P48 = "17_1249793477"
+ capture_lex $P48
+ .const 'Sub' $P42 = "16_1249793477"
+ capture_lex $P42
+ .const 'Sub' $P36 = "15_1249793477"
+ capture_lex $P36
+ .const 'Sub' $P30 = "14_1249793477"
+ capture_lex $P30
+ .const 'Sub' $P24 = "13_1249793477"
+ capture_lex $P24
+ .const 'Sub' $P18 = "12_1249793477"
+ capture_lex $P18
+ .const 'Sub' $P12 = "11_1249793477"
+ capture_lex $P12
+.annotate "line", 1
+.include "test_more.pir"
+.include "inc/decnum.pasm"
+load_bytecode "aux/decTest/src/inc/procs.pbc"
+$P0 = loadlib "build/decnum_group"
+.local pmc ctx
+ ctx = new "DecIntContext"
+ ctx."set_ieee754_cmp"(1)
+ ctx."set_exceptions"(0)
+ "plan"(121)
+.annotate "line", 22
+ ctx."set_digits"(9)
+.annotate "line", 23
+ ctx."set_rounding_mode"(.DEC_ROUND_HALF_UP)
+.annotate "line", 25
+ .const 'Sub' $P12 = "11_1249793477"
+ capture_lex $P12
+ $P12()
+.annotate "line", 26
+ .const 'Sub' $P18 = "12_1249793477"
+ capture_lex $P18
+ $P18()
+.annotate "line", 27
+ .const 'Sub' $P24 = "13_1249793477"
+ capture_lex $P24
+ $P24()
+.annotate "line", 28
+ .const 'Sub' $P30 = "14_1249793477"
+ capture_lex $P30
+ $P30()
+.annotate "line", 29
+ .const 'Sub' $P36 = "15_1249793477"
+ capture_lex $P36
+ $P36()
+.annotate "line", 30
+ .const 'Sub' $P42 = "16_1249793477"
+ capture_lex $P42
+ $P42()
+.annotate "line", 31
+ .const 'Sub' $P48 = "17_1249793477"
+ capture_lex $P48
+ $P48()
+.annotate "line", 32
+ .const 'Sub' $P54 = "18_1249793477"
+ capture_lex $P54
+ $P54()
+.annotate "line", 33
+ .const 'Sub' $P60 = "19_1249793477"
+ capture_lex $P60
+ $P60()
+.annotate "line", 36
+ .const 'Sub' $P66 = "20_1249793477"
+ capture_lex $P66
+ $P66()
+.annotate "line", 37
+ .const 'Sub' $P72 = "21_1249793477"
+ capture_lex $P72
+ $P72()
+.annotate "line", 38
+ .const 'Sub' $P78 = "22_1249793477"
+ capture_lex $P78
+ $P78()
+.annotate "line", 39
+ .const 'Sub' $P84 = "23_1249793477"
+ capture_lex $P84
+ $P84()
+.annotate "line", 41
+ .const 'Sub' $P90 = "24_1249793477"
+ capture_lex $P90
+ $P90()
+.annotate "line", 42
+ .const 'Sub' $P96 = "25_1249793477"
+ capture_lex $P96
+ $P96()
+.annotate "line", 43
+ .const 'Sub' $P102 = "26_1249793477"
+ capture_lex $P102
+ $P102()
+.annotate "line", 44
+ .const 'Sub' $P108 = "27_1249793477"
+ capture_lex $P108
+ $P108()
+.annotate "line", 45
+ .const 'Sub' $P114 = "28_1249793477"
+ capture_lex $P114
+ $P114()
+.annotate "line", 46
+ .const 'Sub' $P120 = "29_1249793477"
+ capture_lex $P120
+ $P120()
+.annotate "line", 47
+ .const 'Sub' $P126 = "30_1249793477"
+ capture_lex $P126
+ $P126()
+.annotate "line", 48
+ .const 'Sub' $P132 = "31_1249793477"
+ capture_lex $P132
+ $P132()
+.annotate "line", 49
+ .const 'Sub' $P138 = "32_1249793477"
+ capture_lex $P138
+ $P138()
+.annotate "line", 50
+ .const 'Sub' $P144 = "33_1249793477"
+ capture_lex $P144
+ $P144()
+.annotate "line", 51
+ .const 'Sub' $P150 = "34_1249793477"
+ capture_lex $P150
+ $P150()
+.annotate "line", 52
+ .const 'Sub' $P156 = "35_1249793477"
+ capture_lex $P156
+ $P156()
+.annotate "line", 53
+ .const 'Sub' $P162 = "36_1249793477"
+ capture_lex $P162
+ $P162()
+.annotate "line", 54
+ .const 'Sub' $P168 = "37_1249793477"
+ capture_lex $P168
+ $P168()
+.annotate "line", 55
+ .const 'Sub' $P174 = "38_1249793477"
+ capture_lex $P174
+ $P174()
+.annotate "line", 56
+ .const 'Sub' $P180 = "39_1249793477"
+ capture_lex $P180
+ $P180()
+.annotate "line", 57
+ .const 'Sub' $P186 = "40_1249793477"
+ capture_lex $P186
+ $P186()
+.annotate "line", 58
+ .const 'Sub' $P192 = "41_1249793477"
+ capture_lex $P192
+ $P192()
+.annotate "line", 59
+ .const 'Sub' $P198 = "42_1249793477"
+ capture_lex $P198
+ $P198()
+.annotate "line", 60
+ .const 'Sub' $P204 = "43_1249793477"
+ capture_lex $P204
+ $P204()
+.annotate "line", 61
+ .const 'Sub' $P210 = "44_1249793477"
+ capture_lex $P210
+ $P210()
+.annotate "line", 62
+ .const 'Sub' $P216 = "45_1249793477"
+ capture_lex $P216
+ $P216()
+.annotate "line", 63
+ .const 'Sub' $P222 = "46_1249793477"
+ capture_lex $P222
+ $P222()
+.annotate "line", 64
+ .const 'Sub' $P228 = "47_1249793477"
+ capture_lex $P228
+ $P228()
+.annotate "line", 66
+ .const 'Sub' $P234 = "48_1249793477"
+ capture_lex $P234
+ $P234()
+.annotate "line", 68
+ .const 'Sub' $P240 = "49_1249793477"
+ capture_lex $P240
+ $P240()
+.annotate "line", 70
+ .const 'Sub' $P246 = "50_1249793477"
+ capture_lex $P246
+ $P246()
+.annotate "line", 72
+ ctx."set_digits"(6)
+.annotate "line", 73
+ .const 'Sub' $P252 = "51_1249793477"
+ capture_lex $P252
+ $P252()
+.annotate "line", 74
+ .const 'Sub' $P258 = "52_1249793477"
+ capture_lex $P258
+ $P258()
+.annotate "line", 75
+ .const 'Sub' $P264 = "53_1249793477"
+ capture_lex $P264
+ $P264()
+.annotate "line", 76
+ .const 'Sub' $P270 = "54_1249793477"
+ capture_lex $P270
+ $P270()
+.annotate "line", 77
+ .const 'Sub' $P276 = "55_1249793477"
+ capture_lex $P276
+ $P276()
+.annotate "line", 78
+ .const 'Sub' $P282 = "56_1249793477"
+ capture_lex $P282
+ $P282()
+.annotate "line", 80
+ ctx."set_digits"(9)
+.annotate "line", 81
+ .const 'Sub' $P288 = "57_1249793477"
+ capture_lex $P288
+ $P288()
+.annotate "line", 82
+ .const 'Sub' $P294 = "58_1249793477"
+ capture_lex $P294
+ $P294()
+.annotate "line", 83
+ .const 'Sub' $P300 = "59_1249793477"
+ capture_lex $P300
+ $P300()
+.annotate "line", 84
+ .const 'Sub' $P306 = "60_1249793477"
+ capture_lex $P306
+ $P306()
+.annotate "line", 88
+ .const 'Sub' $P312 = "61_1249793477"
+ capture_lex $P312
+ $P312()
+.annotate "line", 89
+ .const 'Sub' $P318 = "62_1249793477"
+ capture_lex $P318
+ $P318()
+.annotate "line", 90
+ .const 'Sub' $P324 = "63_1249793477"
+ capture_lex $P324
+ $P324()
+.annotate "line", 91
+ .const 'Sub' $P330 = "64_1249793477"
+ capture_lex $P330
+ $P330()
+.annotate "line", 92
+ .const 'Sub' $P336 = "65_1249793477"
+ capture_lex $P336
+ $P336()
+.annotate "line", 93
+ .const 'Sub' $P342 = "66_1249793477"
+ capture_lex $P342
+ $P342()
+.annotate "line", 94
+ .const 'Sub' $P348 = "67_1249793477"
+ capture_lex $P348
+ $P348()
+.annotate "line", 95
+ .const 'Sub' $P354 = "68_1249793477"
+ capture_lex $P354
+ $P354()
+.annotate "line", 98
+ .const 'Sub' $P360 = "69_1249793477"
+ capture_lex $P360
+ $P360()
+.annotate "line", 99
+ .const 'Sub' $P366 = "70_1249793477"
+ capture_lex $P366
+ $P366()
+.annotate "line", 100
+ .const 'Sub' $P372 = "71_1249793477"
+ capture_lex $P372
+ $P372()
+.annotate "line", 101
+ .const 'Sub' $P378 = "72_1249793477"
+ capture_lex $P378
+ $P378()
+.annotate "line", 102
+ .const 'Sub' $P384 = "73_1249793477"
+ capture_lex $P384
+ $P384()
+.annotate "line", 103
+ .const 'Sub' $P390 = "74_1249793477"
+ capture_lex $P390
+ $P390()
+.annotate "line", 104
+ .const 'Sub' $P396 = "75_1249793477"
+ capture_lex $P396
+ $P396()
+.annotate "line", 105
+ .const 'Sub' $P402 = "76_1249793477"
+ capture_lex $P402
+ $P402()
+.annotate "line", 106
+ .const 'Sub' $P408 = "77_1249793477"
+ capture_lex $P408
+ $P408()
+.annotate "line", 107
+ .const 'Sub' $P414 = "78_1249793477"
+ capture_lex $P414
+ $P414()
+.annotate "line", 108
+ .const 'Sub' $P420 = "79_1249793477"
+ capture_lex $P420
+ $P420()
+.annotate "line", 109
+ .const 'Sub' $P426 = "80_1249793477"
+ capture_lex $P426
+ $P426()
+.annotate "line", 110
+ .const 'Sub' $P432 = "81_1249793477"
+ capture_lex $P432
+ $P432()
+.annotate "line", 111
+ .const 'Sub' $P438 = "82_1249793477"
+ capture_lex $P438
+ $P438()
+.annotate "line", 112
+ .const 'Sub' $P444 = "83_1249793477"
+ capture_lex $P444
+ $P444()
+.annotate "line", 113
+ .const 'Sub' $P450 = "84_1249793477"
+ capture_lex $P450
+ $P450()
+.annotate "line", 114
+ .const 'Sub' $P456 = "85_1249793477"
+ capture_lex $P456
+ $P456()
+.annotate "line", 115
+ .const 'Sub' $P462 = "86_1249793477"
+ capture_lex $P462
+ $P462()
+.annotate "line", 116
+ .const 'Sub' $P468 = "87_1249793477"
+ capture_lex $P468
+ $P468()
+.annotate "line", 117
+ .const 'Sub' $P474 = "88_1249793477"
+ capture_lex $P474
+ $P474()
+.annotate "line", 120
+ .const 'Sub' $P480 = "89_1249793477"
+ capture_lex $P480
+ $P480()
+.annotate "line", 121
+ .const 'Sub' $P486 = "90_1249793477"
+ capture_lex $P486
+ $P486()
+.annotate "line", 122
+ .const 'Sub' $P492 = "91_1249793477"
+ capture_lex $P492
+ $P492()
+.annotate "line", 125
+ .const 'Sub' $P498 = "92_1249793477"
+ capture_lex $P498
+ $P498()
+.annotate "line", 126
+ .const 'Sub' $P504 = "93_1249793477"
+ capture_lex $P504
+ $P504()
+.annotate "line", 127
+ .const 'Sub' $P510 = "94_1249793477"
+ capture_lex $P510
+ $P510()
+.annotate "line", 128
+ .const 'Sub' $P516 = "95_1249793477"
+ capture_lex $P516
+ $P516()
+.annotate "line", 129
+ .const 'Sub' $P522 = "96_1249793477"
+ capture_lex $P522
+ $P522()
+.annotate "line", 130
+ .const 'Sub' $P528 = "97_1249793477"
+ capture_lex $P528
+ $P528()
+.annotate "line", 132
+ .const 'Sub' $P534 = "98_1249793477"
+ capture_lex $P534
+ $P534()
+.annotate "line", 133
+ .const 'Sub' $P540 = "99_1249793477"
+ capture_lex $P540
+ $P540()
+.annotate "line", 134
+ .const 'Sub' $P546 = "100_1249793477"
+ capture_lex $P546
+ $P546()
+.annotate "line", 135
+ .const 'Sub' $P552 = "101_1249793477"
+ capture_lex $P552
+ $P552()
+.annotate "line", 136
+ .const 'Sub' $P558 = "102_1249793477"
+ capture_lex $P558
+ $P558()
+.annotate "line", 137
+ .const 'Sub' $P564 = "103_1249793477"
+ capture_lex $P564
+ $P564()
+.annotate "line", 139
+ ctx."set_digits"(5)
+.annotate "line", 140
+ .const 'Sub' $P570 = "104_1249793477"
+ capture_lex $P570
+ $P570()
+.annotate "line", 141
+ .const 'Sub' $P576 = "105_1249793477"
+ capture_lex $P576
+ $P576()
+.annotate "line", 142
+ .const 'Sub' $P582 = "106_1249793477"
+ capture_lex $P582
+ $P582()
+.annotate "line", 143
+ .const 'Sub' $P588 = "107_1249793477"
+ capture_lex $P588
+ $P588()
+.annotate "line", 146
+ ctx."set_digits"(9)
+.annotate "line", 147
+ .const 'Sub' $P594 = "108_1249793477"
+ capture_lex $P594
+ $P594()
+.annotate "line", 148
+ .const 'Sub' $P600 = "109_1249793477"
+ capture_lex $P600
+ $P600()
+.annotate "line", 149
+ .const 'Sub' $P606 = "110_1249793477"
+ capture_lex $P606
+ $P606()
+.annotate "line", 150
+ .const 'Sub' $P612 = "111_1249793477"
+ capture_lex $P612
+ $P612()
+.annotate "line", 153
+ .const 'Sub' $P618 = "112_1249793477"
+ capture_lex $P618
+ $P618()
+.annotate "line", 154
+ .const 'Sub' $P624 = "113_1249793477"
+ capture_lex $P624
+ $P624()
+.annotate "line", 155
+ .const 'Sub' $P630 = "114_1249793477"
+ capture_lex $P630
+ $P630()
+.annotate "line", 156
+ .const 'Sub' $P636 = "115_1249793477"
+ capture_lex $P636
+ $P636()
+.annotate "line", 157
+ .const 'Sub' $P642 = "116_1249793477"
+ capture_lex $P642
+ $P642()
+.annotate "line", 158
+ .const 'Sub' $P648 = "117_1249793477"
+ capture_lex $P648
+ $P648()
+.annotate "line", 159
+ .const 'Sub' $P654 = "118_1249793477"
+ capture_lex $P654
+ $P654()
+.annotate "line", 160
+ .const 'Sub' $P660 = "119_1249793477"
+ capture_lex $P660
+ $P660()
+.annotate "line", 162
+ ctx."set_digits"(15)
+.annotate "line", 163
+ .const 'Sub' $P666 = "120_1249793477"
+ capture_lex $P666
+ $P666()
+.annotate "line", 164
+ .const 'Sub' $P672 = "121_1249793477"
+ capture_lex $P672
+ $P672()
+.annotate "line", 165
+ .const 'Sub' $P678 = "122_1249793477"
+ capture_lex $P678
+ $P678()
+.annotate "line", 166
+ .const 'Sub' $P684 = "123_1249793477"
+ capture_lex $P684
+ $P684()
+.annotate "line", 167
+ .const 'Sub' $P690 = "124_1249793477"
+ capture_lex $P690
+ $P690()
+.annotate "line", 168
+ .const 'Sub' $P696 = "125_1249793477"
+ capture_lex $P696
+ $P696()
+.annotate "line", 169
+ .const 'Sub' $P702 = "126_1249793477"
+ capture_lex $P702
+ $P702()
+.annotate "line", 170
+ .const 'Sub' $P708 = "127_1249793477"
+ capture_lex $P708
+ $P708()
+.annotate "line", 171
+ .const 'Sub' $P714 = "128_1249793477"
+ capture_lex $P714
+ $P714()
+.annotate "line", 172
+ .const 'Sub' $P720 = "129_1249793477"
+ capture_lex $P720
+ $P720()
+.annotate "line", 173
+ .const 'Sub' $P726 = "130_1249793477"
+ capture_lex $P726
+ $P726()
+.annotate "line", 174
+ .const 'Sub' $P732 = "131_1249793477"
+ capture_lex $P732
+ $P738 = $P732()
+.annotate "line", 1
+ .return ($P738)
+.end
+
+
+.namespace []
+.sub "rmnx001" :subid("11_1249793477") :outer("10_1249793477")
+.annotate "line", 25
+ new $P13, "DecInt"
+ assign $P13, '1'
+ new $P14, "DecInt"
+ assign $P14, '1'
+ $P15 = "remainder"($P13, $P14)
+ new $P16, "DecInt"
+ assign $P16, '0'
+ $P17 = "is"($P15, $P16, "rmnx001")
+ .return ($P17)
+.end
+
+
+.namespace []
+.sub "rmnx002" :subid("12_1249793477") :outer("10_1249793477")
+.annotate "line", 26
+ new $P19, "DecInt"
+ assign $P19, '2'
+ new $P20, "DecInt"
+ assign $P20, '1'
+ $P21 = "remainder"($P19, $P20)
+ new $P22, "DecInt"
+ assign $P22, '0'
+ $P23 = "is"($P21, $P22, "rmnx002")
+ .return ($P23)
+.end
+
+
+.namespace []
+.sub "rmnx003" :subid("13_1249793477") :outer("10_1249793477")
+.annotate "line", 27
+ new $P25, "DecInt"
+ assign $P25, '1'
+ new $P26, "DecInt"
+ assign $P26, '2'
+ $P27 = "remainder"($P25, $P26)
+ new $P28, "DecInt"
+ assign $P28, '1'
+ $P29 = "is"($P27, $P28, "rmnx003")
+ .return ($P29)
+.end
+
+
+.namespace []
+.sub "rmnx004" :subid("14_1249793477") :outer("10_1249793477")
+.annotate "line", 28
+ new $P31, "DecInt"
+ assign $P31, '2'
+ new $P32, "DecInt"
+ assign $P32, '2'
+ $P33 = "remainder"($P31, $P32)
+ new $P34, "DecInt"
+ assign $P34, '0'
+ $P35 = "is"($P33, $P34, "rmnx004")
+ .return ($P35)
+.end
+
+
+.namespace []
+.sub "rmnx005" :subid("15_1249793477") :outer("10_1249793477")
+.annotate "line", 29
+ new $P37, "DecInt"
+ assign $P37, '0'
+ new $P38, "DecInt"
+ assign $P38, '1'
+ $P39 = "remainder"($P37, $P38)
+ new $P40, "DecInt"
+ assign $P40, '0'
+ $P41 = "is"($P39, $P40, "rmnx005")
+ .return ($P41)
+.end
+
+
+.namespace []
+.sub "rmnx006" :subid("16_1249793477") :outer("10_1249793477")
+.annotate "line", 30
+ new $P43, "DecInt"
+ assign $P43, '0'
+ new $P44, "DecInt"
+ assign $P44, '2'
+ $P45 = "remainder"($P43, $P44)
+ new $P46, "DecInt"
+ assign $P46, '0'
+ $P47 = "is"($P45, $P46, "rmnx006")
+ .return ($P47)
+.end
+
+
+.namespace []
+.sub "rmnx007" :subid("17_1249793477") :outer("10_1249793477")
+.annotate "line", 31
+ new $P49, "DecInt"
+ assign $P49, '1'
+ new $P50, "DecInt"
+ assign $P50, '3'
+ $P51 = "remainder"($P49, $P50)
+ new $P52, "DecInt"
+ assign $P52, '1'
+ $P53 = "is"($P51, $P52, "rmnx007")
+ .return ($P53)
+.end
+
+
+.namespace []
+.sub "rmnx008" :subid("18_1249793477") :outer("10_1249793477")
+.annotate "line", 32
+ new $P55, "DecInt"
+ assign $P55, '2'
+ new $P56, "DecInt"
+ assign $P56, '3'
+ $P57 = "remainder"($P55, $P56)
+ new $P58, "DecInt"
+ assign $P58, '-1'
+ $P59 = "is"($P57, $P58, "rmnx008")
+ .return ($P59)
+.end
+
+
+.namespace []
+.sub "rmnx009" :subid("19_1249793477") :outer("10_1249793477")
+.annotate "line", 33
+ new $P61, "DecInt"
+ assign $P61, '3'
+ new $P62, "DecInt"
+ assign $P62, '3'
+ $P63 = "remainder"($P61, $P62)
+ new $P64, "DecInt"
+ assign $P64, '0'
+ $P65 = "is"($P63, $P64, "rmnx009")
+ .return ($P65)
+.end
+
+
+.namespace []
+.sub "rmnx020" :subid("20_1249793477") :outer("10_1249793477")
+.annotate "line", 36
+ new $P67, "DecInt"
+ assign $P67, '187'
+ new $P68, "DecInt"
+ assign $P68, '187'
+ $P69 = "remainder"($P67, $P68)
+ new $P70, "DecInt"
+ assign $P70, '0'
+ $P71 = "is"($P69, $P70, "rmnx020")
+ .return ($P71)
+.end
+
+
+.namespace []
+.sub "rmnx021" :subid("21_1249793477") :outer("10_1249793477")
+.annotate "line", 37
+ new $P73, "DecInt"
+ assign $P73, '5'
+ new $P74, "DecInt"
+ assign $P74, '2'
+ $P75 = "remainder"($P73, $P74)
+ new $P76, "DecInt"
+ assign $P76, '1'
+ $P77 = "is"($P75, $P76, "rmnx021")
+ .return ($P77)
+.end
+
+
+.namespace []
+.sub "rmnx022" :subid("22_1249793477") :outer("10_1249793477")
+.annotate "line", 38
+ new $P79, "DecInt"
+ assign $P79, '5'
+ new $P80, "DecInt"
+ assign $P80, '2.0'
+ $P81 = "remainder"($P79, $P80)
+ new $P82, "DecInt"
+ assign $P82, '1.0'
+ $P83 = "is"($P81, $P82, "rmnx022")
+ .return ($P83)
+.end
+
+
+.namespace []
+.sub "rmnx023" :subid("23_1249793477") :outer("10_1249793477")
+.annotate "line", 39
+ new $P85, "DecInt"
+ assign $P85, '5'
+ new $P86, "DecInt"
+ assign $P86, '2.000'
+ $P87 = "remainder"($P85, $P86)
+ new $P88, "DecInt"
+ assign $P88, '1.000'
+ $P89 = "is"($P87, $P88, "rmnx023")
+ .return ($P89)
+.end
+
+
+.namespace []
+.sub "rmnx030" :subid("24_1249793477") :outer("10_1249793477")
+.annotate "line", 41
+ new $P91, "DecInt"
+ assign $P91, '1'
+ new $P92, "DecInt"
+ assign $P92, '2'
+ $P93 = "remainder"($P91, $P92)
+ new $P94, "DecInt"
+ assign $P94, '1'
+ $P95 = "is"($P93, $P94, "rmnx030")
+ .return ($P95)
+.end
+
+
+.namespace []
+.sub "rmnx031" :subid("25_1249793477") :outer("10_1249793477")
+.annotate "line", 42
+ new $P97, "DecInt"
+ assign $P97, '1'
+ new $P98, "DecInt"
+ assign $P98, '4'
+ $P99 = "remainder"($P97, $P98)
+ new $P100, "DecInt"
+ assign $P100, '1'
+ $P101 = "is"($P99, $P100, "rmnx031")
+ .return ($P101)
+.end
+
+
+.namespace []
+.sub "rmnx032" :subid("26_1249793477") :outer("10_1249793477")
+.annotate "line", 43
+ new $P103, "DecInt"
+ assign $P103, '1'
+ new $P104, "DecInt"
+ assign $P104, '8'
+ $P105 = "remainder"($P103, $P104)
+ new $P106, "DecInt"
+ assign $P106, '1'
+ $P107 = "is"($P105, $P106, "rmnx032")
+ .return ($P107)
+.end
***The diff for this file has been truncated for email.***

Reply all

Reply to author

Forward

0 new messages