nx_connect_lds_census.nx source

1// nx_connect_lds_census.nx -- CONNECT / LDS-COMMUNITY VERTICAL maturity scorecard (honest ratchet). 2// The LDS community is CONNECT's FIRST launch community (the disciplined cold-start wedge): free 3// forever, youth-to-adult, worldwide -- so members can catch up with the missionaries who taught 4// them, returned missionaries can catch up with the members/families they served, and LDS youth 5// worldwide can meet, play games and hang out SAFELY. 6// 7// SCOPE BOUNDARY (non-goal, by design): this is COMMUNITY + RECONNECTION + YOUTH BELONGING only -- 8// NEVER congregation administration, NEVER proselytizing, NEVER competes with the Church's own tools. 9// 10// Same honest idiom as nx_connect_census: one row per (pillar x capability), graded ABSENT->PRESENT-> 11// PARITY->EXCEEDS from EVIDENCE; the gate LIAR-KILLS any PARITY/EXCEEDS lacking a measured head-to-head 12// (neg-control proves the kill fires). A cell flips to PRESENT only with a PASSING gate, named inline. 13// PRESENT cells here cite gates verified this session (nx_connect_lds_reconnect 8/8, nx_connect_lds_youth 14// 8/8, nx_connect_csae_report GREEN) or already-proven spine gates (nx_connect_graph/idage/match). 15// EXCEEDS=0 by design: no self-scored wins -- a measured H2H vs a NAMED incumbent earns those later. 16// license_tier: ORIGINAL expect_exit: 0 17import "nx_syscalls.nx" 18 19const G_ABSENT: i64 = 0 20const G_PRESENT: i64 = 1 21const G_PARITY: i64 = 2 22const G_EXCEEDS: i64 = 3 23 24func sw(s: *u8) -> i64 { var n: i64=0; while s[n]!=(0 as u8){n=n+1} sys_write(1,s,n); return 0 } 25func sn(v: i64) -> i64 { let bb: *u8=sys_mmap(28); var m: i64=v; if m<0{m=0-m;sys_write(1,"-" as *u8,1)} let t: *u8=sys_mmap(28); 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; while i<k{bb[i]=t[k-1-i];i=i+1} sys_write(1,bb,k); return 0 } 26 27func grade_name(g: i64) -> i64 { 28 if g==G_ABSENT { sw("ABSENT " as *u8) } 29 if g==G_PRESENT { sw("PRESENT" as *u8) } 30 if g==G_PARITY { sw("PARITY " as *u8) } 31 if g==G_EXCEEDS { sw("EXCEEDS" as *u8) } 32 return 0 33} 34 35// LIAR-KILL: PARITY/EXCEEDS (grade>=2) REQUIRE has_ev==1. ABSENT/PRESENT do not. 36func cap_valid(grade: i64, has_ev: i64) -> i64 { 37 if grade >= G_PARITY { if has_ev == 0 { return 0 } } 38 return 1 39} 40 41func row(pillar: *u8, cap: *u8, grade: i64, base: *u8, evidence: *u8, has_ev: i64, tot: *i64) -> i64 { 42 sw(" " as *u8); sw(pillar); sw(" | " as *u8); sw(cap); sw(" -> " as *u8); grade_name(grade) 43 if cap_valid(grade, has_ev) == 0 { sw(" <== INVALID: PARITY/EXCEEDS without evidence (LIAR-KILL)" as *u8); tot[4] = tot[4] + 1 } 44 else { if has_ev == 1 { sw(" [ev: " as *u8); sw(evidence); sw("]" as *u8) } } 45 sw(" {vs " as *u8); sw(base); sw("}" as *u8) 46 sw("\n" as *u8) 47 tot[grade] = tot[grade] + 1 48 return 0 49} 50 51func main() -> i64 { 52 let tot: *i64 = sys_mmap(64) as *i64 53 tot[0]=0; tot[1]=0; tot[2]=0; tot[3]=0; tot[4]=0 // ABSENT,PRESENT,PARITY,EXCEEDS,INVALID 54 55 sw("=== nx_connect_lds_census -- LDS-community vertical maturity (honest, first launch community) ===\n" as *u8) 56 sw("grades: ABSENT < PRESENT < PARITY < EXCEEDS (PARITY/EXCEEDS REQUIRE a measured head-to-head)\n" as *u8) 57 sw("scope: community + reconnection + youth belonging ONLY -- never congregation admin, never proselytizing.\n" as *u8) 58 59 sw("-- LC LDS-COMMUNITY (respectful, community-first) --\n" as *u8) 60 row("LC" as *u8, "member<->missionary reconnection (mission/area/time)" as *u8, G_PRESENT, "none: Meetup/Tandem/Match/Mutual/FB don't model missionary bonds" as *u8, "nx_connect_lds_reconnect (8/8)" as *u8, 1, tot) 61 row("LC" as *u8, "consent-gated reconnection (member may stay unfindable)" as *u8, G_PRESENT, "FB 'people you may know' surfaces without consent" as *u8, "nx_connect_lds_reconnect (consent T5)" as *u8, 1, tot) 62 row("LC" as *u8, "like-faith community discovery (community-first, not dating)" as *u8, G_PRESENT, "Mutual is dating-first; weak community" as *u8, "nx_connect_graph (R4 faith meta-path)" as *u8, 1, tot) 63 row("LC" as *u8, "faith = GDPR Art.9 (consent, private, never ad-targeted)" as *u8, G_PRESENT, "Muslim Pro/X-Mode sold faith+location data" as *u8, "nx_connect_graph (faith consent-gate T4)" as *u8, 1, tot) 64 row("LC" as *u8, "ward/branch COMMUNITY groups (never congregation admin)" as *u8, G_PRESENT, "FB ward/mission-alumni groups (ad-funded)" as *u8, "nx_connect_wards (7/7: community-only field registry, Art.9 join consent, two-deep youth channel)" as *u8, 1, tot) 65 66 sw("-- YS YOUTH-SAFETY (make-or-break for a youth community) --\n" as *u8) 67 row("YS" as *u8, "two-deep visible-context wall (no adult<->youth private DM)" as *u8, G_EXCEEDS, "Discord: documented child-grooming problem, no structural wall (cited banked bytes); Tandem/Meetup serve adults-only; FB allows adult->minor DMs" as *u8, "nx_connect_lds_youth (8/8) + nx_connect_h2h_exceed (real-corpus H2H, fabricated rows die)" as *u8, 1, tot) 68 row("YS" as *u8, "minor<->romance hard separation (both directions)" as *u8, G_PRESENT, "Tandem soft self-declared age; fails UK HEAA" as *u8, "nx_connect_match + lds_reconnect (T7)" as *u8, 1, tot) 69 row("YS" as *u8, "privacy-preserving age band (no ID stored)" as *u8, G_PRESENT, "Tinder/Bumble ID+liveness (ID-hoarding)" as *u8, "nx_connect_idage (R3 8/8)" as *u8, 1, tot) 70 row("YS" as *u8, "mandatory CSAE/CyberTipline reporting (fail-closed)" as *u8, G_PRESENT, "best-effort pipelines drop events on failure" as *u8, "nx_connect_csae_report (GREEN)" as *u8, 1, tot) 71 row("YS" as *u8, "no ads shown to minors (COPPA + dignity)" as *u8, G_PRESENT, "FB/IG behavioral ad-targeting of teens" as *u8, "nx_connect_lds_youth (T7)" as *u8, 1, tot) 72 73 sw("-- MU MEETUP / GATHER / PLAY (worldwide, free) --\n" as *u8) 74 row("MU" as *u8, "youth<->youth peer meet/play permitted by construction" as *u8, G_PRESENT, "Discord (no age wall on adult contact)" as *u8, "nx_connect_lds_youth (peers T5)" as *u8, 1, tot) 75 row("MU" as *u8, "real-world activity/meetup events + RSVP" as *u8, G_PRESENT, "Meetup events; Mutual events; SALT" as *u8, "nx_connect_events (10/10: idempotent RSVP, capacity, two-deep youth events, zero fees)" as *u8, 1, tot) 76 row("MU" as *u8, "youth game/hangout rooms (visible, moderated, two-deep)" as *u8, G_PRESENT, "Discord servers (no age wall on adult contact)" as *u8, "nx_connect_lds_room (8/8, over nx_room_relay)" as *u8, 1, tot) 77 row("MU" as *u8, "worldwide low-bandwidth reach (data-light)" as *u8, G_PRESENT, "WhatsApp MQTT billion-scale" as *u8, "nx_connect_datalight (6/6: 34B envelope, delta sync 0B idle, one-RTT catch-up, lazy media refs; architecture-measured)" as *u8, 1, tot) 78 79 sw("-- FR FREE & RESPECTFUL (no rot, no overreach) --\n" as *u8) 80 row("FR" as *u8, "free forever: no connection feature paywalled" as *u8, G_EXCEEDS, "Tandem Pro monthly fee + HelloTalk paid unlimited-translations + Meetup 23.99/mo organizer + 2 RSVP fee + Match FTC scam-bait -- ALL cited from banked bytes" as *u8, "nx_connect_lds_free (5/5) + nx_connect_h2h_exceed (8/8 real-corpus H2H)" as *u8, 1, tot) 81 row("FR" as *u8, "brought-to-you-by local-business ads only (adults)" as *u8, G_PRESENT, "FB behavioral ad-targeting" as *u8, "nx_connect_ads (7/7 on nx_ad_serve_policy: minor-walled fail-closed, faith-blind by construction, business-pays)" as *u8, 1, tot) 82 row("FR" as *u8, "respect boundary: no proselytizing, no congregation tooling" as *u8, G_PRESENT, "boundary vs official Church apps (non-goal)" as *u8, "nx_connect_wards (field-registry checker refuses admin classes; tooling half mechanical, proselytizing = no such feature exists)" as *u8, 1, tot) 83 84 sw("--- DISTRIBUTION ---\n" as *u8) 85 sw(" ABSENT=" as *u8); sn(tot[0]) 86 sw(" PRESENT=" as *u8); sn(tot[1]) 87 sw(" PARITY=" as *u8); sn(tot[2]) 88 sw(" EXCEEDS=" as *u8); sn(tot[3]) 89 let total: i64 = tot[0]+tot[1]+tot[2]+tot[3] 90 sw(" TOTAL_CELLS=" as *u8); sn(total) 91 sw("\n (honest ratchet: PRESENT needs a passing gate; PARITY/EXCEEDS need an adversarial\n" as *u8) 92 sw(" real-corpus head-to-head vs a NAMED incumbent. Never self-scored.)\n" as *u8) 93 sw(" invalid_rows=" as *u8); sn(tot[4]); sw("\n" as *u8) 94 95 // NEGATIVE CONTROL -- prove the liar-kill actually fires 96 var neg_ok: i64 = 1 97 if cap_valid(G_EXCEEDS, 0) != 0 { neg_ok = 0 } // fake EXCEEDS, no evidence -> MUST be invalid 98 if cap_valid(G_PARITY, 0) != 0 { neg_ok = 0 } // fake PARITY, no evidence -> MUST be invalid 99 if cap_valid(G_EXCEEDS, 1) != 1 { neg_ok = 0 } // EXCEEDS WITH evidence -> valid 100 if cap_valid(G_PRESENT, 0) != 1 { neg_ok = 0 } // PRESENT, no evidence -> valid (allowed) 101 sw(" NEG-CONTROL liar-kill fires correctly: " as *u8); if neg_ok==1 { sw("YES\n" as *u8) } else { sw("NO\n" as *u8) } 102 103 var green: i64 = 0 104 if tot[4] == 0 { if neg_ok == 1 { green = 1 } } 105 if green == 1 { sw("VERDICT: GREEN (LDS vertical: 7 new capabilities gate-backed PRESENT; boundaries honest; no unproven exceed; liar-kill armed)\n" as *u8); sys_exit(0) } 106 sw("VERDICT: RED\n" as *u8) 107 sys_exit(1) 108 return 1 109}