1package Modular3_Pkg is 2 3 type Int16_T is range -32768 .. 32767; 4 for Int16_T'Size use 16; 5 for Int16_T'Alignment use 1; 6 7 type Mod16_T is mod 2 ** 16; 8 for Mod16_T'Size use 16; 9 for Mod16_T'Alignment use 1; 10 11end Modular3_Pkg; 12