김기웅
가입: 2014년 9월 16일
올린 글: 5
|
 올려짐: 2014년11월2일 19:03 주제: HW 5-3 질문입니다 |
 |
|
체점기관련 질문입니다.
;;;Tape 부분에서는
left의 결과가 다음과 같습니다.
| 코드: |
(define tape1 (init-tape (list "a" "b")))
(define tape2 (move-tape-left tape1))
(output (lambda () (equal? "-.a.b.-.-" (print-tape tape2 2))))
|
;;; Rule table 과 ;;; Turaing machine 부분에서는
right의 부분이 다음과 같습니다.
| 코드: |
(output (lambda () (equal? (cons "d" (cons 'right "2")) (match-rule "1" "a" table7))))
(define tm1 (make-tm (list "a" "b") "1" table7))
(define tm2 (step-tm tm1))
(output (lambda () (equal? "-.-.a.b.-" (print-tm tm1 2))))
(output (lambda () (equal? "-.d.b.-.-" (print-tm tm2 2))))
|
'right가 move-left-tape로 작동하는건가요? |
|
FAQ
검색
멤버리스트
사용자 그룹
사용자 등록하기
개인 정보
비공개 메시지를 확인하려면 로그인하십시오
로그인
