code wiki / _hdl_build / nx_research_chem_parse_gate.nx

nx_research_chem_parse_gate.nx

buildroot/runtime/_hdl_build/nx_research_chem_parse_gate.nx

10088 B172 linesdepth 2pulls 2 transitivereach 0 importersview sourcekind gate/prooftopic research
docsdependenciesstructsconstsfunctions

about

nx_research_chem_parse_gate.nx -- broaden the chemistry discoverer from hardcoded element-matrices to a real general capability: PARSE arbitrary chemical formula strings (incl. parentheses like Ca(OH)2) into element counts, build the element-count matrix, and DISCOVER the balancing coefficients (integer nullspace) by search, verified by atom conservation. So "balance this reaction" works for ANY reaction typed as text, not three baked-in matrices. Pure integer, deterministic. GREEN iff 6/6. license_tier: ORIGINAL

dependencies 1 imports · 0 importers

nx_syscalls.nx nx_research_chem_parse_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 parse_one sys_mmap ↻ parse_seg sys_mmap ↻ parse_seg ↻ read_number is_digit read_symbol is_lower elem_index elem_index ↻ balance_reaction sys_mmap ↻ parse_one ↻ balance sys_mmap ↻ balanced_ok gcd veq conserves_reaction sys_mmap ↻ parse_one ↻ balanced_ok ↻ g_n g_w ↻ sys_mmap ↻ sys_write ↻ g_row g_w ↻ sys_exit

structs

none

consts

none

functions

8func 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
9func 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
10func 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
12func gcd(a: i64, b: i64) -> i64 { var x: i64=a; var y: i64=b; if x<0{x=0-x} if y<0{y=0-y} while y!=0 { let t: i64=x%y; x=y; y=t } return x }
called by 2: gcd_vecbalance
13func gcd_vec(x: *i64, n: i64) -> i64 { var g: i64=x[0]; var i: i64=1; while i<n { g=gcd(g,x[i]); i=i+1 } return g }
calls 1: gcd
14func balanced_ok(A: *i64, E: i64, S: i64, x: *i64) -> i64
19func balance(A: *i64, E: i64, S: i64, B: i64, xout: *i64) -> i64
35func veq(a: *i64, b: *i64, n: i64) -> i64 { var i: i64=0; while i<n { if a[i]!=b[i] { return 0 } i=i+1 } return 1 }
called by 1: main
38func is_lower(c: i64) -> i64 { if c>=97 { if c<=122 { return 1 } } return 0 }
called by 1: read_symbol
39func is_digit(c: i64) -> i64 { if c>=48 { if c<=57 { return 1 } } return 0 }
called by 1: read_number
40func read_symbol(s: *u8, pos: *i64) -> i64 { // uppercase + optional one lowercase -> packed int
called by 1: parse_seg calls 1: is_lower
47func read_number(s: *u8, pos: *i64) -> i64 { // optional integer, default 1
called by 1: parse_seg calls 1: is_digit
53func elem_index(etab: *i64, nel: *i64, sym: i64) -> i64
called by 2: parse_segmain
58func parse_seg(s: *u8, pos: *i64, etab: *i64, nel: *i64, counts: *i64, scale: i64) -> i64
77func parse_one(s: *u8, etab: *i64, nel: *i64, counts: *i64) -> i64
84func balance_reaction(strs: *i64, signs: *i64, S: i64, xout: *i64, B: i64) -> i64
called by 1: main calls 3: sys_mmapparse_onebalance
98func conserves_reaction(strs: *i64, signs: *i64, S: i64, x: *i64) -> i64
called by 1: main calls 3: sys_mmapparse_onebalanced_ok
109func main() -> i64