define Vow [a|e|o|u|i|y|æ|ø|å] ;
define Cns [b|c|d|f|g|h|j|k|l|m|n|p|q|r|s|t|v|w|x|z] ;
define AuxiliarySigns %> ;


!define FinalE e -> 0 || _ %> e ;
!define FinalM m -> 0 || m _ .#. ;

!define redupcleanup ~[ ?* "^[" ~$["^]"] ] & ~[ ~$["^["] "^]" ?* ] ;
!define Cleanup %> -> 0 ;

read regex  ~[ ?* "^[" ~$["^]"] ] & ~[ ~$["^["] "^]" ?* ] ;


!read regex [
!     redupcleanup
!.o. Cleanup
!] ;

!save stack 8.xfst.hfst