FPC compiler internal procedure index: sqr (real)
Source position: innr.inc line 109
const fpc_in_sqr_real = 128;