;generate S-expression form intput text
(exec parser.out < demeter-input > s-express)
(exec dd if=s-express of=s-expression conv=lcase >& devnull)

;load the lisp program which translates an s-expression to flavor instances
;(load 'load-ast)

;generates S-expression

(setq *head* (load-ast 's-expression))
(exec rm s-express s-expression devnull)