(in-package :tsdb)

(setf *pcfg-include-leafs-p* t)

(setf *pcfg-use-preterminal-types-p* t)

(operate-on-profiles '("redwoods") :task :pcfg :target "redwoods.pcfg")