code wiki / _hdl_build / nx_pendulum_gate.nx
nx_pendulum_gate.nx
buildroot/runtime/_hdl_build/nx_pendulum_gate.nx
about
nx_pendulum_gate.nx -- NATIVE verify of the browser pendulum (base = mmap; SAME code runs in sovereign WASM).
Measures the EMERGENT period from integrating the true nonlinear pendulum and validates the real, experimentally
established laws: (a) Galileo's T proportional to sqrt(L) [T(4L)/T(L)=2], (b) small-amplitude ISOCHRONISM
[period ~ independent of amplitude], (c) large-amplitude period GROWTH [+~18% at 90 deg, the exact-pendulum
value (2/pi)K(sin45)=1.18]. Liar-kill: the LINEAR approximation (-k theta) stays isochronous at 90 deg (no
growth) -- so the growth test distinguishes real nonlinear pendulum physics from the textbook linearization.
license_tier: ORIGINAL expect_exit: 0
dependencies 3 imports · 0 importers
imports: nx_syscalls.nxnx_pendulum.nxnx_png.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
| none |
functions
| 12 | func 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 } |
| 13 | func 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 } |
| 14 | func 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 } |
| 15 | func iabs(x: i64) -> i64 { if x<0 { return 0-x } return x } called by 1: main |
| 18 | func measure_period(base: i64, gln: i64, amp: i64, lin: i64) -> i64 |
| 32 | func main() -> i64 |