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