Add files via upload

Adding remaining files

Author: olzama

srg.lisp

@@ -0,0 +1,29 @@
+(in-package :tsdb)
+
+(setf *feature-grandparenting* 2)
+
+(setf *feature-use-preterminal-types-p* t)
+
+(setf *feature-lexicalization-p* nil)
+
+(setf *feature-constituent-weight* 0)
+
+(setf *feature-active-edges-p* nil)
+
+(setf *feature-ngram-size* 0)
+
+(setf *feature-ngram-tag* :type)
+
+(setf *feature-ngram-back-off-p* t)
+
+(setf *feature-item-enhancers* nil)
+
+(setf *feature-lm-p* nil)
+
+(setf *feature-preference-weightings* '((0 :binary)))
+
+(setf *feature-random-sample-size* nil)
+
+(setf %redwoods-items-increment% #-:64bit 100 #+:64bit 200)
+
+(setf %redwoods-items-percentile% 20)

srg.tdl

@@ -0,0 +1,76 @@
+;;; -*- Mode: tdl; Coding: utf-8; -*-
+;;;
+
+:begin :type.
+
+;;
+;; the type hierarchy
+;;
+:include "fundamentals".
+:include "hdtypes.tdl".
+:include "letypes.tdl".
+:include "irtypes.tdl".
+:include "lrtypes.tdl".
+:include "srtypes.tdl".
+; :include "cmt.tdl".
+:end :type.
+
+;;
+;; token mapping: manipulate the token lattice prior to lexical look-up
+;; NOT USED
+;; :begin :instance :status token-mapping-rule.
+;; :include "tmr.tdl".
+;; :end :instance.
+
+;;
+;; lexical filtering: reduce the chart after lexical instantiation and the
+;; application of lexical rules, right before we turn loose syntactic rules.
+;;
+
+;;:begin :instance :status lexical-filtering-rule.
+;;:include "lfr.tdl".
+;;:end :instance.
+
+
+;;
+;; lexicon entries (instances of status lex-entry or generic-lex-entry)
+;;
+
+:begin :instance :status lex-entry.
+:include "lexicon".
+:end :instance.
+
+;:begin :instance :status generic-lex-entry.
+;:include "generics".
+;:end :instance.
+
+;;
+;; grammar rules and lexical rules (instances of status rule)
+;;
+
+
+:begin :instance :status rule.
+:include "srules".
+:end :instance.
+
+:begin :instance :status lex-rule.
+:include "lrules".
+:include "inflr".
+; :include "inflrl".
+:end :instance.
+
+;;
+;; parse-tree labels (instances)
+;;
+
+:begin :instance.
+:include "labels".
+:end :instance.
+
+;;
+;; start symbols of the grammar (instances)
+;;
+
+:begin :instance.
+:include "roots".
+:end :instance.