{--
>>> justRows <$> continentOf url "Andorra"
[TR {row = Array [Object (fromList [("name",String "Europe")])]}]
--}

query :: Geo -> [Cypher]
query a = [T.concat ["MATCH (", asNode a, ")-[:IN]-(b) RETURN b"]]
query :: Geo -> [Cypher]
query a = [T.concat ["MATCH (", asNode a, ")-[:IN]-(b) RETURN b"]]
query a = [T.concat ["MATCH (", asNode a, ")-[:IN]-(b) RETURN b"]]