pga-Misc{71} j J 3.05 Copyright (c) 1990-1997, Iverson Software Inc. All rights reserved. lastTwo =. _2 & {. F =. ], (+/ @ lastTwo) F 0 1 0 1 1 F F 0 1 0 1 1 2 F F F F F F F 0 1 0 1 1 2 3 5 8 13 21 F ^: 20 (0 1) 0 1 1 2 3 5 8 13 21 34 55 89 144 233 377 610 987 1597 2584 4181 6765 10946 twoNearEnd =. _3 _1 & { G =. ], (+/ @ twoNearEnd) G G G G G 0 1 1 0 1 1 1 2 3 4 6 G ^: 20 (0 1 1) 0 1 1 1 2 3 4 6 9 13 19 28 41 60 88 129 189 277 406 595 872 1278 1873 21 | 13 * i. 21 0 13 5 18 10 2 15 7 20 12 4 17 9 1 14 6 19 11 3 16 8 L =. 30 i. L 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 N =. i. L 88 | (41 * N) +/ (60 * N) 0 60 32 4 64 36 8 68 40 12 72 44 16 76 48 20 80 52 24 84 56 28 0 60 32 4 64 36 8 68 41 13 73 45 17 77 49 21 81 53 25 85 57 29 1 61 33 5 65 37 9 69 41 13 73 45 17 77 49 21 82 54 26 86 58 30 2 62 34 6 66 38 10 70 42 14 74 46 18 78 50 22 82 54 26 86 58 30 2 62 35 7 67 39 11 71 43 15 75 47 19 79 51 23 83 55 27 87 59 31 3 63 35 7 67 39 11 71 43 15 76 48 20 80 52 24 84 56 28 0 60 32 4 64 36 8 68 40 12 72 44 16 76 48 20 80 52 24 84 56 29 1 61 33 5 65 37 9 69 41 13 73 45 17 77 49 21 81 53 25 85 57 29 1 61 33 5 65 37 9 70 42 14 74 46 18 78 50 22 82 54 26 86 58 30 2 62 34 6 66 38 10 70 42 14 74 46 18 78 50 23 83 55 27 87 59 31 3 63 35 7 67 39 11 71 43 15 75 47 19 79 51 23 83 55 27 87 59 31 3 64 36 8 68 40 12 72 44 16 76 48 20 80 52 24 84 56 28 0 60 32 4 64 36 8 68 40 12 72 44 17 77 49 21 81 53 25 85 57 29 1 61 33 5 65 37 9 69 41 13 73 45 17 77 49 21 81 53 25 85 58 30 2 62 34 6 66 38 10 70 42 14 74 46 18 78 50 22 82 54 26 86 58 30 2 62 34 6 66 38 11 71 43 15 75 47 19 79 51 23 83 55 27 87 59 31 3 63 35 7 67 39 11 71 43 15 75 47 19 79 52 24 84 56 28 0 60 32 4 64 36 8 68 40 12 72 44 16 76 48 20 80 52 24 84 56 28 0 60 32 5 65 37 9 69 41 13 73 45 17 77 49 21 81 53 25 85 57 29 1 61 33 5 65 37 9 69 41 13 73 46 18 78 50 22 82 54 26 86 58 30 2 62 34 6 66 38 10 70 42 14 74 46 18 78 50 22 82 54 26 87 59 31 3 63 35 7 67 39 11 71 43 15 75 47 19 79 51 23 83 55 27 87 59 31 3 63 35 7 67 40 12 72 44 16 76 48 20 80 52 24 84 56 28 0 60 32 4 64 36 8 68 40 12 72 44 16 76 48 20 81 53 25 85 57 29 1 61 33 5 65 37 9 69 41 13 73 45 17 77 49 21 81 53 25 85 57 29 1 61 34 6 66 38 10 70 42 14 74 46 18 78 50 22 82 54 26 86 58 30 2 62 34 6 66 38 10 70 42 14 75 47 19 79 51 23 83 55 27 87 59 31 3 63 35 7 67 39 11 71 43 15 75 47 19 79 51 23 83 55 28 0 60 32 4 64 36 8 68 40 12 72 44 16 76 48 20 80 52 24 84 56 28 0 60 32 4 64 36 8 69 41 13 73 45 17 77 49 21 81 53 25 85 57 29 1 61 33 5 65 37 9 69 41 13 73 45 17 77 49 22 82 54 26 86 58 30 2 62 34 6 66 38 10 70 42 14 74 46 18 78 50 22 82 54 26 86 58 30 2 63 35 7 67 39 11 71 43 15 75 47 19 79 51 23 83 55 27 87 59 31 3 63 35 7 67 39 11 71 43 16 76 48 20 80 52 24 84 56 28 0 60 32 4 64 36 8 68 40 12 72 44 16 76 48 20 80 52 24 84 57 29 1 61 33 5 65 37 9 69 41 13 73 45 17 77 49 21 81 53 25 85 57 29 1 61 33 5 65 37 10 70 42 14 74 46 18 78 50 22 82 54 26 86 58 30 2 62 34 6 66 38 10 70 42 14 74 46 18 78 51 23 83 55 27 87 59 31 3 63 35 7 67 39 11 71 43 15 75 47 19 79 51 23 83 55 27 87 59 31 4 64 36 8 68 40 12 72 44 16 76 48 20 80 52 24 84 56 28 0 60 32 4 64 36 8 68 40 12 72 45 17 77 49 21 81 53 25 85 57 29 1 61 33 5 65 37 9 69 41 13 73 45 17 77 49 21 81 53 25