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