extern void irco_connect_c(fint *,fint *);