module Fish_lines(p_tile, q_tile, r_tile, s_tile) where import Vector p_tile::[(Nr,Nr,Nr,Nr)] q_tile::[(Nr,Nr,Nr,Nr)] r_tile::[(Nr,Nr,Nr,Nr)] s_tile::[(Nr,Nr,Nr,Nr)] p_tile =[ (0,3,3,4), (3,4,0,8), (0,8,0,3), (6,0,4,4), (4,5,4,10), (4,10,7,6), (7,6,4,5), (11,0,10,4), (10,4,9,6), (9,6,8,8), (8,8,4,13), (4,13,0,16), (0,16,6,15), (6,15,8,16), (8,16,12,12), (12,12,16,12), (10,16,12,14), (12,14,16,13), (12,16,13,15), (13,15,16,14), (14,16,16,15), (8,12,16,10), (8,8,12,9), (12,9,16,8), (9,6,12,7), (12,7,16,6), (10,4,13,5), (13,5,16,4), (11,0,14,2), (14,2,16,2)] q_tile =[ (0,8,4,7), (4,7,6,7), (6,7,8,8), (8,8,12,10), (12,10,16,16), (0,12,3,13), (3,13,5,14), (5,14,7,15), (7,15,8,16), (2,16,3,13), (4,16,5,14), (6,16,7,15), (0,10,7,11), (9,13,8,15), (8,15,11,15), (11,15,9,13), (10,10,8,12), (8,12,12,12), (12,12,10,10), (2,0,4,5), (4,5,4,7), (4,0,6,5), (6,5,6,7), (6,0,8,5), (8,5,8,8), (10,0,14,11), (12,0,13,4), (13,4,16,8), (16,8,15,10), (15,10,16,16), (13,0,16,6), (14,0,16,4), (15,0,16,2), (0,0,8,0), (12,0,16,0), (0,0,0,8), (0,12,0,16)] r_tile =[ (0,0,8,8), (12,12,16,16), (0,4,5,10), (0,8,2,12), (0,12,1,14), (16,6,11,10), (11,10,6,16), (16,4,14,6), (14,6,8,8), (8,8,5,10), (5,10,2,12), (2,12,0,16), (16,8,12,12), (12,12,11,16), (1,1,4,0), (2,2,8,0), (3,3,8,2), (8,2,12,0), (5,5,12,3), (12,3,16,0), (11,16,12,12), (12,12,16,8), (13,13,16,10), (14,14,16,12), (15,15,16,14)] s_tile =[ (0,0,4,2), (4,2,8,2), (8,2,16,0), (0,4,2,1), (0,6,7,4), (0,8,8,6), (0,10,7,8), (0,12,7,10), (0,14,7,13), (13,13,16,14), (14,11,16,12), (15,9,16,10), (16,0,10,4), (10,4,8,6), (8,6,7,8), (7,8,7,13), (7,13,8,16), (12,16,13,13), (13,13,14,11), (14,11,15,9), (15,9,16,8), (10,16,11,10), (12,4,10,6), (10,6,12,7), (12,7,12,4), (15,5,13,7), (13,7,15,8), (15,8,15,5)]