From ec18d1483373fa1a43b598ce0326476a88d2c76d Mon Sep 17 00:00:00 2001 From: Wojtek Kosior Date: Mon, 22 Apr 2019 21:35:22 +0200 Subject: add naivemat module boilerplate --- src/naivmath.F90 | 15 +++++++++++++++ 1 file changed, 15 insertions(+) create mode 100644 src/naivmath.F90 diff --git a/src/naivmath.F90 b/src/naivmath.F90 new file mode 100644 index 0000000..efc5295 --- /dev/null +++ b/src/naivmath.F90 @@ -0,0 +1,15 @@ +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 -- cgit v1.2.3