#! /bin/sh
# takes context[tm] from calendar-law-para and adds ct, st ligatures.
mawk '
BEGIN {
    Active = 0
}

/^f.*Celestia[IR]/ {
    Active = 1
    print
    next
}

/^f / {
    Active = 0
    print
    next
}

(Active == 0) {
    print
    next
}

/^=/ {
     # gsub(/f[(]fi[)]/, "(Fi)")
     # gsub(/f[(]fl[)]/, "(Fl)")
     # gsub(/ff/, "(ff)")
     gsub(/ct/, "(ctlig)")
     gsub(/st/, "(stlig)")
}

{
    print
}

' ${@+"$@"}

