code wiki / (root) / nx_symj_gk.nx

nx_symj_gk.nx source

↩ module page · 65 lines · 2070 B

1// GENERATED by nx_symjudge -- sweep harness, do not edit 2import "nx_syscalls.nx" 3func mx(a: i64, b: i64) -> i64 { if a > b { return a } return b } 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 let anch2: i64 = mx(3, 5) 24 if anch2 != 5 { viol = viol + 1 25 if vrep == 0 { vrep = 1 26 sjh_w("SYMJVIOL anchor2 r=" as *u8) 27 sjh_n(anch2) 28 sjh_nl() } } 29 var x: i64 = (0 - 30) 30 while x <= 30 { 31 var y: i64 = (0 - 30) 32 while y <= 30 { 33 let r: i64 = mx(x, y) 34 let rc0: i64 = mx(y, x) 35 if rc0 != r { viol = viol + 1 36 if vrep == 0 { vrep = 1 37 sjh_w("SYMJVIOL comm x=" as *u8) 38 sjh_n(x) 39 sjh_w(" y=" as *u8) 40 sjh_n(y) 41 sjh_w(" r=" as *u8) 42 sjh_n(r) 43 sjh_nl() } } 44 if x == y { if r != x { viol = viol + 1 45 if vrep == 0 { vrep = 1 46 sjh_w("SYMJVIOL idem2 x=" as *u8) 47 sjh_n(x) 48 sjh_w(" y=" as *u8) 49 sjh_n(y) 50 sjh_w(" r=" as *u8) 51 sjh_n(r) 52 sjh_nl() } } 53 } 54 checked = checked + 1 55 y = y + 1 56 } 57 x = x + 1 58 } 59 sjh_w("SYMJ mx checked=" as *u8) 60 sjh_n(checked) 61 sjh_w(" viol=" as *u8) 62 sjh_n(viol) 63 sjh_nl() 64 return 0 65}