[Ada] Remove redundant predicate checks