1package Boolean_Subtype2_Pkg is
2
3   type Node_Id is range 0 .. 099_999_999;
4   subtype Entity_Id is Node_Id;
5
6   function Node20 (N : Node_Id) return Node_Id;
7   function Flag63 (N : Node_Id) return Boolean;
8   function Present (N : Node_Id) return Boolean;
9
10end Boolean_Subtype2_Pkg;
11