71def numericalProfileOf =
72 (lambda unrestricted contract : (family NumericalContract) .
73 (eliminate
74 NumericalContract
75 (lambda unrestricted current : (family NumericalContract) . (family StdNumericProfile))
76 contract
77 (branch NumericalContractOf profile operations relation . profile)))The compiler supplied declaration spans and resolved links from this source snapshot. This page does not assert that this file belongs to a checked closure.