Attention des changements sont bientôt à prévoir sur l'instance gitea d'Aurore :
package array2 is
type RIC_TYPE is (RIC1, RIC2);
for RIC_TYPE'SIZE use 32;
function MAX return Integer;
end array2;