From 771c6e4313c01ac7d05c63cc153131e3298056b0 Mon Sep 17 00:00:00 2001 From: pbrod Date: Sun, 22 May 2016 01:25:30 +0200 Subject: [PATCH] Small fix --- wafo/source/mvnprd/mvnprd.f | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/wafo/source/mvnprd/mvnprd.f b/wafo/source/mvnprd/mvnprd.f index be1de64..bcc32fc 100644 --- a/wafo/source/mvnprd/mvnprd.f +++ b/wafo/source/mvnprd/mvnprd.f @@ -152,8 +152,8 @@ C & F1T(22), F2T(22), F3T(22), G1T(22), G3T(22), PSUM(22), H(NN) $ , HL(NN),BB(NN) INTEGER INF(*), INFT(NN), LDIR(22) - DOUBLE PRECISION ZERO, HALF, ONE, TWO, FOUR, SIX, PT1, PT24, ONEP5, - * X2880, SMALL, DXMIN, SQRT2, PROB, ERRL, BI, START, + DOUBLE PRECISION ZERO, HALF, ONE, TWO, FOUR, SIX, PT1, PT24, + * ONEP5, X2880, SMALL, DXMIN, SQRT2, PROB, ERRL, BI, START, * Z, HINC, ADDN, EPS2, EPS1, EPS, ZU, Z2, Z3, Z4, Z5, ZZ, * ERFAC, EL, EL1, BOUND, PART0, PART2, PART3, FUNC0, FUNC2, * FUNCN, WT, CONTRB, DLG, DX, DA, ESTL, ESTR, TSUM, EXCESS, ERROR,