},
{
"cell_type": "code",
- "execution_count": 6,
+ "execution_count": 2,
"metadata": {},
"outputs": [],
"source": [
- "import Data.List.Split (splitOn)\n",
- "import Data.List (mapAccumL)"
+ "import Data.List.Split (splitOn)"
]
},
{
"cell_type": "code",
- "execution_count": 4,
+ "execution_count": 3,
"metadata": {},
"outputs": [],
"source": [
- "hexStep (Int, Int) -> String -> (Int, Int)\n",
+ "hexStep :: (Int, Int) -> String -> (Int, Int)\n",
"hexStep (n, ne) s = case s of \n",
" \"n\" -> (n + 1, ne)\n",
" \"ne\" -> (n, ne + 1)\n",
},
{
"cell_type": "code",
- "execution_count": 8,
- "metadata": {},
- "outputs": [
- {
- "data": {
- "text/plain": [
- "(4,[1,3,5,7])"
- ]
- },
- "metadata": {},
- "output_type": "display_data"
- }
- ],
- "source": [
- "mapAccumL (\\a b -> (a + 1, a + b)) 0 [1,2,3,4]"
- ]
- },
- {
- "cell_type": "code",
- "execution_count": 23,
+ "execution_count": 4,
"metadata": {},
"outputs": [],
"source": [
},
{
"cell_type": "code",
- "execution_count": 24,
- "metadata": {},
- "outputs": [
- {
- "data": {
- "text/plain": [
- "3"
- ]
- },
- "metadata": {},
- "output_type": "display_data"
- }
- ],
- "source": [
- "distance $ hexPath $ splitOn \",\" \"ne,ne,ne\""
- ]
- },
- {
- "cell_type": "code",
- "execution_count": 25,
- "metadata": {},
- "outputs": [
- {
- "data": {
- "text/plain": [
- "0"
- ]
- },
- "metadata": {},
- "output_type": "display_data"
- }
- ],
- "source": [
- "distance $ hexPath $ splitOn \",\" \"ne,ne,sw,sw\""
- ]
- },
- {
- "cell_type": "code",
- "execution_count": 26,
- "metadata": {},
- "outputs": [
- {
- "data": {
- "text/plain": [
- "2"
- ]
- },
- "metadata": {},
- "output_type": "display_data"
- }
- ],
- "source": [
- "distance $ hexPath $ splitOn \",\" \"ne,ne,s,s\""
- ]
- },
- {
- "cell_type": "code",
- "execution_count": 27,
- "metadata": {},
- "outputs": [
- {
- "data": {
- "text/plain": [
- "3"
- ]
- },
- "metadata": {},
- "output_type": "display_data"
- }
- ],
- "source": [
- "distance $ hexPath $ splitOn \",\" \"se,sw,se,sw,sw\""
- ]
- },
- {
- "cell_type": "code",
- "execution_count": 28,
+ "execution_count": 5,
"metadata": {},
"outputs": [
{
},
{
"cell_type": "code",
- "execution_count": 29,
+ "execution_count": 6,
+ "metadata": {},
+ "outputs": [
+ {
+ "data": {
+ "text/plain": [
+ "3"
+ ]
+ },
+ "metadata": {},
+ "output_type": "display_data"
+ }
+ ],
+ "source": [
+ "distance $ hexPath $ splitOn \",\" \"ne,ne,ne\""
+ ]
+ },
+ {
+ "cell_type": "code",
+ "execution_count": 7,
+ "metadata": {},
+ "outputs": [
+ {
+ "data": {
+ "text/plain": [
+ "0"
+ ]
+ },
+ "metadata": {},
+ "output_type": "display_data"
+ }
+ ],
+ "source": [
+ "distance $ hexPath $ splitOn \",\" \"ne,ne,sw,sw\""
+ ]
+ },
+ {
+ "cell_type": "code",
+ "execution_count": 8,
+ "metadata": {},
+ "outputs": [
+ {
+ "data": {
+ "text/plain": [
+ "2"
+ ]
+ },
+ "metadata": {},
+ "output_type": "display_data"
+ }
+ ],
+ "source": [
+ "distance $ hexPath $ splitOn \",\" \"ne,ne,s,s\""
+ ]
+ },
+ {
+ "cell_type": "code",
+ "execution_count": 9,
+ "metadata": {},
+ "outputs": [
+ {
+ "data": {
+ "text/plain": [
+ "3"
+ ]
+ },
+ "metadata": {},
+ "output_type": "display_data"
+ }
+ ],
+ "source": [
+ "distance $ hexPath $ splitOn \",\" \"se,sw,se,sw,sw\""
+ ]
+ },
+ {
+ "cell_type": "code",
+ "execution_count": 10,
"metadata": {},
"outputs": [],
"source": [
},
{
"cell_type": "code",
- "execution_count": 30,
+ "execution_count": 11,
"metadata": {},
"outputs": [],
"source": [
},
{
"cell_type": "code",
- "execution_count": 31,
+ "execution_count": 12,
"metadata": {},
"outputs": [
{
},
{
"cell_type": "code",
- "execution_count": 32,
+ "execution_count": 13,
"metadata": {},
"outputs": [],
"source": [
},
{
"cell_type": "code",
- "execution_count": 36,
+ "execution_count": 14,
"metadata": {},
"outputs": [
{
},
{
"cell_type": "code",
- "execution_count": 37,
+ "execution_count": 15,
"metadata": {},
"outputs": [
{
},
{
"cell_type": "code",
- "execution_count": 38,
+ "execution_count": 16,
"metadata": {},
"outputs": [
{
},
{
"cell_type": "code",
- "execution_count": 39,
+ "execution_count": 17,
"metadata": {},
"outputs": [
{
},
{
"cell_type": "code",
- "execution_count": 40,
+ "execution_count": 18,
"metadata": {},
"outputs": [
{
},
{
"cell_type": "code",
- "execution_count": 41,
+ "execution_count": 19,
"metadata": {},
"outputs": [
{
},
{
"cell_type": "code",
- "execution_count": 42,
+ "execution_count": 20,
"metadata": {},
"outputs": [
{
},
{
"cell_type": "code",
- "execution_count": 43,
+ "execution_count": 21,
"metadata": {},
"outputs": [],
"source": [
},
{
"cell_type": "code",
- "execution_count": 44,
+ "execution_count": 22,
"metadata": {},
"outputs": [],
"source": [
},
{
"cell_type": "code",
- "execution_count": 45,
+ "execution_count": 23,
"metadata": {},
"outputs": [
{