diff --git a/wafo/source/mvn/mvndst.f b/wafo/source/mvn/mvndst.f
index 0ac832a..ab259c0 100644
--- a/wafo/source/mvn/mvndst.f
+++ b/wafo/source/mvn/mvndst.f
@@ -131,7 +131,7 @@ C f2py mvn.pyf mvndst.f -c --fcompiler=gnu95 --compiler=mingw32 -lmsvcr71
          VALUE = 0
          ERROR = 1
       ELSE
-         INFORM = INT(MVNDNT(N, CORREL, LOWER, UPPER, INFIN, INFIS, D, E))
+         INFORM = MVNDNT(N, CORREL, LOWER, UPPER, INFIN, INFIS, D, E)
          IF ( N-INFIS .EQ. 0 ) THEN
             VALUE = 1
             ERROR = 0