2024-06-16 21:02:59 +00:00
|
|
|
for shape in "shape1" "shape2" "shape3" "iShape" "disc50"
|
|
|
|
|
do
|
|
|
|
|
pushd "${BASH_SOURCE%/*}" > /dev/null
|
2024-06-16 21:31:56 +00:00
|
|
|
ghc ./Shapes.hs -e "render 500 500 $shape"
|
2024-06-16 21:02:59 +00:00
|
|
|
mv shape.txt "$shape.txt"
|
|
|
|
|
popd > /dev/null
|
|
|
|
|
done
|
