hdiff output

r31120/keywords.f 2016-09-07 10:30:14.832463495 +0100 r31119/keywords.f 2016-09-07 10:30:15.092466978 +0100
219:          DUMPINTEOS=.FALSE.219:          DUMPINTEOS=.FALSE.
220:          DUMPINTXYZFREQ=100220:          DUMPINTXYZFREQ=100
221:          DUMPINTEOSFREQ=100221:          DUMPINTEOSFREQ=100
222:          KINT=0.0D0222:          KINT=0.0D0
223:          QCIAMBERT=.FALSE.223:          QCIAMBERT=.FALSE.
224: 224: 
225: ! ns644>    Adding the TWIST keyword:225: ! ns644>    Adding the TWIST keyword:
226:       TWISTT=.FALSE.226:       TWISTT=.FALSE.
227:       NTWISTGROUPS=0227:       NTWISTGROUPS=0
228: 228: 
229: !     ds656>    COORDS and LABELS allocated here229: ! ds656>    COORDS and LABELS allocated here
230:       ALLOCATE( FIXSTEP(1),FIXTEMP(1),FIXBOTH(1),TEMP(1),ACCRAT(1),STEP(1),ASTEP(1),OSTEP(1),BLOCK(1),NT(1),NQ(1),EPREV(1),230:       ALLOCATE(FIXSTEP(1),FIXTEMP(1),FIXBOTH(1),TEMP(1),ACCRAT(1),STEP(1),ASTEP(1),OSTEP(1),BLOCK(1),NT(1),NQ(1),EPREV(1),
231:      &     JUMPMOVE(1),JUMPINT(1),JDUMP(1),COORDS(3*NATOMSALLOC,1),LABELS(NATOMSALLOC,1),COORDSO(3*NATOMSALLOC,1),231:      @         JUMPMOVE(1),JUMPINT(1),JDUMP(1),COORDS(3*NATOMSALLOC,1),LABELS(NATOMSALLOC,1), COORDSO(3*NATOMSALLOC,1), LABELSO(NATOMSALLOC,1), 
232:      &     LABELSO(NATOMSALLOC,1),VAT(NATOMSALLOC,1),VATO(NATOMSALLOC,1),232:      @         VAT(NATOMSALLOC,1), VATO(NATOMSALLOC,1),  
233:      &     JUMPTO(1),SHELLMOVES(1),PTGROUP(1),NSURFMOVES(1),NCORE(1) )233:      @         JUMPTO(1),SHELLMOVES(1),PTGROUP(1),NSURFMOVES(1),NCORE(1))
234:       DO JP=1,1234:       DO JP=1,1
235:          EPREV(JP)=1.0D100235:          EPREV(JP)=1.0D100
236:          FIXSTEP(JP)=.FALSE.236:          FIXSTEP(JP)=.FALSE.
237:          FIXTEMP(JP)=.FALSE.237:          FIXTEMP(JP)=.FALSE.
238:          FIXBOTH(JP)=.FALSE.238:          FIXBOTH(JP)=.FALSE.
239:          TEMP(JP)=0.3D0239:          TEMP(JP)=0.3D0
240:          ACCRAT(JP)=0.5D0240:          ACCRAT(JP)=0.5D0
241:          STEP(JP)=0.3D0241:          STEP(JP)=0.3D0
242:          ASTEP(JP)=0.3D0242:          ASTEP(JP)=0.3D0
243:          OSTEP(JP)=0.3D0243:          OSTEP(JP)=0.3D0
4624:          CALL create_mtargets_array(TARGETS)4624:          CALL create_mtargets_array(TARGETS)
4625: 4625: 
4626:          DEALLOCATE(TARGETS)4626:          DEALLOCATE(TARGETS)
4627: 4627: 
4628: !4628: !
4629: !  MPI keyword4629: !  MPI keyword
4630: !4630: !
4631:       ELSE IF (WORD.EQ.'MPI') THEN4631:       ELSE IF (WORD.EQ.'MPI') THEN
4632:          MPIT=.TRUE.4632:          MPIT=.TRUE.
4633:          DEALLOCATE(FIXSTEP,FIXTEMP,FIXBOTH,TEMP,ACCRAT,STEP,ASTEP,OSTEP,BLOCK,NT,JUMPMOVE,JUMPINT,JDUMP,COORDS,LABELS,NQ,4633:          DEALLOCATE(FIXSTEP,FIXTEMP,FIXBOTH,TEMP,ACCRAT,STEP,ASTEP,OSTEP,BLOCK,NT,JUMPMOVE,JUMPINT,JDUMP,COORDS,LABELS,NQ,
4634:      &        JUMPTO,EPREV,COORDSO,LABELSO,VAT,VATO,SHELLMOVES,PTGROUP,NSURFMOVES,NCORE)4634:      @              JUMPTO,EPREV,COORDSO,LABELSO,VAT,VATO,SHELLMOVES,PTGROUP,NSURFMOVES,NCORE)
4635:          4635:          ALLOCATE(FIXSTEP(NPAR),FIXTEMP(NPAR),FIXBOTH(NPAR),TEMP(NPAR),ACCRAT(NPAR),STEP(NPAR),ASTEP(NPAR),OSTEP(NPAR),
4636:          ALLOCATE( FIXSTEP(NPAR),FIXTEMP(NPAR),FIXBOTH(NPAR),TEMP(NPAR),ACCRAT(NPAR),STEP(NPAR),ASTEP(NPAR),OSTEP(NPAR),4636:      @         BLOCK(NPAR),NT(NPAR),JUMPMOVE(NPAR),JUMPINT(NPAR),JDUMP(NPAR),COORDS(3*NATOMSALLOC,NPAR),LABELS(NATOMSALLOC,NPAR),NQ(NPAR),
4637:      &        BLOCK(NPAR),NT(NPAR),JUMPMOVE(NPAR),JUMPINT(NPAR),JDUMP(NPAR),COORDS(3*NATOMSALLOC,NPAR),NQ(NPAR),4637:      @         JUMPTO(NPAR),EPREV(NPAR),
4638:      &        JUMPTO(NPAR),EPREV(NPAR),COORDSO(3*NATOMSALLOC,NPAR),VAT(NATOMSALLOC,NPAR),VATO(NATOMSALLOC,NPAR),4638:      @         COORDSO(3*NATOMSALLOC,NPAR),LABELSO(NATOMSALLOC,NPAR), VAT(NATOMSALLOC,NPAR),VATO(NATOMSALLOC,NPAR))
4639:      &        LABELS(NATOMSALLOC,NPAR),LABELSO(NATOMSALLOC,NPAR) ) 
4640:          ALLOCATE(SHELLMOVES(NPAR))4639:          ALLOCATE(SHELLMOVES(NPAR))
4641:          ALLOCATE(PTGROUP(NPAR))4640:          ALLOCATE(PTGROUP(NPAR))
4642:          ALLOCATE(NSURFMOVES(NPAR))4641:          ALLOCATE(NSURFMOVES(NPAR))
4643:          ALLOCATE(NCORE(NPAR))4642:          ALLOCATE(NCORE(NPAR))
4644:          DO JP=1,NPAR4643:          DO JP=1,NPAR
4645:             EPREV(JP)=1.0D1004644:             EPREV(JP)=1.0D100
4646:             FIXSTEP(JP)=.FALSE.4645:             FIXSTEP(JP)=.FALSE.
4647:             FIXTEMP(JP)=.FALSE.4646:             FIXTEMP(JP)=.FALSE.
4648:             FIXBOTH(JP)=.FALSE.4647:             FIXBOTH(JP)=.FALSE.
4649:             TEMP(JP)=0.3D04648:             TEMP(JP)=0.3D0
4931:          ENDDO4930:          ENDDO
4932: 4931: 
4933: !4932: !
4934: !  PARALLEL must come before STEP and ACCRAT4933: !  PARALLEL must come before STEP and ACCRAT
4935: !  This keyword is for the serial parallel implementation - now obsolete.4934: !  This keyword is for the serial parallel implementation - now obsolete.
4936: !4935: !
4937:       ELSE IF (WORD.EQ.'PARALLEL') THEN4936:       ELSE IF (WORD.EQ.'PARALLEL') THEN
4938:          PARALLELT=.TRUE.4937:          PARALLELT=.TRUE.
4939:          CALL READI(NPAR)4938:          CALL READI(NPAR)
4940:          DEALLOCATE(FIXSTEP,FIXTEMP,FIXBOTH,TEMP,ACCRAT,STEP,ASTEP,OSTEP,BLOCK,NT,JUMPMOVE,JUMPINT,JDUMP,COORDS,LABELS,NQ,4939:          DEALLOCATE(FIXSTEP,FIXTEMP,FIXBOTH,TEMP,ACCRAT,STEP,ASTEP,OSTEP,BLOCK,NT,JUMPMOVE,JUMPINT,JDUMP,COORDS,LABELS,NQ,
4941:      &        JUMPTO,EPREV,COORDSO,LABELSO,VAT,VATO,SHELLMOVES,PTGROUP,NSURFMOVES,NCORE ) 4940:      @              JUMPTO,EPREV,COORDSO,LABELSO,VAT,VATO,SHELLMOVES,PTGROUP,NSURFMOVES,NCORE) 
4942:          ALLOCATE( FIXSTEP(NPAR),FIXTEMP(NPAR),FIXBOTH(NPAR),TEMP(NPAR),ACCRAT(NPAR),STEP(NPAR),ASTEP(NPAR),OSTEP(NPAR), 4941:          ALLOCATE(FIXSTEP(NPAR),FIXTEMP(NPAR),FIXBOTH(NPAR),TEMP(NPAR),ACCRAT(NPAR),STEP(NPAR),ASTEP(NPAR),OSTEP(NPAR), 
4943:      &        BLOCK(NPAR),NT(NPAR),JUMPMOVE(NPAR),JUMPINT(NPAR),JDUMP(NPAR),NQ(NPAR),JUMPTO(NPAR),4942:      @         BLOCK(NPAR),NT(NPAR),JUMPMOVE(NPAR),JUMPINT(NPAR),JDUMP(NPAR),NQ(NPAR),JUMPTO(NPAR),
4944:      &        COORDS(3*NATOMSALLOC,NPAR),LABELS(NATOMSALLOC,NPAR),4943:      &         COORDS(3*NATOMSALLOC,NPAR), LABELS(NATOMSALLOC,NPAR),
4945:      &        COORDSO(3*NATOMSALLOC,NPAR),LABELSO(NATOMSALLOC,NPAR),VAT(NATOMSALLOC,NPAR),VATO(NATOMSALLOC,NPAR),EPREV(NPAR),4944:      @         COORDSO(3*NATOMSALLOC,NPAR), LABELSO(NATOMSALLOC,NPAR), VAT(NATOMSALLOC,NPAR),VATO(NATOMSALLOC,NPAR),EPREV(NPAR),SHELLMOVES(NPAR),PTGROUP(NPAR),
4946:      &        NSURFMOVES(NPAR),NCORE(NPAR),REPLOW(NPAR),SHELLMOVES(NPAR),PTGROUP(NPAR) )4945:      @         NSURFMOVES(NPAR),NCORE(NPAR),REPLOW(NPAR))
4947:          NATOMS=NATOMS/NPAR4946:          NATOMS=NATOMS/NPAR
4948:          DO JP=1,NPAR4947:          DO JP=1,NPAR
4949:             FIXSTEP(JP)=.FALSE.4948:             FIXSTEP(JP)=.FALSE.
4950:             FIXTEMP(JP)=.FALSE.4949:             FIXTEMP(JP)=.FALSE.
4951:             FIXBOTH(JP)=.FALSE.4950:             FIXBOTH(JP)=.FALSE.
4952:             TEMP(JP)=0.3D04951:             TEMP(JP)=0.3D0
4953:             ACCRAT(JP)=0.5D04952:             ACCRAT(JP)=0.5D0
4954:             STEP(JP)=0.3D04953:             STEP(JP)=0.3D0
4955:             ASTEP(JP)=0.3D04954:             ASTEP(JP)=0.3D0
4956:             OSTEP(JP)=0.3D04955:             OSTEP(JP)=0.3D0


legend
Lines Added 
Lines changed
 Lines Removed

hdiff - version: 2.1.0