Re: [lkb] Add a ranking module to LKB

G'day,

> I want to add a ranking module to select the "best" scoped MRS output. I'm
> not sure whether someone have done similar things before.

There is code that selects the best parse based on the same model used
by pet (i.e. looking at the derivation tree).
Take a look in (tsdb::parse-item).    You would have to ask Stephan
Oepen for more details.

> And, I want to use SBCL for this development, but there is little
> information about using LKB with SBCL -- I read through the mail-list
> archive and most pages in delph-in.net.
> Any advice?

Ben Waldron did some work on this --- enough so that the delphin
branch of the lkb will run using sbcl.

For example I can call the following:
sbcl --dynamic-space-size 2000 --load make-qc.lisp

and it works.

There are some errors doing this using the logon branch.

Ben also had some patches for [incr()  tsdb] which allowed you to do
more interesting batch processing using sbcl (such as running the
generator server) but they have not been merged upstream.

-- 
Francis Bond <http://www2.nict.go.jp/x/x161/en/member/bond/>
NICT Language Infrastructure Group

P.S. make-qc.lisp
;;;
;;; call with
;;;   time sbcl --dynamic-space-size 2000 --load make-qc.lisp
;;;   time env DISPLAY="" /home/bond/logon/franz/linux.x86.64/alisp -L
make-qc.lisp
;;;
;;;
;;; use more memory
;(setf (sb-ext:BYTES-CONSED-BETWEEN-GCS) 200000000)

(load "/home/bond/delphin/lkb/src/general/loadup")
;(load "/home/bond/delphin/lkb.cvs.good/src/general/loadup")
;(compile-system "lkb" :force t)
(compile-system "lkb")
(defparameter grm-dir "/home/bond/logon/dfki/jacy")
;;;
;;; load jacy, with tdl lexicon
;;;
;(setf *features* (remove :psql *features*))
(read-script-file-aux
 (format nil "~a/lkb/script" grm-dir))
(setf  lkb::*maximum-number-of-edges* '5000)
;;;
;;; create the check-path
;;;
(lkb::with-check-path-list-collection
 "/tmp/checkpaths"
 (lkb::parse-sentences
  (format  nil "~a/testsuites/kinou1.chasen.500" grm-dir)
  (format  nil "/tmp/kinou1.chasen.out" grm-dir)))

(format t "~%All Done!~%")
(quit)