extern void irlrs_set_wrsnip_c(fchar,fint *,fint *,float *,fint *,fint *);