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