#include "symbols.sfst"

$lex$ = ($Letter$* <>:[#infl#]) || "f1ord.txt"

$morph$ = $lex$ "<inflection.a>"

% Regelen under må inn for å slette alt mulig rask, bl.a. <f1><f1>
% Mao, dette funker, men ikke som forventet …
% Eliminate incorrect combinations with a filter transducer
$=C$ = [#infl#]:<>
$inflection-filter$ = $Letter$+ $=C$ $=C$ $sym$*

$morph$ >> "befinffilter.a"

$morph$ = $morph$ || $inflection-filter$

%debug
$morph$ >> "befphon.a"

$morph$ = $morph$ || "<phon.a>"

% Remove all triggers, modelled after the inflection filter above

$morph$