Source position: libgmp.pp line 476
var mpf_init_set_d: procedure(
para1: Tmpf_ptr;
para2: TDouble
);