This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
myShapes model = [ | |
{- | |
This code is for a picture of a playing card. | |
The card is a 6 of hearts. | |
-} | |
text "Example 1" |> centered |> filled black |> move(0,55) | |
, heart red orange |> move (0, 40) | |
, heart yellow blue |> move (20,40) | |
, heart green pink |> move (40,40) | |
, heart purple red |> move (60,40) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- Copy to macoutreach.rocks animation slot | |
myShapes model = | |
[ | |
myFunction 5 -- replace 5 with different number for different depth | |
] | |
myFunction n = | |
if n <= 0 then | |
group [] |