simplified step generation

PiotrJustyna · Mar 4, 2024 · 72b1032 · 72b1032
1 parent f5c5715
commit 72b1032
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 9 deletions.
diff --git a/HelloWorld.hs b/HelloWorld.hs
@@ -13,12 +13,7 @@ stepName :: Step -> Double
 stepName Step { originCoordinates = x, name = y } = y
 
 stepShape :: Double -> Diagram B
-stepShape x = fromOffsets
-    [V2 0 0,
-    V2 0 0.5,
-    V2 0.75 0,
-    V2 0 (-0.5),
-    V2 (-0.75) 0]
+stepShape x = rect 0.75 0.5
     # showOrigin
     # named x
 

diff --git a/hello-world.svg b/hello-world.svg
diff --git a/start.sh b/start.sh
@@ -11,5 +11,4 @@ docker run \
   -it \
   -v "$(pwd):/root/code/drakon" \
   -v "$CERTIFICATE_DIRECTORY:/root/.ssh:ro" \
-  --rm "drakon-renderer:latest"
-
+  "drakon-renderer:latest"