Generator (1st stage: reordering)
 
 (generator
  (0 (cond
    ;; pre vowel sign
    ("([CR] ... ((HCr?)*[NJ]?)(m)(s*S?(H[CR])?)" ...)
 
    ;; two-part above vowel sign
    ("([CR] ... ((HCr?)*[NJ]?As*S?(H[CR])?)" ...)
 
    ;; post vowel sign
    ("([CR] ... ((HCr?)*[NJ]?)(p)(s*)(S?(H[CR])?)" ...)
 
    ;; two-part post vowel sign
    ("([CR] ... ((HCr?)*[NJ]?)(P)(s*)(S?(H[CR])?)" ...)
 
    ;; other vowel signs or no vowel sign
    ("([CR] ... ((HCr?)*[NJ]?[b|a]?s*S?(H[CR])?)" ...)
 
    ("." =))
   *))