?? dump_pos.scm
字號:
; Portions Copyright 2004 Sun Microsystems, Inc.; Portions Copyright 1999-2003 Language Technologies Institute,; Carnegie Mellon University.; All Rights Reserved. Use is subject to license terms.;; See the file "license.terms" for information on usage and; redistribution of this file, and for a DISCLAIMER OF ALL; WARRANTIES.; Dumps the guess_pos part of speech tagger to stdout.; ; Expects guess_pos to be defined.;(define (dump_pos) (let ((pos_list guess_pos)) (while pos_list (let ((pos (car (car pos_list))) (words (cdr (car pos_list)))) (while words (format t "%s %s\n" (car words) pos) (set! words (cdr words)))) (set! pos_list (cdr pos_list)))))
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -