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