Re: Help needed for ada package

Nice and clean but:

Most_Dangerous = 10
Last_Reported = 20
Citizens 5 and 6 are associated.
then re-rate Citizen 5 as even more dangerous than 10.
Citizen 6 will not be noticed by Next_Member or More_In_Group.

Associate as written is not symmetric - is that what's wanted?

association is not transitive - is that what's wanted?

I would also change type Rating to Rating_Levels and array Society to
Rating. Then "if Rating(J) > " reads better than "if Society(J) > ".

I notice a couple of typos, but the compiler will point them out.
.

Relevant Pages