pentaFloretPoints :: RealFloat a => [Point3f a]
pentaFloretPoints = floretPoints pentagonalFloretIco
pentaFloretPoints :: RealFloat a => [Point3f a]
pentaFloretPoints = floretPoints pentagonalFloretIco
pentaFloretPoints = floretPoints pentagonalFloretIco