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