ben is a user on post.lurk.org. You can follow them or interact with them if you have an account anywhere in the fediverse.
Having fun modeling tablet weaves in the deutsches museum
Here's the code for that:
daveWeave =
TabletWeave {tLoom =
TabletLoom {tablets = [Tablet [y,y,y,y] Z, Tablet [w,r,b,w] Z, Tablet [w,w,r,b] Z, Tablet [b,w,w,r] Z, Tablet [b,r,w,w] S, Tablet [w,b,r,w] S, Tablet [w,w,b,r] S, Tablet [y,y,y,y] S],
tabletWeft = thread orange
},
tSheds = map (replicate 8) [S,S,S,S,Z,Z,Z,Z]
}
where y = thread yellow
b = thread brown
w = thread white
r = thread red
