nx_symj_af.nx source
↩ module page · 52 lines · 1718 B
1// GENERATED by nx_symjudge -- sweep harness, do not edit
2import "nx_syscalls.nx"
3func dbl(x: i64) -> i64 { return x * 2 }
4func sjh_w(s: *u8) -> i64 { var n: i64 = 0; while s[n] != (0 as u8) { n = n + 1 } sys_write(1, s, n); return 0 }
5func sjh_nl() -> i64 { let b: *u8 = sys_mmap(8); b[0] = 10 as u8; sys_write(1, b, 1); return 0 }
6func sjh_n(v: i64) -> i64 {
7 var m: i64 = v
8 if m < 0 { let nb: *u8 = sys_mmap(8); nb[0] = 45 as u8; sys_write(1, nb, 1); m = 0 - m }
9 let t: *u8 = sys_mmap(24)
10 var k: i64 = 0
11 if m == 0 { t[0] = 48 as u8; k = 1 }
12 while m > 0 { t[k] = (48 + (m % 10)) as u8; m = m / 10; k = k + 1 }
13 let ob: *u8 = sys_mmap(24)
14 var i: i64 = 0
15 while i < k { ob[i] = t[k - 1 - i]; i = i + 1 }
16 sys_write(1, ob, k)
17 return 0
18}
19func main() -> i64 {
20 var viol: i64 = 0
21 var checked: i64 = 0
22 var vrep: i64 = 0
23 var x: i64 = (0 - 300)
24 while x <= 300 {
25 let r: i64 = dbl(x)
26 if x >= (0 - 150) { if x <= 150 { let rl0: i64 = dbl(x + x)
27 if rl0 != (r + r) { viol = viol + 1
28 if vrep == 0 { vrep = 1
29 sjh_w("SYMJVIOL lin2 x=" as *u8)
30 sjh_n(x)
31 sjh_w(" r=" as *u8)
32 sjh_n(r)
33 sjh_nl() } }
34 } }
35 let rn1: i64 = dbl(0 - x)
36 if rn1 != (0 - r) { viol = viol + 1
37 if vrep == 0 { vrep = 1
38 sjh_w("SYMJVIOL odd x=" as *u8)
39 sjh_n(x)
40 sjh_w(" r=" as *u8)
41 sjh_n(r)
42 sjh_nl() } }
43 checked = checked + 1
44 x = x + 1
45 }
46 sjh_w("SYMJ dbl checked=" as *u8)
47 sjh_n(checked)
48 sjh_w(" viol=" as *u8)
49 sjh_n(viol)
50 sjh_nl()
51 return 0
52}