qq := get_array(mat1,mat2,kk,3.14);
Change this to
qq := get_array(PDouble(mat1),PDouble(mat2),kk,3.14);
It is ok. Thank you.
jk
-- // Jilani KHALDI *** K-Book Interactive Pubblications http://jkhaldi.oltrelinux.com
_______________________________________________ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal