10 max_level=`src/get-level max`
13 res=`src/get-all-below $level $1`
14 if [ -n "$res" -a -d debug ]; then
15 cat $res | src/filter | sort -u > debug/$level.l.$1
24 cat | sort -u > debug/$level.$dsr.in
25 cat debug/$level.$dsr.in | "$@" | sort -u > debug/$level.$dsr.out
26 comm -23 debug/$level.$dsr.out debug/$level.$dsr.in > debug/$level.+.$dsr
27 cat debug/$level.$dsr.out
28 rm debug/$level.$dsr.out debug/$level.$dsr.in
34 if [ $level -ne $max_level ]
37 supplement=`get-list supplement`
38 add_affixes="`get-list add-affixes`"
39 add_possessive="`get-list add-possessive`"
41 if [ -d debug -a -d l/include/$level ]; then
42 cat l/include/$level/* | sort -u | comm -12 - working/words.`src/get-level next $level` > debug/$level.l.include
45 cat $supplement $add_affixes $add_possessive l/include/$level/* \
47 > working/words.$level.tmp
48 cp working/words.$level.tmp working/words.$level.tmp.0
50 if [ -n "$add_affixes" ] && [ $level -le `cat l/add-affixes/max-level` ]
52 #echo "Adding affixes"
53 cat $add_affixes | src/filter | cap affixes src/add-affixes >> working/words.$level.tmp
58 if [ -n "$add_possessive" ]
60 #echo "Adding possessive"
61 cat $add_possessive | src/filter | cap possessive src/add-affixes just-possessive >> working/words.$level.tmp
64 #echo "Adding possessive"
65 cat working/words.$level.tmp \
66 | cap possessive src/add-affixes use-some just-possessive \
67 > working/words.$level.tmp2
68 mv working/words.$level.tmp2 working/words.$level.tmp
71 echo -n '' > working/exclude.$level
72 for l in `cat l/levels-list`; do
73 if [ $l -ge $level -a -e r/special/exclude.$l ]; then
74 cat r/special/exclude.$l >> working/exclude.$level
77 sort -u working/exclude.$level -o working/exclude.$level
79 cat working/words.$level.tmp \
80 | cap other-spellings-1 src/add-other-spellings \
81 | cap other-forms src/add-other-forms \
82 | cap other-spellings-2 src/add-other-spellings \
84 | comm -23 - working/exclude.$level \
85 | comm -12 - working/words.`src/get-level next $level` \
86 > working/words.$level
88 #rm working/words.$level.tmp
92 if [ -d debug/ ]; then
93 cp working/all.lst debug/$level.everything
97 | cap possessive src/add-affixes use-all just-possessive \
98 | cap other-spellings src/add-other-spellings \
100 > working/words.$level