extern void gdsd_rvar_c(fchar,fchar,fint *,fchar,fint *);