mneedham

data Position = Position Int Int Direction
	deriving (Show, Eq, Read)
data Direction = N | E | W | S
	deriving (Show, Eq, Enum, Bounded, Read)
data Command = L | R | M
	deriving (Show, Eq, Enum, Bounded, Read)

data DeltaPosition = DeltaPosition Int Int deriving (Show)

data State = State {

mneedham

#!/bin/bash

end="$((SECONDS+10))"
while true; do
    [[ "200" = "$(curl --silent --write-out %{http_code} --output /dev/null http://localhost:7474)" ]] && break
    [[ "${SECONDS}" -ge "${end}" ]] && exit 1
    sleep 1
done