Topology Lesson example

20 views
Skip to first unread message

Doug Moen

unread,
Aug 29, 2019, 2:59:30 PM8/29/19
to Curv
I created this as a joke, but I think it looks fairly good.

// A topologist is a mathematician who doesn't know the difference
// between a coffee mug and a doughnut.

parametric
    Morph :: slider(0,1) = 0;
in let
wall_thickness = 0.075;
solid_body = cylinder{d:.75, h:1} >> move[-0.375,0,0];
cutout = cylinder{d:.75-wall_thickness, h:2}
          >> move[-0.375,0,wall_thickness + .5];
handle = torus {minor: .1, major: .65} >> rotate {angle: 90*deg, axis: X_axis};
solid_mug = union [solid_body, handle]
  >> colour (lib.web_colour.antique_white);
chocolate = webRGB(123, 63, 0); // en.wikipedia.org/wiki/Chocolate_(color)
doughnut = torus {minor: .3, major: .65}
  >> rotate {angle: 90*deg, axis: X_axis}
  >> colour (chocolate);
in
difference [
    morph Morph [solid_mug, doughnut],
    morph Morph [cutout >> move[0,0,Morph*2], doughnut]
]
>> lipschitz 1.5

Chris Bruner

unread,
Aug 29, 2019, 4:04:19 PM8/29/19
to cu...@googlegroups.com
Been awhile since I looked at your project. I rebuilt to see your joke, wow you've made a lot of progress!
--
You received this message because you are subscribed to the Google Groups "Curv" group.
To unsubscribe from this group and stop receiving emails from it, send an email to curv+uns...@googlegroups.com.
To view this discussion on the web, visit https://groups.google.com/d/msgid/curv/9e128364-aa5d-425a-9e3d-5ff25ae93c8e%40www.fastmail.com.


Reply all
Reply to author
Forward
0 new messages