diff options
Diffstat (limited to 'math/lapack/files/patch-af')
| -rw-r--r-- | math/lapack/files/patch-af | 102 |
1 files changed, 0 insertions, 102 deletions
diff --git a/math/lapack/files/patch-af b/math/lapack/files/patch-af deleted file mode 100644 index afa3a00aa5ce..000000000000 --- a/math/lapack/files/patch-af +++ /dev/null @@ -1,102 +0,0 @@ -*** ./TIMING/EIG/stimee.f~ Fri Nov 18 19:49:14 1994 ---- ./TIMING/EIG/stimee.f Tue Jul 4 19:24:06 1995 -*************** -*** 243,250 **** - INTEGER LIWRK2 - PARAMETER ( LIWRK2 = 6+6*MAXN+5*MAXN*LG2MXN ) - INTEGER LWORK -! PARAMETER ( LWORK = MAX( MAXN*( 4*MAXN+2 ), -! $ 2*LDAMAX+1+3*MAXN+2*MAXN*LG2MXN+3*MAXN**2 ) ) - INTEGER MAXIN, MAXPRM, MAXT, MAXSUB - PARAMETER ( MAXIN = 12, MAXPRM = 10, MAXT = 10, - $ MAXSUB = 20 ) ---- 243,249 ---- - INTEGER LIWRK2 - PARAMETER ( LIWRK2 = 6+6*MAXN+5*MAXN*LG2MXN ) - INTEGER LWORK -! PARAMETER ( LWORK = MAXN*( 4*MAXN+2 )) - INTEGER MAXIN, MAXPRM, MAXT, MAXSUB - PARAMETER ( MAXIN = 12, MAXPRM = 10, MAXT = 10, - $ MAXSUB = 20 ) -*** ./TIMING/EIG/ctimee.f~ Fri Nov 18 19:49:34 1994 ---- ./TIMING/EIG/ctimee.f Tue Jul 4 22:37:16 1995 -*************** -*** 262,275 **** - INTEGER LIWRK2 - PARAMETER ( LIWRK2 = 6+6*MAXN+5*MAXN*LG2MXN ) - INTEGER LWORK -! PARAMETER ( LWORK = MAX( MAXN*( 4*MAXN+2 ), -! $ 2*LDAMAX+1+3*MAXN+2*MAXN*LG2MXN+3*MAXN**2 ) ) - INTEGER MAXIN, MAXPRM, MAXT, MAXSUB - PARAMETER ( MAXIN = 12, MAXPRM = 10, MAXT = 10, - $ MAXSUB = 20 ) - INTEGER LRWORK -! PARAMETER ( LRWORK = MAX( MAXIN*MAXT*MAXPRM, -! $ 1+3*MAXN+2*MAXN*LG2MXN+3*MAXN**2 ) ) - INTEGER NIN, NOUT - PARAMETER ( NIN = 5, NOUT = 6 ) - * .. ---- 262,273 ---- - INTEGER LIWRK2 - PARAMETER ( LIWRK2 = 6+6*MAXN+5*MAXN*LG2MXN ) - INTEGER LWORK -! PARAMETER ( LWORK = MAXN*( 4*MAXN+2 )) - INTEGER MAXIN, MAXPRM, MAXT, MAXSUB - PARAMETER ( MAXIN = 12, MAXPRM = 10, MAXT = 10, - $ MAXSUB = 20 ) - INTEGER LRWORK -! PARAMETER ( LRWORK = 1+3*MAXN+2*MAXN*LG2MXN+3*MAXN**2 ) - INTEGER NIN, NOUT - PARAMETER ( NIN = 5, NOUT = 6 ) - * .. -*** ./TIMING/EIG/dtimee.f~ Fri Nov 18 19:49:24 1994 ---- ./TIMING/EIG/dtimee.f Tue Jul 4 23:41:44 1995 -*************** -*** 243,250 **** - INTEGER LIWRK2 - PARAMETER ( LIWRK2 = 6+6*MAXN+5*MAXN*LG2MXN ) - INTEGER LWORK -! PARAMETER ( LWORK = MAX( MAXN*( 4*MAXN+2 ), -! $ 2*LDAMAX+1+3*MAXN+2*MAXN*LG2MXN+3*MAXN**2 ) ) - INTEGER MAXIN, MAXPRM, MAXT, MAXSUB - PARAMETER ( MAXIN = 12, MAXPRM = 10, MAXT = 10, - $ MAXSUB = 20 ) ---- 243,249 ---- - INTEGER LIWRK2 - PARAMETER ( LIWRK2 = 6+6*MAXN+5*MAXN*LG2MXN ) - INTEGER LWORK -! PARAMETER ( LWORK = MAXN*( 4*MAXN+2 )) - INTEGER MAXIN, MAXPRM, MAXT, MAXSUB - PARAMETER ( MAXIN = 12, MAXPRM = 10, MAXT = 10, - $ MAXSUB = 20 ) -*** ./TIMING/EIG/ztimee.f~ Fri Nov 18 19:49:43 1994 ---- ./TIMING/EIG/ztimee.f Wed Jul 5 00:55:56 1995 -*************** -*** 262,275 **** - INTEGER LIWRK2 - PARAMETER ( LIWRK2 = 6+6*MAXN+5*MAXN*LG2MXN ) - INTEGER LWORK -! PARAMETER ( LWORK = MAX( MAXN*( 4*MAXN+2 ), -! $ 2*LDAMAX+1+3*MAXN+2*MAXN*LG2MXN+3*MAXN**2 ) ) - INTEGER MAXIN, MAXPRM, MAXT, MAXSUB - PARAMETER ( MAXIN = 12, MAXPRM = 10, MAXT = 10, - $ MAXSUB = 20 ) - INTEGER LRWORK -! PARAMETER ( LRWORK = MAX( MAXIN*MAXT*MAXPRM, -! $ 1+3*MAXN+2*MAXN*LG2MXN+3*MAXN**2 ) ) - INTEGER NIN, NOUT - PARAMETER ( NIN = 5, NOUT = 6 ) - * .. ---- 262,273 ---- - INTEGER LIWRK2 - PARAMETER ( LIWRK2 = 6+6*MAXN+5*MAXN*LG2MXN ) - INTEGER LWORK -! PARAMETER ( LWORK = MAXN*( 4*MAXN+2 )) - INTEGER MAXIN, MAXPRM, MAXT, MAXSUB - PARAMETER ( MAXIN = 12, MAXPRM = 10, MAXT = 10, - $ MAXSUB = 20 ) - INTEGER LRWORK -! PARAMETER ( LRWORK = 1+3*MAXN+2*MAXN*LG2MXN+3*MAXN**2 ) - INTEGER NIN, NOUT - PARAMETER ( NIN = 5, NOUT = 6 ) - * .. |