From 9d303afaa00c7e3b70a9ce0356bf9f6cc8b49fba Mon Sep 17 00:00:00 2001
From: Mike Lynch <m.lynch@sydney.edu.au>
Date: Sun, 7 Apr 2024 08:10:26 +1000
Subject: [PATCH] Added model of snub 24-cell

---
 polytopes.js | 30 +++++++++++++++++++++++++++++-
 1 file changed, 29 insertions(+), 1 deletion(-)

diff --git a/polytopes.js b/polytopes.js
index d42059a..3b7d15c 100644
--- a/polytopes.js
+++ b/polytopes.js
@@ -301,7 +301,7 @@ function auto_120cell_faces(links) {
 
 
 
-function make_120cell_vertices() {
+export function make_120cell_vertices() {
 	const phi = 0.5 * (1 + Math.sqrt(5));  
 	const r5 = Math.sqrt(5);   
 	const phi2 = phi * phi;    
@@ -617,7 +617,34 @@ export const cell600_layered = () => {
 }
 
 
+export const snub24cell = () => {
+	const nodes600  = make_600cell_vertices();
+	const links600 = auto_detect_edges(nodes600, 12);
 
+	const nodes = nodes600.filter((n) => n.label != 1);
+	const links = links600.filter((l) => {
+		const sn = node_by_id(nodes, l.source);
+		const tn = node_by_id(nodes, l.target);
+		return sn && tn;
+	});
+
+	console.log(nodes);
+
+	links.map((l) => l.label = 0);
+
+	return {
+		name: 'snub 24-cell',
+		nodes: nodes,
+		links: links,
+		geometry: {
+			node_size: 0.02,
+			link_size: 0.02
+		},
+		options: [ { name: "--" } ],
+	}
+
+
+}
 
 
 
@@ -694,6 +721,7 @@ export const build_all = () => {
 		cell16(),
 		tesseract(),
 		cell24(),
+		snub24cell(),
 		cell600(),
 		cell600_layered(),
 	 	cell120_inscribed(),