extern int otb_6s_polglit_(
  otb_6s_doublereal *xts,
  otb_6s_doublereal *xtv,
  otb_6s_doublereal *phi,
  otb_6s_doublereal *wspd,
  otb_6s_doublereal *azw,
  otb_6s_doublereal *ropq,
  otb_6s_doublereal *ropu
  );
extern int otb_6s_pfresnel_(
  otb_6s_doublereal *nr,
  otb_6s_doublereal *ni,
  otb_6s_doublereal *coschi,
  otb_6s_doublereal *sinchi,
  otb_6s_doublereal *r1,
  otb_6s_doublereal *r2
  );
