extern int otb_6s_discre_(
  otb_6s_doublereal *ta,
  otb_6s_doublereal *ha,
  otb_6s_doublereal *tr,
  otb_6s_doublereal *hr,
  otb_6s_integer *it,
  otb_6s_integer *nt,
  otb_6s_doublereal *yy,
  otb_6s_doublereal *dd,
  otb_6s_doublereal *ppp2,
  otb_6s_doublereal *ppp1,
  otb_6s_doublereal *zx
  );
