From df8ab71ba8355a0da378d1d7282ed5c9a93307cf Mon Sep 17 00:00:00 2001 From: Wojtek Kosior Date: Mon, 22 Apr 2019 21:41:16 +0200 Subject: fix typo in module and elements --- src/naivemath.F90 | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) diff --git a/src/naivemath.F90 b/src/naivemath.F90 index efc5295..b215075 100644 --- a/src/naivemath.F90 +++ b/src/naivemath.F90 @@ -1,15 +1,15 @@ -MODULE naivemat +MODULE naivmat IMPLICIT none PRIVATE - PUBLIC :: naivemull - PRIVATE :: naivemull_4, naivemull_8, naivemull_16 + PUBLIC :: naivmull + PRIVATE :: naivmull_4, naivmull_8, naivmull_16 - INTERFACE naivemull - procedure naivemull_4, naivemull_8, naivemull_16 - END INTERFACE naivemull + INTERFACE naivmull + procedure naivmull_4, naivmull_8, naivmull_16 + END INTERFACE naivmull CONTAINS -END MODULE naivemat +END MODULE naivmat -- cgit v1.2.3