TFluka/rfrndx.cxx

   1 #include "Fdimpar.h"  //(DIMPAR) fluka include
   2 #include "Ftrackr.h"  //(TRACKR) fluka common
   3 #include "Fiounit.h"  //(IOUNIT) fluka common
   4 #ifndef WIN32
   5 # define rfrndx rfrndx_
   6 #else
   7 # define rfrndx RFRNDX
   8 #endif
   9 extern "C" {
  10 Double_t rfrndx(Double_t& wvlngt, Double_t& omgpho, Int_t& mmat)
  11 {
  12     printf("rfrndx called  %e %e %d \n", wvlngt, omgpho, mmat);
  13     return (0.);
  14 }
  15 }
  16