extern int otb_6s_scatra_(
  otb_6s_integer *iaer_prof__,
  otb_6s_doublereal *taer,
  otb_6s_doublereal *taerp,
  otb_6s_doublereal *tray,
  otb_6s_doublereal *trayp,
  otb_6s_doublereal *piza,
  otb_6s_doublereal *palt,
  otb_6s_integer *nt,
  otb_6s_integer *mu,
  otb_6s_doublereal *rm,
  otb_6s_doublereal *gb,
  otb_6s_doublereal *xmus,
  otb_6s_doublereal *xmuv,
  otb_6s_doublereal *ddirtt,
  otb_6s_doublereal *ddiftt,
  otb_6s_doublereal *udirtt,
  otb_6s_doublereal *udiftt,
  otb_6s_doublereal *sphalbt,
  otb_6s_doublereal *ddirtr,
  otb_6s_doublereal *ddiftr,
  otb_6s_doublereal *udirtr,
  otb_6s_doublereal *udiftr,
  otb_6s_doublereal *sphalbr,
  otb_6s_doublereal *ddirta,
  otb_6s_doublereal *ddifta,
  otb_6s_doublereal *udirta,
  otb_6s_doublereal *udifta,
  otb_6s_doublereal *sphalba
  );
