신정철
가입: 2012년 9월 14일 올린 글: 3
|
올려짐: 2012년9월14일 16:56 주제: 숙제 1 6번 샘플 데이터 list 형입니다. |
|
|
(and (equal? (crazy2val (list 'p 'p 'p 'z 'n 'n 'n 'z 'p)) 151) (equal? (crazy2val (list 'z 'n 'z 'n 'z 'n 'n 'p 'z 'n 'p 'p 'n 'n 'n 'n 'n 'n 'n 'n 'n 'p)) 6678) (equal? (crazy2val (list 'p 'n 'z 'n 'n 'p 'p 'z 'z)) 71) (equal? (crazy2val (list 'n 'n 'z 'n 'z 'p 'n 'n 'z 'p 'p 'n 'p 'n 'n 'n 'n 'p 'z 'n 'p 'p 'p 'z 'n 'n 'z 'z)) -43504299) (equal? (crazy2val (list 'n 'p 'p 'z 'z 'z 'z 'p 'n 'z 'p 'p 'p 'p 'z 'n 'z 'n 'n 'p)) 113541) (equal? (crazy2val (list 'p 'n 'p 'p 'n 'n 'p 'p 'z 'z 'n 'n 'z 'p 'p 'p 'n 'n 'p 'p 'z 'n 'z 'z 'p 'z 'p 'z 'p)) 350868635) (equal? (crazy2val (list 'n 'p 'z 'p 'n 'p 'n 'p 'z 'z 'n 'n 'p 'n 'z 'n 'n 'p 'p 'z 'n 'z 'z 'n 'n)) -25926567) (equal? (crazy2val (list 'n 'p 'z 'p 'n 'z 'z 'n 'n 'n 'p 'n 'n 'z 'p)) 10361) (equal? (crazy2val (list 'p 'n 'p 'n 'p 'n 'z 'z 'n 'n 'p 'z 'n 'z 'p 'p)) 45291) (equal? (crazy2val (list 'n 'n 'p 'n 'n 'n 'p 'z 'n)) -247) (equal? (crazy2val (list 'n 'n 'n 'p 'z 'n 'n 'z 'p 'z)) 161) (equal? (crazy2val (list 'n 'p 'n 'z 'p 'n 'z 'z 'n 'z 'z 'z 'p 'p 'n 'p 'p 'n 'p 'p 'z 'p 'z 'n 'n)) -22319379) (equal? (crazy2val (list 'z 'n 'p 'p 'p 'p 'z 'n 'n 'z 'z 'n 'p 'z 'n 'n)) -47430) (equal? (crazy2val (list 'n 'n 'p 'p 'p 'p 'n 'z 'n 'p 'p 'z 'p 'n 'n 'n)) -51975) (equal? (crazy2val (list 'n 'n 'n 'n 'p 'n 'n 'n 'n 'p)) 33) (equal? (crazy2val (list 'z 'z 'n 'n 'n 'n 'z 'n)) -188) (equal? (crazy2val (list 'z 'n 'n 'p 'p 'z 'z 'p 'n 'z 'n 'p 'p 'n 'z 'n 'z)) -35950) (equal? (crazy2val (list 'p 'p 'z 'z 'z 'p 'p 'z 'p 'n 'n 'p 'p 'n 'n)) -19613) (equal? (crazy2val (list 'p 'z 'z 'p 'z 'n 'z 'p 'n 'p 'p 'n)) -663) (equal? (crazy2val (list 'z 'n 'n 'n 'z 'p 'p 'n 'n 'p 'n 'z 'p 'z 'n 'n 'p 'n 'n 'z 'n 'n 'p 'z 'z 'p 'p 'z 'z 'n)) -435532590) (equal? (crazy2val (list 'n 'n 'p 'n 'n 'n 'z 'p 'p 'z 'p 'z 'p 'z 'n 'z 'z 'p 'z 'z 'p 'n 'z 'z 'p 'n)) -17705655) (equal? (crazy2val (list 'n 'z 'n 'z 'p 'n 'z 'p 'z 'z 'z 'n 'p 'z 'n 'p 'n 'n 'z 'z 'p 'p 'n 'p)) 7161963) (equal? (crazy2val (list 'z 'n 'n 'p 'n 'z 'n 'p 'z 'p 'p 'p 'z 'z 'p 'p 'z 'z 'p 'z 'p 'z 'z 'p 'p 'p 'z 'z)) 60083762) (equal? (crazy2val (list 'n 'p)) 1) (equal? (crazy2val (list 'p 'p 'n 'z 'n 'p 'z 'p 'p 'z)) 399) (equal? (crazy2val (list 'n 'p 'n 'p 'p 'n 'p 'z 'n 'n 'p 'z 'p 'n 'p 'z 'n)) -52939) (equal? (crazy2val (list 'n 'z 'n 'p 'n 'p 'n)) -45) (equal? (crazy2val (list 'n 'n 'p 'n 'n 'z 'z 'z 'n 'n 'n)) -1815) (equal? (crazy2val (list 'n 'p 'n 'z 'n 'n 'z 'p 'n 'p 'p)) 1357) (equal? (crazy2val (list 'p 'n 'p 'n 'p 'n 'p 'n 'n 'z 'n 'z 'z 'z 'p 'n 'z 'z)) -17749) (equal? (crazy2val (list 'p 'p 'p 'z 'z 'p 'p)) 103) (equal? (crazy2val (list 'p 'p 'n 'z 'n 'z 'z 'z 'p 'p 'n 'n 'n 'n 'z 'p)) 18159) (equal? (crazy2val (list 'p 'z 'n 'z 'p 'n 'n 'z 'z 'n 'p 'n)) -1619) (equal? (crazy2val (list 'p 'n 'n 'n 'p 'p 'z 'n 'p 'z 'p 'n 'z 'p 'n 'n 'n 'z 'p)) 154787) (equal? (crazy2val (list 'p 'z 'z 'z 'n 'n 'n 'n 'z 'z 'p 'p 'n 'p 'z 'p 'n 'n 'p 'p 'p 'p 'n 'n)) -8807663) (equal? (crazy2val (list 'z 'n 'p 'n 'p 'z 'n)) -54) (equal? (crazy2val (list 'p 'n 'z 'n 'n 'n 'p 'n)) -121) (equal? (crazy2val (list 'z 'z 'p 'n 'n 'p 'z 'z)) 12) (equal? (crazy2val (list 'n 'p 'z 'n 'p 'p 'z 'z 'n 'p 'p)) 1321) (equal? (crazy2val (list 'n 'n 'n 'p 'p 'n 'n 'p 'p 'p 'z 'p 'z 'n 'n)) -21711) (equal? (crazy2val (list 'z 'n 'z 'n 'n 'n 'z 'n)) -186) (equal? (crazy2val (list 'p 'n 'p 'n 'n 'p 'z 'n 'n)) -373) (equal? (crazy2val (list 'z 'n 'p 'p 'z 'p 'p 'n 'n 'z 'z 'p 'n 'z 'p 'z 'n 'z 'p 'p 'z 'z 'p 'p)) 13317866) (equal? (crazy2val (list 'p 'p 'z 'p 'n 'p 'p 'p 'n 'p 'n 'n 'n 'z 'z 'z 'n 'n 'n 'z 'n 'n 'z 'z)) -3611173) (equal? (crazy2val (list 'n 'p 'p 'p 'z 'p 'n 'z 'p 'n 'z 'p 'z 'z 'n 'z 'p 'z 'n 'p 'n 'p 'n 'p 'z)) 5555949) (equal? (crazy2val (list 'p 'n 'n 'p 'n 'n 'p 'n 'n 'n 'n 'n)) -3949) (equal? (crazy2val (list 'z 'p 'z 'n 'p 'p 'n 'z 'p 'z 'z 'n 'n 'n 'p 'n 'p 'p 'p 'n 'p 'z 'z 'p 'n 'p 'n 'z 'z 'n)) -577861398) (equal? (crazy2val (list 'p 'p 'p 'p 'z 'z 'n 'z 'z 'z 'n 'n 'p 'p)) 9167) (equal? (crazy2val (list 'z 'n 'n 'p 'p 'p 'z 'n)) -78 ) (equal? (crazy2val (list 'p 'n 'n 'p 'p 'z 'z 'p 'z 'z 'p 'n 'n 'p 'n 'z 'p 'z 'z 'n 'p 'z 'n 'z 'n 'p 'p)) 80268435) (equal? (crazy2val (list 'n 'n 'n 'z 'n 'z 'n 'n 'z 'n 'n 'p 'z 'p 'z 'z 'z 'n 'n)) -384727) (equal? (crazy2val (list 'n 'z 'p 'n 'z 'n 'p 'p 'p 'p 'n 'z 'p 'z 'z 'p 'z 'n 'z 'z 'z 'p 'z 'n 'z)) -6385765) (equal? (crazy2val (list 'z 'z)) 0) (equal? (crazy2val (list 'z 'p 'n 'n 'z 'p 'p 'p 'n 'p 'z 'p 'p 'n 'n 'p 'z 'p 'z 'p)) 670166) (equal? (crazy2val (list 'p 'p 'z 'n 'z 'z 'z 'p 'z 'z 'p 'n 'p 'p 'p 'z)) 27771) (equal? (crazy2val (list 'n 'z 'n 'n 'z 'p 'p 'n 'n)) -301) (equal? (crazy2val (list 'n 'p 'n 'n 'z 'p 'p 'z 'p 'z 'n 'z 'p)) 3413) (equal? (crazy2val (list 'n 'p 'n 'z 'n 'p 'z 'p 'n 'n 'n 'p 'n 'n 'p 'z 'z 'n 'z 'z 'z 'p)) 1970573) (equal? (crazy2val (list 'n 'n 'n 'n 'n 'z 'z 'p 'n 'p 'z 'z 'z 'z 'p 'z 'n 'p 'p 'p 'z 'n 'z 'p 'z 'n 'p)) 40714593) (equal? (crazy2val (list 'p 'z 'p 'p 'z 'p 'p 'n 'p 'p 'z 'p 'n 'z 'z 'p)) 31469))
에디터에서 열어서
(cons 를 ' '로(스페이스)
(crazy2val을 (crazy2val (list 로
)))을 ))로
모두 바꾸기를 해서 만든 데이터입니다.
일단 저의 경우에는 테스트시 #t가 나왔으나, 혹시 틀린 부분이 있을수도 있으므로 주의하시기 바랍니다.
7번도 마찬가지의 방식대로 에디터로 편집하면 만들어질거 같습니다(만들게 되면 올리겠습니다.) |
|