blob: 1485247f10b9153248889ee22f48e315e2bb4efd (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
type 'a voyel = ('a * 'a)
type 'a consonants =
{ ending : 'a option option
; opening : 'a list
; following : 'a option }
type 'a group = 'a voyel * 'a consonants option
type 'a t = 'a group * 'a option option
type 'a modifier = (module Sounds.T with type t = 'a) -> 'a t -> 'a t
|