MODULE naivemat
  IMPLICIT none
  PRIVATE

  PUBLIC :: naivemull
  PRIVATE :: naivemull_4, naivemull_8, naivemull_16
  
  INTERFACE naivemull
     procedure naivemull_4, naivemull_8, naivemull_16
  END INTERFACE naivemull

CONTAINS

  
END MODULE naivemat