anchor.diff:               ntend
   
     ! FlukaIO Message types
  -  integer*1, parameter :: FLUKA_PART = 1, &
  -                          FLUKA_EOB  = 2, &
  -                          FLUKA_EOC  = 3, &
  -                          FLUKA_CONF = 4, &
  -                          FLUKA_IPT  = 5, &
  -                          FLUKA_HSK  = 6, &
  -                          FLUKA_NPART= 7, &
  -                          FLUKA_BRHO = 8
  +  integer(kind=int8), parameter :: FLUKA_PART = 1, &
  +                                   FLUKA_EOB  = 2, &
  +                                   FLUKA_EOC  = 3, &
  +                                   FLUKA_CONF = 4, &
  +                                   FLUKA_IPT  = 5, &
  +                                   FLUKA_HSK  = 6, &
  +                                   FLUKA_NPART= 7, &
  +                                   FLUKA_BRHO = 8
     ! connection ID
     integer :: fluka_cid
   
  
positive.code:     n = ntsendeoc(fluka_cid)
      if(n.lt.0) then
        write(fluka_log_unit,*) "# FlukaIO error: Error sending End of Computation"
        call flush
        return
      end if
  
  
negative.code: module mod_fluka
  
    use floatPrecision
  
    use, intrinsic :: ISO_FORTRAN_ENV, only : int8, int16, int32, int64
  
    ! A.Mereghetti and D.Sinuela Pastor, for the FLUKA Team
    ! last modified: 18-01-2016
  