diff options
| author | Satoshi Taoka <taoka@FreeBSD.org> | 1999-05-06 08:23:21 +0000 |
|---|---|---|
| committer | Satoshi Taoka <taoka@FreeBSD.org> | 1999-05-06 08:23:21 +0000 |
| commit | f9974dbc463c89f0329cb2ef9933fb4752205253 (patch) | |
| tree | ac80e411b0b969e6dee2e767b19f54e13f972b70 /biology/mopac/files/patch-aa | |
| parent | d05574972e8354015c6e7d70fe75309e79bf9ea2 (diff) | |
Notes
Diffstat (limited to 'biology/mopac/files/patch-aa')
| -rw-r--r-- | biology/mopac/files/patch-aa | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/biology/mopac/files/patch-aa b/biology/mopac/files/patch-aa new file mode 100644 index 000000000000..9b80aaaa373d --- /dev/null +++ b/biology/mopac/files/patch-aa @@ -0,0 +1,20 @@ +*** matou1.f.2 Wed Apr 23 16:26:50 1997 +--- matou1.f Wed Apr 23 16:32:56 1997 +*************** +*** 2,8 **** + IMPLICIT DOUBLE PRECISION (A-H,O-Z) + INCLUDE 'SIZES' + PARAMETER (MXDIM=MAXPAR+NUMATM) +! PARAMETER (MAXDIM=MAX(MAXORB,3*NUMATM)) + DIMENSION A(NR,NR),B(NDIM) + COMMON /MOLKST/ NUMAT,NAT(NUMATM),NFIRST(NUMATM),NMIDLE(NUMATM), + 1 NLAST(NUMATM), NORBS, NELECS,NALPHA,NBETA, +--- 2,9 ---- + IMPLICIT DOUBLE PRECISION (A-H,O-Z) + INCLUDE 'SIZES' + PARAMETER (MXDIM=MAXPAR+NUMATM) +! C PARAMETER (MAXDIM=MAX(MAXORB,3*NUMATM)) +! PARAMETER (MAXDIM=(MAXORB+3*NUMATM)) + DIMENSION A(NR,NR),B(NDIM) + COMMON /MOLKST/ NUMAT,NAT(NUMATM),NFIRST(NUMATM),NMIDLE(NUMATM), + 1 NLAST(NUMATM), NORBS, NELECS,NALPHA,NBETA, |