FPC compiler internal procedure index: sqr
Source position: innr.inc line 67
const fpc_in_const_sqr = 100;