| 이전 주제 보기 :: 다음 주제 보기 |
| 글쓴이 |
메시지 |
최근준
가입: 2012년 9월 5일 올린 글: 29
|
올려짐: 2012년9월9일 14:44 주제: 숙제1 샘플 데이터 |
|
|
숙제하는 확인해보는 겸해서 만든 데이터 올릴께요.
데이터 틀린거 있으면 말해주세요.
좋은 데이터 있으면 게시판에 올려주세요 ㅠ 절대평가인데 모두 A+받아봐요 ㅠ
(저 컴공과가 아니여서 ㅠㅠ 도와주세요~)
1. (and (= (my_gcd 9956 114756) 524) (= (my_gcd 2 47234) 2) (= (my_gcd 280 30) 10) (= (my_gcd 121 99) 11) (= (my_gcd 1 2322) 1) (= (my_gcd 1258 3332) 34) (= (my_gcd 0 10) 10))
2. (and (equal? (t2 8) '(0 0 1 0 1 1 0 1 1 1 0 1 1 1 1 0 1 1 1 1 1 0 1 1 1 1 1 1 0 1 1 1 1 1 1 1 0 1 1 1 1 1 1 1 1)) (equal? (t2 -4) '(0 0 1 0 1 1 0 1 1 1 0 1 1 1 1)))
3. (and (equal? (yanghui 5) '(1 1 1 1 2 1 1 3 3 1 1 4 6 4 1)) (equal? (yanghui 0) '()) (equal? (yanghui -4) '(1 1 1 1 2 1 1 3 3 1)) (equal? (yanghui 8) '(1 1 1 1 2 1 1 3 3 1 1 4 6 4 1 1 5 10 10 5 1 1 6 15 20 15 6 1 1 7 21 35 35 21 7 1)))
4. (and (equal? (zipper '() '()) '()) (equal? (zipper '() '(1 2 3 4 5 6 7 8 9)) '(1 2 3 4 5 6 7 8 9)) (equal? (zipper '(1 2 -3 4 5 6 -7 -8 -9 -10 11 12) '()) '(1 2 -3 4 5 6 -7 -8 -9 -10 11 12)) (equal? (zipper '(1 2 3 4 5 6 7 8 9 10) '(11 12 13 14 15 16 17 18 19 20)) '(1 11 2 12 3 13 4 14 5 15 6 16 7 17 8 18 9 19 10 20)) (equal? (zipper '(1 2 3) '(4 5 6 7 8 9 10 11 12)) '(1 4 2 5 3 6 7 8 9 10 11 12)) (equal? (zipper '(1 2 3 4 5 6 7 8 9) '(10 11 12)) '(1 10 2 11 3 12 4 5 6 7 8 9)))
5. (and (equal? (zipperN '(() () () () ())) '()) (equal? (zipperN '((1 2 3 -4 -5) (9 10 11) () ())) '(1 9 2 10 3 11 -4 -5)) (equal? (zipperN '((1 2 3 4 5 6 7) (8) (9 10 11 12 13 14 15))) '(1 8 9 2 10 3 11 4 12 5 13 6 14 7 15)) (equal? (zipperN '((1 2 3 4 5) (6 7) (8 9 10 11 12 13 14 15 16) (17 18 19 20))) '(1 6 8 17 2 7 9 18 3 10 19 4 11 20 5 12 13 14 15 16)) (equal? (zipperN '((1 2 3 4) (5) () (7 8 9 10))) '(1 5 7 2 8 3 9 4 10)))
6. (and (equal? (crazy2val (cons 'p (cons 'p (cons 'p (cons 'z (cons 'n (cons 'n (cons 'n (cons 'z 'p))))))))) 151) (equal? (crazy2val (cons 'z (cons 'n (cons 'z (cons 'n (cons 'z (cons 'n (cons 'n (cons 'p (cons 'z (cons 'n (cons 'p (cons 'p (cons 'n (cons 'n (cons 'n (cons 'n (cons 'n (cons 'n (cons 'n (cons 'n (cons 'n 'p)))))))))))))))))))))) 6678) (equal? (crazy2val (cons 'p (cons 'n (cons 'z (cons 'n (cons 'n (cons 'p (cons 'p (cons 'z 'z))))))))) 71) (equal? (crazy2val (cons 'n (cons 'n (cons 'z (cons 'n (cons 'z (cons 'p (cons 'n (cons 'n (cons 'z (cons 'p (cons 'p (cons 'n (cons 'p (cons 'n (cons 'n (cons 'n (cons 'n (cons 'p (cons 'z (cons 'n (cons 'p (cons 'p (cons 'p (cons 'z (cons 'n (cons 'n (cons 'z 'z)))))))))))))))))))))))))))) -43504299) (equal? (crazy2val (cons 'n (cons 'p (cons 'p (cons 'z (cons 'z (cons 'z (cons 'z (cons 'p (cons 'n (cons 'z (cons 'p (cons 'p (cons 'p (cons 'p (cons 'z (cons 'n (cons 'z (cons 'n (cons 'n 'p)))))))))))))))))))) 113541) (equal? (crazy2val (cons 'p (cons 'n (cons 'p (cons 'p (cons 'n (cons 'n (cons 'p (cons 'p (cons 'z (cons 'z (cons 'n (cons 'n (cons 'z (cons 'p (cons 'p (cons 'p (cons 'n (cons 'n (cons 'p (cons 'p (cons 'z (cons 'n (cons 'z (cons 'z (cons 'p (cons 'z (cons 'p (cons 'z 'p))))))))))))))))))))))))))))) 350868635) (equal? (crazy2val (cons 'n (cons 'p (cons 'z (cons 'p (cons 'n (cons 'p (cons 'n (cons 'p (cons 'z (cons 'z (cons 'n (cons 'n (cons 'p (cons 'n (cons 'z (cons 'n (cons 'n (cons 'p (cons 'p (cons 'z (cons 'n (cons 'z (cons 'z (cons 'n 'n))))))))))))))))))))))))) -25926567) (equal? (crazy2val (cons 'n (cons 'p (cons 'z (cons 'p (cons 'n (cons 'z (cons 'z (cons 'n (cons 'n (cons 'n (cons 'p (cons 'n (cons 'n (cons 'z 'p))))))))))))))) 10361) (equal? (crazy2val (cons 'p (cons 'n (cons 'p (cons 'n (cons 'p (cons 'n (cons 'z (cons 'z (cons 'n (cons 'n (cons 'p (cons 'z (cons 'n (cons 'z (cons 'p 'p)))))))))))))))) 45291) (equal? (crazy2val (cons 'n (cons 'n (cons 'p (cons 'n (cons 'n (cons 'n (cons 'p (cons 'z 'n))))))))) -247) (equal? (crazy2val (cons 'n (cons 'n (cons 'n (cons 'p (cons 'z (cons 'n (cons 'n (cons 'z (cons 'p 'z)))))))))) 161) (equal? (crazy2val (cons 'n (cons 'p (cons 'n (cons 'z (cons 'p (cons 'n (cons 'z (cons 'z (cons 'n (cons 'z (cons 'z (cons 'z (cons 'p (cons 'p (cons 'n (cons 'p (cons 'p (cons 'n (cons 'p (cons 'p (cons 'z (cons 'p (cons 'z (cons 'n 'n))))))))))))))))))))))))) -22319379) (equal? (crazy2val (cons 'z (cons 'n (cons 'p (cons 'p (cons 'p (cons 'p (cons 'z (cons 'n (cons 'n (cons 'z (cons 'z (cons 'n (cons 'p (cons 'z (cons 'n 'n)))))))))))))))) -47430) (equal? (crazy2val (cons 'n (cons 'n (cons 'p (cons 'p (cons 'p (cons 'p (cons 'n (cons 'z (cons 'n (cons 'p (cons 'p (cons 'z (cons 'p (cons 'n (cons 'n 'n)))))))))))))))) -51975) (equal? (crazy2val (cons 'n (cons 'n (cons 'n (cons 'n (cons 'p (cons 'n (cons 'n (cons 'n (cons 'n 'p)))))))))) 33) (equal? (crazy2val (cons 'z (cons 'z (cons 'n (cons 'n (cons 'n (cons 'n (cons 'z 'n)))))))) -188) (equal? (crazy2val (cons 'z (cons 'n (cons 'n (cons 'p (cons 'p (cons 'z (cons 'z (cons 'p (cons 'n (cons 'z (cons 'n (cons 'p (cons 'p (cons 'n (cons 'z (cons 'n 'z))))))))))))))))) -35950) (equal? (crazy2val (cons 'p (cons 'p (cons 'z (cons 'z (cons 'z (cons 'p (cons 'p (cons 'z (cons 'p (cons 'n (cons 'n (cons 'p (cons 'p (cons 'n 'n))))))))))))))) -19613) (equal? (crazy2val (cons 'p (cons 'z (cons 'z (cons 'p (cons 'z (cons 'n (cons 'z (cons 'p (cons 'n (cons 'p (cons 'p 'n)))))))))))) -663) (equal? (crazy2val (cons 'z (cons 'n (cons 'n (cons 'n (cons 'z (cons 'p (cons 'p (cons 'n (cons 'n (cons 'p (cons 'n (cons 'z (cons 'p (cons 'z (cons 'n (cons 'n (cons 'p (cons 'n (cons 'n (cons 'z (cons 'n (cons 'n (cons 'p (cons 'z (cons 'z (cons 'p (cons 'p (cons 'z (cons 'z 'n)))))))))))))))))))))))))))))) -435532590) (equal? (crazy2val (cons 'n (cons 'n (cons 'p (cons 'n (cons 'n (cons 'n (cons 'z (cons 'p (cons 'p (cons 'z (cons 'p (cons 'z (cons 'p (cons 'z (cons 'n (cons 'z (cons 'z (cons 'p (cons 'z (cons 'z (cons 'p (cons 'n (cons 'z (cons 'z (cons 'p 'n)))))))))))))))))))))))))) -17705655) (equal? (crazy2val (cons 'n (cons 'z (cons 'n (cons 'z (cons 'p (cons 'n (cons 'z (cons 'p (cons 'z (cons 'z (cons 'z (cons 'n (cons 'p (cons 'z (cons 'n (cons 'p (cons 'n (cons 'n (cons 'z (cons 'z (cons 'p (cons 'p (cons 'n 'p)))))))))))))))))))))))) 7161963) (equal? (crazy2val (cons 'z (cons 'n (cons 'n (cons 'p (cons 'n (cons 'z (cons 'n (cons 'p (cons 'z (cons 'p (cons 'p (cons 'p (cons 'z (cons 'z (cons 'p (cons 'p (cons 'z (cons 'z (cons 'p (cons 'z (cons 'p (cons 'z (cons 'z (cons 'p (cons 'p (cons 'p (cons 'z 'z)))))))))))))))))))))))))))) 60083762) (equal? (crazy2val (cons 'n 'p)) 1) (equal? (crazy2val (cons 'p (cons 'p (cons 'n (cons 'z (cons 'n (cons 'p (cons 'z (cons 'p (cons 'p 'z)))))))))) 399) (equal? (crazy2val (cons 'n (cons 'p (cons 'n (cons 'p (cons 'p (cons 'n (cons 'p (cons 'z (cons 'n (cons 'n (cons 'p (cons 'z (cons 'p (cons 'n (cons 'p (cons 'z 'n))))))))))))))))) -52939) (equal? (crazy2val (cons 'n (cons 'z (cons 'n (cons 'p (cons 'n (cons 'p 'n))))))) -45) (equal? (crazy2val (cons 'n (cons 'n (cons 'p (cons 'n (cons 'n (cons 'z (cons 'z (cons 'z (cons 'n (cons 'n 'n))))))))))) -1815) (equal? (crazy2val (cons 'n (cons 'p (cons 'n (cons 'z (cons 'n (cons 'n (cons 'z (cons 'p (cons 'n (cons 'p 'p))))))))))) 1357) (equal? (crazy2val (cons 'p (cons 'n (cons 'p (cons 'n (cons 'p (cons 'n (cons 'p (cons 'n (cons 'n (cons 'z (cons 'n (cons 'z (cons 'z (cons 'z (cons 'p (cons 'n (cons 'z 'z)))))))))))))))))) -17749) (equal? (crazy2val (cons 'p (cons 'p (cons 'p (cons 'z (cons 'z (cons 'p 'p))))))) 103) (equal? (crazy2val (cons 'p (cons 'p (cons 'n (cons 'z (cons 'n (cons 'z (cons 'z (cons 'z (cons 'p (cons 'p (cons 'n (cons 'n (cons 'n (cons 'n (cons 'z 'p)))))))))))))))) 18159) (equal? (crazy2val (cons 'p (cons 'z (cons 'n (cons 'z (cons 'p (cons 'n (cons 'n (cons 'z (cons 'z (cons 'n (cons 'p 'n)))))))))))) -1619) (equal? (crazy2val (cons 'p (cons 'n (cons 'n (cons 'n (cons 'p (cons 'p (cons 'z (cons 'n (cons 'p (cons 'z (cons 'p (cons 'n (cons 'z (cons 'p (cons 'n (cons 'n (cons 'n (cons 'z 'p))))))))))))))))))) 154787) (equal? (crazy2val (cons 'p (cons 'z (cons 'z (cons 'z (cons 'n (cons 'n (cons 'n (cons 'n (cons 'z (cons 'z (cons 'p (cons 'p (cons 'n (cons 'p (cons 'z (cons 'p (cons 'n (cons 'n (cons 'p (cons 'p (cons 'p (cons 'p (cons 'n 'n)))))))))))))))))))))))) -8807663) (equal? (crazy2val (cons 'z (cons 'n (cons 'p (cons 'n (cons 'p (cons 'z 'n))))))) -54) (equal? (crazy2val (cons 'p (cons 'n (cons 'z (cons 'n (cons 'n (cons 'n (cons 'p 'n)))))))) -121) (equal? (crazy2val (cons 'z (cons 'z (cons 'p (cons 'n (cons 'n (cons 'p (cons 'z 'z)))))))) 12) (equal? (crazy2val (cons 'n (cons 'p (cons 'z (cons 'n (cons 'p (cons 'p (cons 'z (cons 'z (cons 'n (cons 'p 'p))))))))))) 1321) (equal? (crazy2val (cons 'n (cons 'n (cons 'n (cons 'p (cons 'p (cons 'n (cons 'n (cons 'p (cons 'p (cons 'p (cons 'z (cons 'p (cons 'z (cons 'n 'n))))))))))))))) -21711) (equal? (crazy2val (cons 'z (cons 'n (cons 'z (cons 'n (cons 'n (cons 'n (cons 'z 'n)))))))) -186) (equal? (crazy2val (cons 'p (cons 'n (cons 'p (cons 'n (cons 'n (cons 'p (cons 'z (cons 'n 'n))))))))) -373) (equal? (crazy2val (cons 'z (cons 'n (cons 'p (cons 'p (cons 'z (cons 'p (cons 'p (cons 'n (cons 'n (cons 'z (cons 'z (cons 'p (cons 'n (cons 'z (cons 'p (cons 'z (cons 'n (cons 'z (cons 'p (cons 'p (cons 'z (cons 'z (cons 'p 'p)))))))))))))))))))))))) 13317866) (equal? (crazy2val (cons 'p (cons 'p (cons 'z (cons 'p (cons 'n (cons 'p (cons 'p (cons 'p (cons 'n (cons 'p (cons 'n (cons 'n (cons 'n (cons 'z (cons 'z (cons 'z (cons 'n (cons 'n (cons 'n (cons 'z (cons 'n (cons 'n (cons 'z 'z)))))))))))))))))))))))) -3611173) (equal? (crazy2val (cons 'n (cons 'p (cons 'p (cons 'p (cons 'z (cons 'p (cons 'n (cons 'z (cons 'p (cons 'n (cons 'z (cons 'p (cons 'z (cons 'z (cons 'n (cons 'z (cons 'p (cons 'z (cons 'n (cons 'p (cons 'n (cons 'p (cons 'n (cons 'p 'z))))))))))))))))))))))))) 5555949) (equal? (crazy2val (cons 'p (cons 'n (cons 'n (cons 'p (cons 'n (cons 'n (cons 'p (cons 'n (cons 'n (cons 'n (cons 'n 'n)))))))))))) -3949) (equal? (crazy2val (cons 'z (cons 'p (cons 'z (cons 'n (cons 'p (cons 'p (cons 'n (cons 'z (cons 'p (cons 'z (cons 'z (cons 'n (cons 'n (cons 'n (cons 'p (cons 'n (cons 'p (cons 'p (cons 'p (cons 'n (cons 'p (cons 'z (cons 'z (cons 'p (cons 'n (cons 'p (cons 'n (cons 'z (cons 'z 'n)))))))))))))))))))))))))))))) -577861398) (equal? (crazy2val (cons 'p (cons 'p (cons 'p (cons 'p (cons 'z (cons 'z (cons 'n (cons 'z (cons 'z (cons 'z (cons 'n (cons 'n (cons 'p 'p)))))))))))))) 9167) (equal? (crazy2val (cons 'z (cons 'n (cons 'n (cons 'p (cons 'p (cons 'p (cons 'z 'n)))))))) -78) (equal? (crazy2val (cons 'p (cons 'n (cons 'n (cons 'p (cons 'p (cons 'z (cons 'z (cons 'p (cons 'z (cons 'z (cons 'p (cons 'n (cons 'n (cons 'p (cons 'n (cons 'z (cons 'p (cons 'z (cons 'z (cons 'n (cons 'p (cons 'z (cons 'n (cons 'z (cons 'n (cons 'p 'p))))))))))))))))))))))))))) 80268435) (equal? (crazy2val (cons 'n (cons 'n (cons 'n (cons 'z (cons 'n (cons 'z (cons 'n (cons 'n (cons 'z (cons 'n (cons 'n (cons 'p (cons 'z (cons 'p (cons 'z (cons 'z (cons 'z (cons 'n 'n))))))))))))))))))) -384727) (equal? (crazy2val (cons 'n (cons 'z (cons 'p (cons 'n (cons 'z (cons 'n (cons 'p (cons 'p (cons 'p (cons 'p (cons 'n (cons 'z (cons 'p (cons 'z (cons 'z (cons 'p (cons 'z (cons 'n (cons 'z (cons 'z (cons 'z (cons 'p (cons 'z (cons 'n 'z))))))))))))))))))))))))) -6385765) (equal? (crazy2val (cons 'z 'z)) 0) (equal? (crazy2val (cons 'z (cons 'p (cons 'n (cons 'n (cons 'z (cons 'p (cons 'p (cons 'p (cons 'n (cons 'p (cons 'z (cons 'p (cons 'p (cons 'n (cons 'n (cons 'p (cons 'z (cons 'p (cons 'z 'p)))))))))))))))))))) 670166) (equal? (crazy2val (cons 'p (cons 'p (cons 'z (cons 'n (cons 'z (cons 'z (cons 'z (cons 'p (cons 'z (cons 'z (cons 'p (cons 'n (cons 'p (cons 'p (cons 'p 'z)))))))))))))))) 27771) (equal? (crazy2val (cons 'n (cons 'z (cons 'n (cons 'n (cons 'z (cons 'p (cons 'p (cons 'n 'n))))))))) -301) (equal? (crazy2val (cons 'n (cons 'p (cons 'n (cons 'n (cons 'z (cons 'p (cons 'p (cons 'z (cons 'p (cons 'z (cons 'n (cons 'z 'p))))))))))))) 3413) (equal? (crazy2val (cons 'n (cons 'p (cons 'n (cons 'z (cons 'n (cons 'p (cons 'z (cons 'p (cons 'n (cons 'n (cons 'n (cons 'p (cons 'n (cons 'n (cons 'p (cons 'z (cons 'z (cons 'n (cons 'z (cons 'z (cons 'z 'p)))))))))))))))))))))) 1970573) (equal? (crazy2val (cons 'n (cons 'n (cons 'n (cons 'n (cons 'n (cons 'z (cons 'z (cons 'p (cons 'n (cons 'p (cons 'z (cons 'z (cons 'z (cons 'z (cons 'p (cons 'z (cons 'n (cons 'p (cons 'p (cons 'p (cons 'z (cons 'n (cons 'z (cons 'p (cons 'z (cons 'n 'p))))))))))))))))))))))))))) 40714593) (equal? (crazy2val (cons 'p (cons 'z (cons 'p (cons 'p (cons 'z (cons 'p (cons 'p (cons 'n (cons 'p (cons 'p (cons 'z (cons 'p (cons 'n (cons 'z (cons 'z 'p)))))))))))))))) 31469))
7. (define (checker ..) ...) <- 6번 문제 crazy2val을 checker로 바꿔서 여기 넣어주세요
(and (= (checker (crazy2add (cons 'z (cons 'z (cons 'p (cons 'n (cons 'n (cons 'p (cons 'p (cons 'n (cons 'p (cons 'p (cons 'z (cons 'z (cons 'z (cons 'z (cons 'z (cons 'z (cons 'n (cons 'p (cons 'p (cons 'z (cons 'n (cons 'p (cons 'p (cons 'z (cons 'n 'n))))))))))))))))))))))))) (cons 'n (cons 'n (cons 'p (cons 'z (cons 'n (cons 'p (cons 'p (cons 'p (cons 'p (cons 'p (cons 'p (cons 'p (cons 'n (cons 'z (cons 'n (cons 'p (cons 'p (cons 'n (cons 'p (cons 'n (cons 'z (cons 'z (cons 'p (cons 'z 'z)))))))))))))))))))))))))) -40877411) (= (checker (crazy2add (cons 'z (cons 'p (cons 'z (cons 'p (cons 'n (cons 'z (cons 'p (cons 'p 'z)))))))) (cons 'p (cons 'p (cons 'p (cons 'p (cons 'n (cons 'n (cons 'n (cons 'p (cons 'n (cons 'p (cons 'p (cons 'n (cons 'n (cons 'n (cons 'n (cons 'n (cons 'p 'p))))))))))))))))))) 134617) (= (checker (crazy2add (cons 'p (cons 'p (cons 'z (cons 'p (cons 'z (cons 'z (cons 'z (cons 'z (cons 'n (cons 'z (cons 'p (cons 'n (cons 'n (cons 'p (cons 'n (cons 'p 'p)))))))))))))))) (cons 'p (cons 'n (cons 'n 'n))))) 84734) (= (checker (crazy2add (cons 'p (cons 'z (cons 'z (cons 'n (cons 'n (cons 'n (cons 'z 'n))))))) (cons 'p (cons 'z (cons 'n (cons 'p (cons 'p (cons 'p (cons 'p (cons 'z (cons 'p (cons 'p (cons 'z (cons 'p (cons 'z (cons 'p (cons 'z (cons 'p (cons 'p (cons 'z (cons 'n (cons 'p (cons 'n (cons 'n (cons 'p (cons 'z (cons 'n (cons 'p (cons 'n (cons 'p 'n)))))))))))))))))))))))))))))) -183129410) (= (checker (crazy2add (cons 'p (cons 'p (cons 'n (cons 'n (cons 'p (cons 'z (cons 'n (cons 'n (cons 'p (cons 'z (cons 'n (cons 'n (cons 'p (cons 'p (cons 'p 'z))))))))))))))) (cons 'n (cons 'z (cons 'p (cons 'n (cons 'z (cons 'n (cons 'z (cons 'z 'p)))))))))) 25890) (= (checker (crazy2add (cons 'n (cons 'p (cons 'p (cons 'z (cons 'p (cons 'p (cons 'n (cons 'p (cons 'z (cons 'z (cons 'z (cons 'p (cons 'p (cons 'z (cons 'p (cons 'p 'n)))))))))))))))) (cons 'z 'z))) -10123) (= (checker (crazy2add (cons 'n (cons 'z (cons 'p (cons 'z (cons 'z (cons 'z (cons 'p 'p))))))) (cons 'z (cons 'z (cons 'p (cons 'p (cons 'n (cons 'n (cons 'n (cons 'p (cons 'z (cons 'n (cons 'z (cons 'p (cons 'n (cons 'n (cons 'p (cons 'z (cons 'z (cons 'z (cons 'p 'n))))))))))))))))))))) -256289) (= (checker (crazy2add (cons 'p (cons 'z (cons 'z (cons 'z (cons 'n (cons 'z (cons 'z (cons 'n (cons 'p (cons 'n (cons 'p (cons 'z (cons 'n (cons 'z (cons 'n (cons 'p (cons 'n (cons 'p 'n)))))))))))))))))) (cons 'z (cons 'n (cons 'n (cons 'n (cons 'z (cons 'n (cons 'z (cons 'p (cons 'n (cons 'p (cons 'p (cons 'p (cons 'n (cons 'z (cons 'n 'p))))))))))))))))) -167997) (= (checker (crazy2add (cons 'z (cons 'z (cons 'n (cons 'n (cons 'z (cons 'n (cons 'z (cons 'z (cons 'n (cons 'p (cons 'z (cons 'p (cons 'p (cons 'p (cons 'p 'n))))))))))))))) (cons 'n (cons 'p (cons 'n (cons 'z (cons 'p (cons 'z (cons 'p (cons 'p (cons 'n (cons 'p (cons 'p (cons 'p (cons 'z (cons 'n 'z)))))))))))))))) -6495) (= (checker (crazy2add (cons 'n (cons 'p 'n)) (cons 'p (cons 'p (cons 'n (cons 'n (cons 'n (cons 'p (cons 'p (cons 'p 'z)))))))))) 196) (= (checker (crazy2add (cons 'z (cons 'p (cons 'n (cons 'p (cons 'z (cons 'p (cons 'n (cons 'z (cons 'p (cons 'n (cons 'z (cons 'n (cons 'z (cons 'n (cons 'z 'n))))))))))))))) (cons 'z (cons 'z (cons 'p (cons 'n (cons 'z (cons 'n (cons 'z (cons 'z (cons 'p (cons 'p (cons 'p (cons 'n (cons 'n 'z))))))))))))))) -47678) (= (checker (crazy2add (cons 'z (cons 'p (cons 'z (cons 'p (cons 'p (cons 'p (cons 'p (cons 'z 'p)))))))) (cons 'z (cons 'p (cons 'n (cons 'p (cons 'p (cons 'z (cons 'z (cons 'p (cons 'z (cons 'n (cons 'n (cons 'n (cons 'p (cons 'z (cons 'p (cons 'n (cons 'z (cons 'n (cons 'n (cons 'n (cons 'p (cons 'z (cons 'p (cons 'p (cons 'n (cons 'z 'n)))))))))))))))))))))))))))) -71187440) (= (checker (crazy2add (cons 'z (cons 'p (cons 'z 'z))) (cons 'z (cons 'z (cons 'n (cons 'p (cons 'z (cons 'n (cons 'n 'n))))))))) -218) (= (checker (crazy2add (cons 'z (cons 'p (cons 'n (cons 'n (cons 'p (cons 'p (cons 'n (cons 'n (cons 'z (cons 'p (cons 'n 'z))))))))))) 'p)) -665) (= (checker (crazy2add (cons 'p (cons 'p (cons 'z (cons 'z (cons 'n (cons 'p 'n)))))) (cons 'p (cons 'z (cons 'n (cons 'p (cons 'z (cons 'n 'p)))))))) -8) (= (checker (crazy2add (cons 'z 'z) (cons 'p (cons 'n (cons 'n (cons 'z (cons 'n (cons 'z (cons 'z (cons 'p (cons 'z (cons 'n (cons 'z (cons 'z (cons 'z (cons 'p (cons 'n (cons 'n (cons 'p 'z))))))))))))))))))) 24171) (= (checker (crazy2add (cons 'p (cons 'p 'p)) 'n)) 6) (= (checker (crazy2add (cons 'z 'z) (cons 'p (cons 'z (cons 'p (cons 'n (cons 'p (cons 'p (cons 'z (cons 'p (cons 'n (cons 'z (cons 'z (cons 'n (cons 'n (cons 'n (cons 'z (cons 'z (cons 'z (cons 'z (cons 'n (cons 'z (cons 'n (cons 'n (cons 'z (cons 'z 'n)))))))))))))))))))))))))) -20199507) (= (checker (crazy2add (cons 'n (cons 'z (cons 'n (cons 'p (cons 'p (cons 'p (cons 'p (cons 'n (cons 'z (cons 'n (cons 'p (cons 'p (cons 'n (cons 'z (cons 'n (cons 'n (cons 'p (cons 'z (cons 'n (cons 'z (cons 'n 'p))))))))))))))))))))) (cons 'p (cons 'p (cons 'z (cons 'z (cons 'z (cons 'z (cons 'n (cons 'p (cons 'z (cons 'z 'z)))))))))))) 801334) (= (checker (crazy2add (cons 'p (cons 'n (cons 'p (cons 'n (cons 'p (cons 'z (cons 'z (cons 'p (cons 'p (cons 'p 'z)))))))))) (cons 'n (cons 'p (cons 'z (cons 'z (cons 'z (cons 'z (cons 'z (cons 'z (cons 'z (cons 'n (cons 'n (cons 'z (cons 'p (cons 'p (cons 'p (cons 'n (cons 'n (cons 'p 'p)))))))))))))))))))) 322956) (= (checker (crazy2add 'p (cons 'p (cons 'z (cons 'z (cons 'n (cons 'z (cons 'p (cons 'n 'p))))))))) 90) (= (checker (crazy2add (cons 'p (cons 'z (cons 'z 'p))) (cons 'z (cons 'z (cons 'n (cons 'n (cons 'z (cons 'p (cons 'z (cons 'n (cons 'p (cons 'n (cons 'n (cons 'n (cons 'p (cons 'p (cons 'p (cons 'n 'n)))))))))))))))))) -73059) (= (checker (crazy2add (cons 'p 'p) (cons 'z (cons 'n (cons 'p (cons 'n (cons 'z (cons 'p (cons 'z (cons 'n (cons 'n (cons 'z (cons 'n (cons 'n (cons 'n (cons 'p (cons 'n (cons 'z (cons 'n (cons 'p (cons 'z (cons 'p (cons 'p (cons 'z (cons 'n (cons 'n (cons 'z 'p))))))))))))))))))))))))))) 22594205) (= (checker (crazy2add (cons 'n (cons 'z (cons 'n (cons 'p (cons 'n (cons 'n (cons 'n (cons 'z (cons 'z (cons 'z (cons 'n (cons 'n (cons 'p (cons 'n (cons 'z (cons 'n (cons 'p (cons 'p (cons 'p (cons 'z (cons 'p (cons 'z (cons 'z (cons 'p (cons 'n (cons 'p (cons 'z (cons 'z 'n)))))))))))))))))))))))))))) (cons 'z (cons 'z (cons 'p (cons 'n (cons 'p (cons 'z (cons 'n (cons 'n (cons 'n (cons 'p (cons 'z (cons 'p (cons 'p (cons 'n (cons 'p (cons 'p (cons 'p (cons 'n (cons 'z (cons 'z 'p)))))))))))))))))))))) -240772129) (= (checker (crazy2add (cons 'n (cons 'p (cons 'p (cons 'z (cons 'z (cons 'n (cons 'z (cons 'n (cons 'z (cons 'n (cons 'p (cons 'z (cons 'p 'z))))))))))))) (cons 'n (cons 'n (cons 'z (cons 'n (cons 'n (cons 'p (cons 'z (cons 'z (cons 'n (cons 'z (cons 'p (cons 'z (cons 'n (cons 'n (cons 'z (cons 'p (cons 'n (cons 'p (cons 'n (cons 'p (cons 'p (cons 'n (cons 'n 'n))))))))))))))))))))))))) -13278102) (= (checker (crazy2add (cons 'n (cons 'p (cons 'n (cons 'p (cons 'p (cons 'n (cons 'p (cons 'z 'n)))))))) (cons 'z (cons 'z (cons 'n (cons 'n (cons 'z (cons 'n (cons 'n 'p))))))))) -183) (= (checker (crazy2add (cons 'n (cons 'p (cons 'n (cons 'z (cons 'p (cons 'p (cons 'n (cons 'p 'z)))))))) (cons 'n (cons 'z (cons 'n (cons 'z (cons 'z (cons 'z (cons 'p (cons 'n (cons 'p (cons 'z (cons 'p (cons 'z (cons 'p (cons 'p (cons 'p (cons 'z (cons 'z (cons 'n (cons 'p 'z))))))))))))))))))))) 161064) (= (checker (crazy2add (cons 'z (cons 'z (cons 'z (cons 'z (cons 'p (cons 'n (cons 'z (cons 'z (cons 'z (cons 'n (cons 'p (cons 'z (cons 'p (cons 'p (cons 'p (cons 'n (cons 'z (cons 'z (cons 'z (cons 'z (cons 'p (cons 'n (cons 'z (cons 'n (cons 'z (cons 'n (cons 'p (cons 'p (cons 'z 'n))))))))))))))))))))))))))))) (cons 'p (cons 'n (cons 'n (cons 'n (cons 'n (cons 'n (cons 'z (cons 'z (cons 'n 'p))))))))))) -378539341) (= (checker (crazy2add (cons 'p (cons 'p (cons 'n (cons 'z (cons 'z (cons 'n (cons 'p (cons 'z (cons 'p (cons 'z (cons 'n (cons 'p (cons 'z (cons 'p (cons 'p 'z))))))))))))))) (cons 'p (cons 'p (cons 'n (cons 'p (cons 'n (cons 'n (cons 'z (cons 'p (cons 'z (cons 'n (cons 'p (cons 'n (cons 'z (cons 'z (cons 'n (cons 'n (cons 'n (cons 'z (cons 'p (cons 'z (cons 'p 'z))))))))))))))))))))))) 1220470) (= (checker (crazy2add (cons 'z (cons 'z (cons 'z (cons 'p (cons 'p (cons 'z (cons 'p (cons 'z (cons 'p (cons 'p (cons 'n (cons 'z (cons 'p (cons 'p (cons 'n (cons 'n (cons 'n (cons 'p (cons 'z (cons 'n (cons 'n (cons 'n (cons 'z (cons 'p (cons 'z (cons 'p (cons 'n 'z))))))))))))))))))))))))))) (cons 'z (cons 'p (cons 'z (cons 'p (cons 'p (cons 'z (cons 'z (cons 'n (cons 'p (cons 'n (cons 'n (cons 'z 'n)))))))))))))) -28812814) (= (checker (crazy2add (cons 'n (cons 'z (cons 'n (cons 'p (cons 'p (cons 'n (cons 'z (cons 'z (cons 'z (cons 'p (cons 'n (cons 'n (cons 'p (cons 'n (cons 'z (cons 'z (cons 'p (cons 'n (cons 'n (cons 'z (cons 'z (cons 'p (cons 'z (cons 'n (cons 'z 'p))))))))))))))))))))))))) (cons 'z (cons 'p (cons 'n (cons 'n (cons 'z (cons 'n (cons 'z (cons 'p (cons 'n (cons 'p (cons 'n (cons 'z (cons 'z (cons 'n (cons 'n (cons 'n (cons 'z (cons 'z (cons 'z (cons 'z (cons 'n (cons 'p (cons 'p (cons 'p (cons 'n 'z))))))))))))))))))))))))))) 23724873) (= (checker (crazy2add (cons 'p (cons 'p (cons 'n (cons 'z (cons 'z (cons 'n (cons 'p (cons 'p (cons 'z (cons 'n (cons 'z (cons 'z (cons 'p (cons 'n (cons 'n 'p))))))))))))))) (cons 'z (cons 'n (cons 'z (cons 'n 'p)))))) 11941) (= (checker (crazy2add (cons 'p (cons 'p (cons 'z (cons 'z (cons 'p (cons 'p 'z)))))) (cons 'p (cons 'z (cons 'p (cons 'p (cons 'z (cons 'n (cons 'z (cons 'n (cons 'n (cons 'p (cons 'n (cons 'n (cons 'n (cons 'p (cons 'n (cons 'p (cons 'z (cons 'n 'n)))))))))))))))))))) -375648) (= (checker (crazy2add (cons 'n (cons 'p (cons 'n (cons 'p (cons 'p (cons 'n 'z)))))) (cons 'z (cons 'z (cons 'p (cons 'n (cons 'z (cons 'z (cons 'p (cons 'z 'z)))))))))) 49) (= (checker (crazy2add (cons 'z (cons 'p (cons 'z (cons 'n (cons 'z (cons 'p (cons 'p (cons 'p (cons 'p (cons 'n 'z)))))))))) (cons 'z (cons 'z (cons 'p (cons 'p (cons 'z (cons 'n (cons 'z (cons 'z (cons 'z (cons 'z (cons 'n (cons 'z (cons 'z (cons 'z 'p)))))))))))))))) 15302) (= (checker (crazy2add (cons 'p 'n) (cons 'p (cons 'p (cons 'p (cons 'p (cons 'p (cons 'z (cons 'z (cons 'n (cons 'p (cons 'z (cons 'p (cons 'z (cons 'z (cons 'n (cons 'p (cons 'z (cons 'p (cons 'n (cons 'z (cons 'z (cons 'p (cons 'n (cons 'z 'z))))))))))))))))))))))))) -1104738) (= (checker (crazy2add (cons 'n (cons 'z (cons 'p (cons 'p (cons 'p (cons 'n (cons 'p (cons 'p (cons 'p (cons 'n (cons 'n (cons 'z (cons 'n (cons 'p (cons 'p (cons 'p (cons 'z (cons 'z (cons 'p (cons 'z (cons 'z (cons 'z (cons 'n (cons 'n (cons 'z (cons 'z 'p)))))))))))))))))))))))))) (cons 'z (cons 'p (cons 'z (cons 'n (cons 'z (cons 'z (cons 'z (cons 'n (cons 'p (cons 'p (cons 'p (cons 'n (cons 'n (cons 'p (cons 'z (cons 'z (cons 'p (cons 'n 'n)))))))))))))))))))) 54516277) (= (checker (crazy2add (cons 'z (cons 'n (cons 'p (cons 'p (cons 'p (cons 'p (cons 'n (cons 'n (cons 'p (cons 'z (cons 'z (cons 'z (cons 'n (cons 'p (cons 'n (cons 'n (cons 'z (cons 'n (cons 'z (cons 'z 'z)))))))))))))))))))) (cons 'z (cons 'z (cons 'p (cons 'n (cons 'n (cons 'p (cons 'n (cons 'p (cons 'z (cons 'p (cons 'z (cons 'p (cons 'z (cons 'n (cons 'p (cons 'z (cons 'p (cons 'p (cons 'z (cons 'z (cons 'p (cons 'p (cons 'n (cons 'p (cons 'p (cons 'p (cons 'n (cons 'z (cons 'n 'z))))))))))))))))))))))))))))))) -277841210) (= (checker (crazy2add (cons 'p (cons 'p (cons 'z (cons 'p (cons 'n (cons 'p (cons 'z (cons 'z (cons 'n (cons 'n (cons 'n (cons 'z (cons 'n (cons 'n 'n)))))))))))))) (cons 'z (cons 'p (cons 'n 'z))))) -30439) (= (checker (crazy2add (cons 'p (cons 'p (cons 'z (cons 'n 'z)))) (cons 'z (cons 'p (cons 'n (cons 'p (cons 'p (cons 'p (cons 'p (cons 'n (cons 'z (cons 'z (cons 'p (cons 'p (cons 'z (cons 'p (cons 'z (cons 'n (cons 'z (cons 'n (cons 'z (cons 'n (cons 'n (cons 'p (cons 'z (cons 'z 'n)))))))))))))))))))))))))) -16405519) (= (checker (crazy2add (cons 'z (cons 'p (cons 'n (cons 'n (cons 'p (cons 'z (cons 'n 'n))))))) (cons 'z (cons 'z (cons 'n (cons 'z (cons 'p (cons 'z (cons 'z (cons 'z (cons 'z (cons 'z (cons 'z (cons 'z (cons 'n (cons 'p (cons 'p (cons 'p (cons 'z (cons 'n (cons 'p (cons 'p (cons 'p (cons 'p (cons 'n 'n))))))))))))))))))))))))) -8728750) (= (checker (crazy2add (cons 'n (cons 'z (cons 'z (cons 'z (cons 'p (cons 'n 'p)))))) (cons 'p (cons 'p (cons 'p (cons 'p (cons 'n (cons 'p (cons 'p (cons 'n (cons 'z (cons 'n 'p)))))))))))) 526) (= (checker (crazy2add (cons 'p (cons 'n (cons 'p (cons 'p (cons 'n (cons 'n (cons 'n (cons 'z (cons 'n (cons 'n (cons 'z (cons 'z (cons 'z (cons 'z (cons 'n (cons 'n (cons 'p (cons 'p (cons 'z 'p))))))))))))))))))) (cons 'n (cons 'p (cons 'z (cons 'z (cons 'n (cons 'n (cons 'z (cons 'p (cons 'n (cons 'z (cons 'z (cons 'z (cons 'z (cons 'z (cons 'n (cons 'z (cons 'n (cons 'p (cons 'z 'p))))))))))))))))))))) 1244140) (= (checker (crazy2add (cons 'n (cons 'p (cons 'z (cons 'z (cons 'n (cons 'p (cons 'z (cons 'z (cons 'n (cons 'z (cons 'p (cons 'p (cons 'n (cons 'n (cons 'p (cons 'n (cons 'n (cons 'n (cons 'z (cons 'p (cons 'n (cons 'n (cons 'p (cons 'n (cons 'p 'n))))))))))))))))))))))))) (cons 'z (cons 'n (cons 'p 'p))))) -23815397) (= (checker (crazy2add (cons 'p (cons 'n (cons 'p (cons 'p (cons 'p (cons 'p (cons 'z (cons 'z (cons 'z (cons 'n (cons 'p (cons 'z (cons 'z (cons 'p (cons 'n (cons 'z (cons 'p (cons 'n (cons 'z (cons 'p (cons 'n (cons 'p (cons 'p (cons 'p (cons 'n (cons 'p (cons 'n (cons 'p 'n)))))))))))))))))))))))))))) (cons 'z (cons 'n (cons 'z (cons 'n (cons 'n (cons 'n (cons 'p (cons 'n (cons 'z (cons 'p (cons 'p (cons 'p (cons 'z (cons 'n (cons 'z (cons 'z (cons 'n (cons 'n (cons 'n 'z))))))))))))))))))))) -170930239) (= (checker (crazy2add (cons 'z (cons 'p (cons 'z (cons 'z (cons 'p (cons 'z (cons 'z (cons 'z (cons 'z (cons 'n (cons 'p (cons 'n (cons 'z (cons 'p (cons 'p (cons 'p (cons 'z (cons 'z (cons 'n (cons 'p 'z)))))))))))))))))))) 'n)) 317969) (= (checker (crazy2add (cons 'z (cons 'p (cons 'p (cons 'z (cons 'p (cons 'n (cons 'z (cons 'p (cons 'p (cons 'p (cons 'z (cons 'p (cons 'n (cons 'z (cons 'p (cons 'z (cons 'n (cons 'z (cons 'z (cons 'z (cons 'z (cons 'z (cons 'p 'n))))))))))))))))))))))) (cons 'z (cons 'z (cons 'n (cons 'z (cons 'n (cons 'p (cons 'z (cons 'n (cons 'z (cons 'p (cons 'p (cons 'p (cons 'n (cons 'n (cons 'n (cons 'n (cons 'n (cons 'z (cons 'p 'z))))))))))))))))))))) -4105982) (= (checker (crazy2add (cons 'p (cons 'n (cons 'p (cons 'p (cons 'n (cons 'z (cons 'p (cons 'z (cons 'n (cons 'z (cons 'p (cons 'z (cons 'p (cons 'p (cons 'p (cons 'p (cons 'n (cons 'p (cons 'n (cons 'n (cons 'p (cons 'p (cons 'p (cons 'p (cons 'z (cons 'p 'p)))))))))))))))))))))))))) (cons 'z (cons 'p (cons 'z (cons 'n (cons 'z (cons 'n (cons 'n (cons 'n (cons 'n (cons 'n (cons 'p (cons 'n (cons 'z (cons 'n (cons 'z (cons 'z (cons 'p (cons 'p (cons 'n (cons 'p (cons 'n (cons 'n (cons 'z (cons 'n (cons 'z (cons 'p (cons 'z 'n))))))))))))))))))))))))))))) 3984213) (= (checker (crazy2add (cons 'z (cons 'p (cons 'n (cons 'z (cons 'n (cons 'p (cons 'z (cons 'p (cons 'p (cons 'z (cons 'z (cons 'n (cons 'n (cons 'n (cons 'n (cons 'z (cons 'n 'p))))))))))))))))) (cons 'z (cons 'p 'z)))) 35216) (= (checker (crazy2add (cons 'z (cons 'n (cons 'p (cons 'p (cons 'p (cons 'z (cons 'p 'p))))))) (cons 'z (cons 'p (cons 'n (cons 'p (cons 'z (cons 'p (cons 'n 'p))))))))) 320)) |
|
| 위로 |
|
 |
윤형석
가입: 2012년 9월 5일 올린 글: 26
|
|
| 위로 |
|
 |
김찬호
가입: 2011년 9월 15일 올린 글: 10
|
올려짐: 2012년9월12일 14:54 주제: |
|
|
올려주신 링크 중 위에 있는 crazy2val을 시험해봤는데, 구현이 이번과는 조금 다른 것 같습니다. ppn의 경우 올해 스펙에 따르면
(p p . n)이 되는데, 걸려있는 링크에서는 (p p n)을 처리하는 것으로 되어있네요. |
|
| 위로 |
|
 |
임성철
가입: 2012년 9월 8일 올린 글: 35
|
올려짐: 2012년9월12일 23:24 주제: |
|
|
다 잘 되는 거 같아요
감사합니다  |
|
| 위로 |
|
 |
윤형석
가입: 2012년 9월 5일 올린 글: 26
|
올려짐: 2012년9월13일 16:01 주제: |
|
|
| 김찬호 씀: | 올려주신 링크 중 위에 있는 crazy2val을 시험해봤는데, 구현이 이번과는 조금 다른 것 같습니다. ppn의 경우 올해 스펙에 따르면
(p p . n)이 되는데, 걸려있는 링크에서는 (p p n)을 처리하는 것으로 되어있네요. |
네 맞는듯 합니다~
저도 그래서 crazy2val은 테스트해보지 못했습니다..  |
|
| 위로 |
|
 |
김남현
가입: 2012년 9월 14일 올린 글: 19
|
올려짐: 2012년9월14일 11:54 주제: 조금 바꿔봤어요! |
|
|
| 윤형석 씀: | | 김찬호 씀: | 올려주신 링크 중 위에 있는 crazy2val을 시험해봤는데, 구현이 이번과는 조금 다른 것 같습니다. ppn의 경우 올해 스펙에 따르면
(p p . n)이 되는데, 걸려있는 링크에서는 (p p n)을 처리하는 것으로 되어있네요. |
네 맞는듯 합니다~
저도 그래서 crazy2val은 테스트해보지 못했습니다..  |
테스트 가능하도록 데이터를 조금 바꿔봤어요~
늦었지만 확인해보세요!
######## crazy2val test ########
(equal? (crazy2val 'n) -1)
(equal? (crazy2val 'p) 1)
(equal? (crazy2val 'z) 0)
(equal? (crazy2val (cons 'n 'n)) -3)
(equal? (crazy2val (cons 'z 'z)) 0)
(equal? (crazy2val (cons 'z 'n)) -2)
(equal? (crazy2val (cons 'p 'n)) -1)
(equal? (crazy2val (cons 'p 'z)) 1)
(equal? (crazy2val (cons 'p 'p)) 3)
(equal? (crazy2val (cons 'p (cons 'p 'z))) 3)
(equal? (crazy2val (cons 'p (cons 'p 'p))) 7)
(equal? (crazy2val (cons 'p (cons 'p 'n))) -1)
(equal? (crazy2val (cons 'p (cons 'n 'p))) 3)
(equal? (crazy2val (cons 'p (cons 'n (cons 'z (cons 'p (cons 'n (cons 'z (cons 'p (cons 'p (cons 'n (cons 'p 'n))))))))))) -585)
######## crazy2add test ########
(equal? (crazy2add (cons 'p (cons 'p 'p)) 'z) (cons 'p (cons 'p 'p)))
(equal? (crazy2add (cons 'p (cons 'p 'p)) 'p) (cons 'z (cons 'z (cons 'z 'p))))
(equal? (crazy2add (cons 'p (cons 'p 'p)) (cons 'n (cons 'n 'n))) (cons 'z (cons 'z 'z)))
(= (crazy2val (crazy2add (cons 'p (cons 'n (cons 'z (cons 'p (cons 'n (cons 'z (cons 'p (cons 'p (cons 'n (cons 'p 'n)))))))))) (cons 'p (cons 'p (cons 'n (cons 'n (cons 'p (cons 'z (cons 'p (cons 'p (cons 'n (cons 'p (cons 'z (cons 'p 'n)))))))))))))) -2178) |
|
| 위로 |
|
 |
|