sig
exception
Zero
val
number_of :
'
a list
->
'
a array
->
int
end