source: ThirdParty/Mumps/trunk/mumps.patch @ 2737

Last change on this file since 2737 was 2737, checked in by stefan, 8 years ago

add patch to work around bug in Mumps AMF ordering

  • Property svn:eol-style set to native
File size: 970 bytes
  • src/dmumps_part2.F

    diff -Nu MUMPS.orig/src/dmumps_part2.F MUMPS/src/dmumps_part2.F
    old new  
    11461146      IF ( (KEEP(50).EQ.2)
    11471147     & .AND. (KEEP(95) .EQ. 3)
    11481148     & .AND. (IORD .EQ. 7) ) THEN 
    1149         IORD = 2
     1149        IORD = 6
    11501150      ENDIF
    11511151      CALL DMUMPS_701( N, KEEP(50), NSLAVES, IORD,
    11521152     &     symmetry, MedDens, NBQD, AvgDens,
     
    36423642             IF (NBQD.GE.MAXQD) THEN
    36433643               IORD = 6         
    36443644             ELSE
    3645                IORD = 2         
     3645               IORD = 6         
    36463646             ENDIF
    36473647          ELSE
    36483648             IF (NBQD.GE.MedDens*NPROCS) THEN
     
    36683668            IF (NBQD.GE.MAXQD) THEN
    36693669              IORD = 6 
    36703670            ELSE
    3671               IORD = 2   
     3671              IORD = 6   
    36723672            ENDIF
    36733673          ELSE
    36743674            IF (NBQD.GE.MedDens*NPROCS) THEN
Note: See TracBrowser for help on using the repository browser.