--- trunk/libf/IOIPSL/mathop.f90	2012/07/26 14:37:37	62
+++ trunk/IOIPSL/mathop.f	2014/03/05 14:57:53	82
@@ -5,7 +5,7 @@
   implicit none
 
   PRIVATE
-  PUBLIC :: mathop
+  PUBLIC mathop
 
   INTERFACE mathop
      MODULE PROCEDURE mathop_r11, mathop_r21, mathop_r31