%% syntaxe : any isarray --> booleen
/isarray {
   type (arraytype) cvn eq
} def