12 lines
257 B
Text
12 lines
257 B
Text
checkdamm=: {{0=((".;._2{{)n
|
|
0 7 4 1 6 3 5 8 9 2
|
|
3 0 2 7 1 6 8 9 4 5
|
|
1 9 0 5 2 7 6 4 3 8
|
|
7 2 6 0 3 4 9 5 8 1
|
|
5 1 8 9 0 2 7 3 6 4
|
|
9 5 7 8 4 0 2 6 1 3
|
|
8 4 1 3 5 9 0 2 7 6
|
|
6 8 3 4 9 5 1 0 2 7
|
|
4 6 5 2 7 8 3 1 0 9
|
|
2 3 9 6 8 1 4 7 5 0
|
|
}}){~<@,)/|.0,10#.inv y}}"0
|