blob: 938c50ec8b21222481d9ee47a2dedab569b6708d (
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 modifier = (module Sounds.T with type t = 'a) -> ('a group * 'a option option) -> ('a group * 'a option option)
|
