diff --git a/tessellations/sample/inf.tes b/tessellations/sample/inf.tes new file mode 100644 index 00000000..916d40f6 --- /dev/null +++ b/tessellations/sample/inf.tes @@ -0,0 +1,10 @@ +# {3,inf} or another regular tessellation with ideal polygons +intslider(sides,3,3,MAX_EDGE) +h2. + +let(ia = ideal_angle(sides)) +let(ie = ideal_edge(sides)) +tile(0, [ia, ie, ia], *sides) + +conway("(0 0)") +#repeat(0, sides) diff --git a/tessellations/sample/regular.tes b/tessellations/sample/regular.tes new file mode 100644 index 00000000..3c7e940d --- /dev/null +++ b/tessellations/sample/regular.tes @@ -0,0 +1,12 @@ +## Arbitrary regular tiling +## You can change the values of sides and valence. Set sides to max to get infinite sides. +intslider(sides,6,3,MAX_EDGE+1) +intslider(valence,5,3,MAX_VALENCE) +c2(arcmcurv(sides:^valence)) + +let(sides1=ifp(sides - MAX_EDGE, inf, sides)) + +distunit(arcmedge(sides1:^valence)) +let(u = regangle(1, sides1)) +unittile(u,*sides1) +conway("(0 0)") diff --git a/tessellations/sample/sliders-two-kind.tes b/tessellations/sample/sliders-two-kind.tes new file mode 100644 index 00000000..846f2bf0 --- /dev/null +++ b/tessellations/sample/sliders-two-kind.tes @@ -0,0 +1,28 @@ +## triangle alpha-beta-gamma, where alpha+beta+gamma = 360/k degrees +## +## You can change alpha (=360/k deg * a/3), beta (=360/k deg * b/3), and k using 'tessellation sliders' in the geometry experiments menu. +## +## Changing k reloads the map, while changing other parameters does not +## +## Note: the spherical version (k=1) is buggy +## +intslider(k,2,1,5) +c2(2-k) +angleunit(deg) + +slider(av,1,0,3) +slider(bv,1,0,3) + +let(a = av*120/k) +let(b = bv*120/k) +let(c = (3-av-bv)*120/k) + +# note the 'if zero' conditional +let(ea=test(ifz(k-2, sin(a*deg), edge_angles(a,b,c)))) +let(eb=test(ifz(k-2, sin(b*deg), edge_angles(b,c,a)))) +let(ec=test(ifz(k-2, sin(c*deg), edge_angles(c,a,b)))) + +tile(ea, b, ec, a, eb, c) +conway("(0)(1)(2)") + +cscale(.75)