{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE TemplateHaskell #-}
module CodeWorld.Sketches where
import CodeWorld.Picture
import GHC.Stack
import Util.EmbedAsUrl
sketchedAirplane :: HasCallStack => Picture
sketchedAirplane :: HasCallStack => Picture
sketchedAirplane =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedAirplane"
$(embedAsUrl "image/svg+xml" "data/AirplaneTransparency70.svg")
Double
10
Double
10
sketchedClock :: HasCallStack => Picture
sketchedClock :: HasCallStack => Picture
sketchedClock =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedClock"
$(embedAsUrl "image/svg+xml" "data/AlarmTransparency70.svg")
Double
10
Double
10
sketchedAlien :: HasCallStack => Picture
sketchedAlien :: HasCallStack => Picture
sketchedAlien =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedAlien"
$(embedAsUrl "image/svg+xml" "data/AlienTransparency70.svg")
Double
10
Double
10
sketchedApple :: HasCallStack => Picture
sketchedApple :: HasCallStack => Picture
sketchedApple =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedApple"
$(embedAsUrl "image/svg+xml" "data/AppleTransparency70.svg")
Double
10
Double
10
sketchedAstronaut :: HasCallStack => Picture
sketchedAstronaut :: HasCallStack => Picture
sketchedAstronaut =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedAstronaut"
$(embedAsUrl "image/svg+xml" "data/AustronautTransparency70.svg")
Double
10
Double
10
sketchedBaby :: HasCallStack => Picture
sketchedBaby :: HasCallStack => Picture
sketchedBaby =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedBaby"
$(embedAsUrl "image/svg+xml" "data/BabyTransparency70.svg")
Double
10
Double
10
sketchedBalloon :: HasCallStack => Picture
sketchedBalloon :: HasCallStack => Picture
sketchedBalloon =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedBalloon"
$(embedAsUrl "image/svg+xml" "data/BalloonTransparency70.svg")
Double
10
Double
10
sketchedBall :: HasCallStack => Picture
sketchedBall :: HasCallStack => Picture
sketchedBall =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedBall"
$(embedAsUrl "image/svg+xml" "data/BallTransparency70.svg")
Double
10
Double
10
sketchedBell :: HasCallStack => Picture
sketchedBell :: HasCallStack => Picture
sketchedBell =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedBell"
$(embedAsUrl "image/svg+xml" "data/BellTransparency70.svg")
Double
10
Double
10
sketchedBird :: HasCallStack => Picture
sketchedBird :: HasCallStack => Picture
sketchedBird =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedBird"
$(embedAsUrl "image/svg+xml" "data/BirdTransparency70.svg")
Double
10
Double
10
sketchedBoat :: HasCallStack => Picture
sketchedBoat :: HasCallStack => Picture
sketchedBoat =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedBoat"
$(embedAsUrl "image/svg+xml" "data/BoatTransparency70.svg")
Double
10
Double
10
sketchedBook :: HasCallStack => Picture
sketchedBook :: HasCallStack => Picture
sketchedBook =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedBook"
$(embedAsUrl "image/svg+xml" "data/BookTransparency70.svg")
Double
10
Double
10
sketchedBoy :: HasCallStack => Picture
sketchedBoy :: HasCallStack => Picture
sketchedBoy =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedBoy"
$(embedAsUrl "image/svg+xml" "data/BoyTransparency70.svg")
Double
10
Double
10
sketchedBubble :: HasCallStack => Picture
sketchedBubble :: HasCallStack => Picture
sketchedBubble =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedBubble"
$(embedAsUrl "image/svg+xml" "data/BubbleTransparency70.svg")
Double
10
Double
10
sketchedBug :: HasCallStack => Picture
sketchedBug :: HasCallStack => Picture
sketchedBug =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedBug"
$(embedAsUrl "image/svg+xml" "data/BugTransparency70.svg")
Double
10
Double
10
sketchedCar :: HasCallStack => Picture
sketchedCar :: HasCallStack => Picture
sketchedCar =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedCar"
$(embedAsUrl "image/svg+xml" "data/CarTransparency70.svg")
Double
10
Double
10
sketchedChatBubble :: HasCallStack => Picture
sketchedChatBubble :: HasCallStack => Picture
sketchedChatBubble =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedChatBubble"
$(embedAsUrl "image/svg+xml" "data/ChatBubbleTransparency70.svg")
Double
10
Double
10
sketchedChest :: HasCallStack => Picture
sketchedChest :: HasCallStack => Picture
sketchedChest =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedChest"
$(embedAsUrl "image/svg+xml" "data/ChestTransparency70.svg")
Double
10
Double
10
sketchedCloud :: HasCallStack => Picture
sketchedCloud :: HasCallStack => Picture
sketchedCloud =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedCloud"
$(embedAsUrl "image/svg+xml" "data/CloudTransparency70.svg")
Double
10
Double
10
sketchedCoin :: HasCallStack => Picture
sketchedCoin :: HasCallStack => Picture
sketchedCoin =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedCoin"
$(embedAsUrl "image/svg+xml" "data/CoinTransparency70.svg")
Double
10
Double
10
sketchedDog :: HasCallStack => Picture
sketchedDog :: HasCallStack => Picture
sketchedDog =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedDog"
$(embedAsUrl "image/svg+xml" "data/DogTransparency70.svg")
Double
10
Double
10
sketchedDragon :: HasCallStack => Picture
sketchedDragon :: HasCallStack => Picture
sketchedDragon =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedDragon"
$(embedAsUrl "image/svg+xml" "data/DragonTransparency70.svg")
Double
10
Double
10
sketchedExplosion :: HasCallStack => Picture
sketchedExplosion :: HasCallStack => Picture
sketchedExplosion =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedExplosion"
$(embedAsUrl "image/svg+xml" "data/ExplosionTransparency70.svg")
Double
10
Double
10
sketchedFish :: HasCallStack => Picture
sketchedFish :: HasCallStack => Picture
sketchedFish =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedFish"
$(embedAsUrl "image/svg+xml" "data/FishTransparency70.svg")
Double
10
Double
10
sketchedFlag :: HasCallStack => Picture
sketchedFlag :: HasCallStack => Picture
sketchedFlag =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedFlag"
$(embedAsUrl "image/svg+xml" "data/FlagTransparency70.svg")
Double
10
Double
10
sketchedFlame :: HasCallStack => Picture
sketchedFlame :: HasCallStack => Picture
sketchedFlame =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedFlame"
$(embedAsUrl "image/svg+xml" "data/FlameTransparency70.svg")
Double
10
Double
10
sketchedFlower :: HasCallStack => Picture
sketchedFlower :: HasCallStack => Picture
sketchedFlower =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedFlower"
$(embedAsUrl "image/svg+xml" "data/FlowerTransparency70.svg")
Double
10
Double
10
sketchedGear :: HasCallStack => Picture
sketchedGear :: HasCallStack => Picture
sketchedGear =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedGear"
$(embedAsUrl "image/svg+xml" "data/GearTransparency70.svg")
Double
10
Double
10
sketchedGhost :: HasCallStack => Picture
sketchedGhost :: HasCallStack => Picture
sketchedGhost =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedGhost"
$(embedAsUrl "image/svg+xml" "data/GhostTransparency70.svg")
Double
10
Double
10
sketchedGirl :: HasCallStack => Picture
sketchedGirl :: HasCallStack => Picture
sketchedGirl =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedGirl"
$(embedAsUrl "image/svg+xml" "data/GirlTransparency70.svg")
Double
10
Double
10
sketchedGrass :: HasCallStack => Picture
sketchedGrass :: HasCallStack => Picture
sketchedGrass =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedGrass"
$(embedAsUrl "image/svg+xml" "data/GrassTransparency70.svg")
Double
10
Double
10
sketchedHeart :: HasCallStack => Picture
sketchedHeart :: HasCallStack => Picture
sketchedHeart =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedHeart"
$(embedAsUrl "image/svg+xml" "data/HeartTransparency70.svg")
Double
10
Double
10
sketchedHotAirBalloon :: HasCallStack => Picture
sketchedHotAirBalloon :: HasCallStack => Picture
sketchedHotAirBalloon =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedHotAirBalloon"
$(embedAsUrl "image/svg+xml" "data/HotAirBalloonTransparency70.svg")
Double
10
Double
10
sketchedHouse :: HasCallStack => Picture
sketchedHouse :: HasCallStack => Picture
sketchedHouse =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedHouse"
$(embedAsUrl "image/svg+xml" "data/HouseTransparency70.svg")
Double
10
Double
10
sketchedJewel :: HasCallStack => Picture
sketchedJewel :: HasCallStack => Picture
sketchedJewel =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedJewel"
$(embedAsUrl "image/svg+xml" "data/JewelTransparency70.svg")
Double
10
Double
10
sketchedKey :: HasCallStack => Picture
sketchedKey :: HasCallStack => Picture
sketchedKey =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedKey"
$(embedAsUrl "image/svg+xml" "data/KeyTransparency70.svg")
Double
10
Double
10
sketchedCat :: HasCallStack => Picture
sketchedCat :: HasCallStack => Picture
sketchedCat =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedCat"
$(embedAsUrl "image/svg+xml" "data/KittenTransparency70.svg")
Double
10
Double
10
sketchedLightBulb :: HasCallStack => Picture
sketchedLightBulb :: HasCallStack => Picture
sketchedLightBulb =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedLightBulb"
$(embedAsUrl "image/svg+xml" "data/LightbulbTransparency70.svg")
Double
10
Double
10
sketchedLightning :: HasCallStack => Picture
sketchedLightning :: HasCallStack => Picture
sketchedLightning =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedLightning"
$(embedAsUrl "image/svg+xml" "data/LightningTransparency70.svg")
Double
10
Double
10
sketchedMonster :: HasCallStack => Picture
sketchedMonster :: HasCallStack => Picture
sketchedMonster =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedMonster"
$(embedAsUrl "image/svg+xml" "data/MonsterTransparency70.svg")
Double
10
Double
10
sketchedMoon :: HasCallStack => Picture
sketchedMoon :: HasCallStack => Picture
sketchedMoon =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedMoon"
$(embedAsUrl "image/svg+xml" "data/MoonTransparency70.svg")
Double
10
Double
10
sketchedNote :: HasCallStack => Picture
sketchedNote :: HasCallStack => Picture
sketchedNote =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedNote"
$(embedAsUrl "image/svg+xml" "data/NoteTransparency70.svg")
Double
10
Double
10
sketchedPawnBlack :: HasCallStack => Picture
sketchedPawnBlack :: HasCallStack => Picture
sketchedPawnBlack =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedPawnBlack"
$(embedAsUrl "image/svg+xml" "data/PawnBlackTransparency70.svg")
Double
10
Double
10
sketchedPawnBlue :: HasCallStack => Picture
sketchedPawnBlue :: HasCallStack => Picture
sketchedPawnBlue =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedPawnBlue"
$(embedAsUrl "image/svg+xml" "data/PawnBlueTransparency70.svg")
Double
10
Double
10
sketchedPawnGreen :: HasCallStack => Picture
sketchedPawnGreen :: HasCallStack => Picture
sketchedPawnGreen =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedPawnGreen"
$(embedAsUrl "image/svg+xml" "data/PawnGreenTransparency70.svg")
Double
10
Double
10
sketchedPawnRed :: HasCallStack => Picture
sketchedPawnRed :: HasCallStack => Picture
sketchedPawnRed =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedPawnRed"
$(embedAsUrl "image/svg+xml" "data/PawnRedTransparency70.svg")
Double
10
Double
10
sketchedPawnWhite :: HasCallStack => Picture
sketchedPawnWhite :: HasCallStack => Picture
sketchedPawnWhite =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedPawnWhite"
$(embedAsUrl "image/svg+xml" "data/PawnWhiteTransparency70.svg")
Double
10
Double
10
sketchedRaindrop :: HasCallStack => Picture
sketchedRaindrop :: HasCallStack => Picture
sketchedRaindrop =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedRaindrop"
$(embedAsUrl "image/svg+xml" "data/RaindropTransparency70.svg")
Double
10
Double
10
sketchedRobot :: HasCallStack => Picture
sketchedRobot :: HasCallStack => Picture
sketchedRobot =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedRobot"
$(embedAsUrl "image/svg+xml" "data/RobotTransparency70.svg")
Double
10
Double
10
sketchedRocket :: HasCallStack => Picture
sketchedRocket :: HasCallStack => Picture
sketchedRocket =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedRocket"
$(embedAsUrl "image/svg+xml" "data/RocketShipTransparency70.svg")
Double
10
Double
10
sketchedScroll :: HasCallStack => Picture
sketchedScroll :: HasCallStack => Picture
sketchedScroll =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedScroll"
$(embedAsUrl "image/svg+xml" "data/ScrollTransparency70.svg")
Double
10
Double
10
sketchedSign :: HasCallStack => Picture
sketchedSign :: HasCallStack => Picture
sketchedSign =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedSign"
$(embedAsUrl "image/svg+xml" "data/SignTransparency70.svg")
Double
10
Double
10
sketchedSparkle :: HasCallStack => Picture
sketchedSparkle :: HasCallStack => Picture
sketchedSparkle =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedSparkle"
$(embedAsUrl "image/svg+xml" "data/SparklesTransparency70.svg")
Double
10
Double
10
sketchedStar :: HasCallStack => Picture
sketchedStar :: HasCallStack => Picture
sketchedStar =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedStar"
$(embedAsUrl "image/svg+xml" "data/StarTransparency70.svg")
Double
10
Double
10
sketchedSun :: HasCallStack => Picture
sketchedSun :: HasCallStack => Picture
sketchedSun =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedSun"
$(embedAsUrl "image/svg+xml" "data/SunTransparency70.svg")
Double
10
Double
10
sketchedThoughtBubble :: HasCallStack => Picture
sketchedThoughtBubble :: HasCallStack => Picture
sketchedThoughtBubble =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedThoughtBubble"
$(embedAsUrl "image/svg+xml" "data/ThoughtBubbleTransparency70.svg")
Double
10
Double
10
sketchedBlock :: HasCallStack => Picture
sketchedBlock :: HasCallStack => Picture
sketchedBlock =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedBlock"
$(embedAsUrl "image/svg+xml" "data/ToyCubeTransparency70.svg")
Double
10
Double
10
sketchedTree :: HasCallStack => Picture
sketchedTree :: HasCallStack => Picture
sketchedTree =
Maybe SrcLoc -> Text -> Text -> Double -> Double -> Picture
Sketch
(CallStack -> Maybe SrcLoc
getDebugSrcLoc HasCallStack => CallStack
callStack)
Text
"sketchedTree"
$(embedAsUrl "image/svg+xml" "data/TreeTransparency70.svg")
Double
10
Double
10