pragma Pre (Boolean_Expression);
The Pre pragma is intended to be an exact replacement for
the language-defined
Pre aspect, and shares its restrictions and semantics.
It must appear either immediately following the corresponding
subprogram declaration (only other pragmas may intervene), or
if there is no separate subprogram declaration, then it can
appear at the start of the declarations in a subprogram body
(preceded only by other pragmas).