MODULE fixedarray2 ;

VAR
   array: ARRAY [0..9] OF CHAR ;
BEGIN
   array := "012345678"
END fixedarray2.