func'Mechanism_Code yields an integer code for the
mechanism used for the result of function func, and
subprog'Mechanism_Code (n) yields the mechanism
used for formal parameter number `n' (a static integer value, with 1
meaning the first parameter) of subprogram subprog. The code returned is:
by copy (value)
by reference