thinFloretPoints :: RealFloat a => [Point3f a]
thinFloretPoints = floretPoints thinFloretIco
thinFloretPoints :: RealFloat a => [Point3f a]
thinFloretPoints = floretPoints thinFloretIco
thinFloretPoints = floretPoints thinFloretIco