code wiki / _hdl_build / nx_geo_clip_gate.nx
nx_geo_clip_gate.nx
buildroot/runtime/_hdl_build/nx_geo_clip_gate.nx
about
nx_geo_clip_gate.nx -- GATE for GEO-015 polygon intersection (Sutherland-Hodgman). Subject = the
4e6-microdeg square [0,4e6]^2. Three clips prove the three code paths, correctness checked by
REUSING GEO-010 geo_area2 on the clipped result (no hard-coded vertex order):
overlap : clip by [2e6,6e6]^2 -> overlap square [2e6,4e6]^2, doubled area = 8e12 (4 verts)
disjoint : clip by [10e6,12e6]^2 -> no overlap -> 0 verts
contains : clip by [-10e6,10e6]^2 -> subject unchanged, doubled area = 3.2e13
Evidence -> knowledge/status/geo_clip.log (GEOCLIPGATE authored=organ ... verdict=GREEN).
license_tier: ORIGINAL
dependencies 3 imports · 0 importers
imports: nx_geo_clip.nxnx_geo_area.nxnx_syscalls.nx
imported by: nobody (leaf or entry point)
call flow from main pre-order; caps 40 nodes / depth 6 declared; ↻ = already shown
structs
| none |
consts
| 14 | const GC_LOG: *u8 = "knowledge/status/geo_clip.log" |
functions
| 16 | func gc_w(fd: i64, s: *u8) -> i64 { var n: i64 = 0; while s[n] != (0 as u8) { n = n + 1 } sys_write(fd, s, n); return 0 } |
| 17 | func gc_wn(fd: i64, v: i64) -> i64 { let bb: *u8 = sys_mmap(28); var m: i64=v; if m<0 {m=0-m; sys_write(fd,"-" as *u8,1)}; let t: *u8 = sys_mmap(28); var k: i64=0; if m==0 {t[0]=48;k=1}; while m>0 {t[k]=(48+(m%10)) as u8; m=m/10; k=k+1}; var i: i64=0; while i<k {bb[i]=t[k-1-i]; i=i+1}; sys_write(fd, bb, k); return 0 } |
| 19 | func gc_set(p: *i64, i: i64, lat: i64, lon: i64) -> i64 { p[i * 2] = lat; p[i * 2 + 1] = lon; return 0 } called by 1: gc_square |
| 22 | func gc_square(p: *i64, lo: i64, hi: i64) -> i64 |
| 30 | func gc_emit(fd: i64, no: i64, ao: i64, nd: i64, ncn: i64, ac: i64, ok: i64) -> i64 |
| 40 | func main() -> i64 |