hdiff output

r31961/rigidb.f90 2017-02-23 10:30:12.674111183 +0000 r31960/rigidb.f90 2017-02-23 10:30:12.898114133 +0000
513:       CMX       = 0.D0513:       CMX       = 0.D0
514:       CMY       = 0.D0514:       CMY       = 0.D0
515:       CMZ       = 0.D0515:       CMZ       = 0.D0
516: 516: 
517:       SHIFTED = .TRUE.517:       SHIFTED = .TRUE.
518:       IF (EFIELDT) THEN518:       IF (EFIELDT) THEN
519:           NZERO = 4519:           NZERO = 4
520:       ELSE520:       ELSE
521:           NZERO = 6521:           NZERO = 6
522:       ENDIF522:       ENDIF
523: ! bug fix for pgi compiler 
524:       IF(.NOT.ALLOCATED(UNIAXARRAY)) ALLOCATE(UNIAXARRAY(NATOMS/2)) 
525: 523: 
526:       DO I = 1, NATOMS/2524:       DO I = 1, NATOMS/2
527: 525: 
528:          J = 3*I526:          J = 3*I
529: 527: 
530:          CMX = CMX + Q(J-2)528:          CMX = CMX + Q(J-2)
531:          CMY = CMY + Q(J-1)529:          CMY = CMY + Q(J-1)
532:          CMZ = CMZ + Q(J)530:          CMZ = CMZ + Q(J)
533: 531: 
534:       ENDDO532:       ENDDO


legend
Lines Added 
Lines changed
 Lines Removed

hdiff - version: 2.1.0