blob: e27929c01d8f4db418cfb4e2bce6f97dba5beac0 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
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
|