code wiki / _hdl_build / nx_sim_uq_gate.nx

nx_sim_uq_gate.nx

buildroot/runtime/_hdl_build/nx_sim_uq_gate.nx

5262 B74 linesdepth 2pulls 2 transitivereach 0 importersview sourcekind gate/prooftopic sim
docsdependenciesstructsconstsfunctions

about

nx_sim_uq_gate.nx -- climb the UNCERTAINTY QUANTIFICATION axis (NASA-STD-7009 "Results Uncertainty"; ASME V&V 20 / FDA all require UQ). A sovereign Monte-Carlo uncertainty-propagation engine, VERIFIED against the exact analytic propagation law. Sim: projectile range R = (2*vy/g)*vx = k*vx (k=5 with vy=10,g=4). The horizontal launch speed vx is UNCERTAIN: uniform over integers [mu-W, mu+W] (analytic variance W(W+1)/3). MC samples vx, runs the sim, and the OUTPUT distribution must satisfy the analytic law: E[R]=k*mu, Var[R]=k^2*Var[vx]. The sigma interval uses our sovereign isqrt. Liar-kill: with an uncertain input the output variance is provably > 0 -- a "certain/deterministic output" claim is rejected. Deterministic PRNG (reproducible). GREEN iff 6/6. license_tier: ORIGINAL

dependencies 1 imports · 0 importers

nx_syscalls.nx nx_sim_uq_gate.nx

imports: nx_syscalls.nx

imported by: nobody (leaf or entry point)

call flow from main pre-order; caps 40 nodes / depth 6 declared; ↻ = already shown

main sys_mmap g_w sys_write mc_run sys_mmap ↻ rpos xrng sim_range isqrt iabs isqrt ↻ g_n g_w ↻ sys_mmap ↻ sys_write ↻ g_row g_w ↻ iabs ↻ sys_exit

structs

none

consts

none

functions

11func g_w(s: *u8) -> i64 { var n: i64=0; while s[n]!=(0 as u8){n=n+1} sys_write(1,s,n); return 0 }
called by 3: g_ng_rowmain calls 1: sys_write
12func g_n(v: i64) -> i64 { var m: i64=v; if m<0{g_w("-");m=0-m} let t:*u8=sys_mmap(24); var k:i64=0; if m==0{t[0]=48 as u8;k=1}; while m>0{t[k]=(48+(m%10)) as u8;m=m/10;k=k+1}; var i:i64=0; let o:*u8=sys_mmap(24); while i<k{o[i]=t[k-1-i];i=i+1}; sys_write(1,o,k); return 0 }
called by 1: main calls 3: g_wsys_mmapsys_write
13func g_row(id: *u8, ok: i64, pass: *i64) -> i64 { g_w(" "); g_w(id); g_w(": "); if ok==1 { g_w("OK\n"); pass[0]=pass[0]+1 } else { g_w("FAIL\n") } return 0 }
called by 1: main calls 1: g_w
14func iabs(x: i64) -> i64 { if x<0 { return 0-x } return x }
called by 2: mc_runmain
15func xrng(s: *i64) -> i64 { var x: i64=s[0]; x = x ^ (x << 13); x = x ^ (x >> 7); x = x ^ (x << 17); s[0]=x; return x }
called by 1: rpos
16func rpos(s: *i64) -> i64 { let v: i64=xrng(s); return v & 0x3FFFFFFFFFFFFFFF }
called by 1: mc_run calls 1: xrng
17func isqrt(N: i64) -> i64 { if N<2 { return N } var x: i64=N; var y: i64=(x+1)/2; while y<x { x=y; y=(x + N/x)/2 } return x }
called by 2: mc_runmain
20func sim_range(vx: i64, k: i64) -> i64 { return k*vx }
called by 1: mc_run
23func mc_run(seed: i64, mu: i64, W: i64, k: i64, N: i64, out: *i64) -> i64
called by 1: main calls 5: sys_mmaprpossim_rangeisqrtiabs
44func main() -> i64