anchor.diff:       1006890 ;; そのばあいには
        1887540 ;; 成功の暁には
        )
  -    (l)
  +    (l k)
  +  (:test (alexandria:ends-with #\は k))
     (:space (- l 2))
     (:mod (- l 1)))
   
  
positive.code:      2215430 ;; には
       2028950 ;; とは
       )
      (l)
      (:mod (- l 1)))
  
  (def-simple-hint ;; with space
      (1006660 ;; そうでないばあいは
  
negative.code:      2008290 ;; さては
       2136690 ;; にあっては
       )
      (l k)
    (:test (alexandria:ends-with #\は k))
    (:space (- l 1))
    (:mod (- l 1)))
  
  