Commit 02fd6378 authored by Gérard Huet's avatar Gérard Huet

Ref to Panini 6,4,126 for perfect formation

parent 5f2d77d8
......@@ -3095,6 +3095,7 @@ value redup_perf root =
[ [ c' ] when consonant c' ->
(revaffix [ 10 (* e *); c ] w,True,True)
(* roots of form c.a.c' with c,c' consonant or .m Scharf *)
(* cf. Pan{6,4,119-126 *)
(* ZZ may lead to hiatus *)
| _ -> (glue revw,False,False)
]
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment