MODULE dotmat IMPLICIT none PRIVATE PUBLIC :: dotmull PRIVATE :: dotmull_4, dotmull_8, dotmull_16 INTERFACE dotmull procedure dotmull_4, dotmull_8, dotmull_16 END INTERFACE dotmull CONTAINS END MODULE dotmat