hdiff output

r27328/amberinterface.f 2017-03-30 13:31:02.156939658 +0100 r27327/amberinterface.f 2017-03-30 13:31:02.460943698 +0100
3312: !this makes the conversion quicker - don't search for atoms you have already found3312: !this makes the conversion quicker - don't search for atoms you have already found
3313:       use modamber93313:       use modamber9
3314:       use commons, only : NATOMS 3314:       use commons, only : NATOMS 
3315:       INTEGER :: i, j , k, atom, var, var23315:       INTEGER :: i, j , k, atom, var, var2
3316:       INTEGER, INTENT(IN) :: atomOffset, nat_res, nat_res2, a_index3316:       INTEGER, INTENT(IN) :: atomOffset, nat_res, nat_res2, a_index
3317:       LOGICAL :: found3317:       LOGICAL :: found
3318:       INTEGER :: last_icno3318:       INTEGER :: last_icno
3319:       INTEGER :: atom_list(22)3319:       INTEGER :: atom_list(22)
3320: !      INTEGER, INTENT(OUT) :: IC_COORDS(nres*95+5*nres,4)3320: !      INTEGER, INTENT(OUT) :: IC_COORDS(nres*95+5*nres,4)
3321:       INTEGER :: IC_START(*) !for each amino acid:where info in ICATOMS starts 3321:       INTEGER :: IC_START(*) !for each amino acid:where info in ICATOMS starts 
3322: !     CHARACTER(LEN=4) :: IC_ATOMS(1250)!(1121) !IMP if improper3322:       CHARACTER(LEN=4) :: IC_ATOMS(1250)!(1121) !IMP if improper
3323:       CHARACTER(LEN=4) :: IC_ATOMS(*)!(1121) !IMP if improper 
3324:       CHARACTER(LEN=4) :: CA_atomname !CA normal, CH3 for NME3323:       CHARACTER(LEN=4) :: CA_atomname !CA normal, CH3 for NME
3325: !      CHARACTER(LEN=3), INTENT(OUT) :: IC_IMPROP(nres*95+5*nres)3324: !      CHARACTER(LEN=3), INTENT(OUT) :: IC_IMPROP(nres*95+5*nres)
3326:       INTEGER :: IC_NOS(1250) !IC_ATOMS with numbers per amino acid3325:       INTEGER :: IC_NOS(1250) !IC_ATOMS with numbers per amino acid
3327:                   ! number i: occurs for first time at place i 3326:                   ! number i: occurs for first time at place i 
3328: ! finds the atom indexes (numbers) for the internal coordinates per amino acid3327: ! finds the atom indexes (numbers) for the internal coordinates per amino acid
3329: ! a_index - amino acid number, eg 2 for ARG3328: ! a_index - amino acid number, eg 2 for ARG
3330: ! nat_res - number of atoms per amino acid3329: ! nat_res - number of atoms per amino acid
3331: ! atomOffset - starting atom index for respective amino acid3330: ! atomOffset - starting atom index for respective amino acid
3332: ! lenic - current internal coordinate number (is counted up)3331: ! lenic - current internal coordinate number (is counted up)
3333: ! IC_START(i) - where IC atom names for amino acid i start in IC_COORDS3332: ! IC_START(i) - where IC atom names for amino acid i start in IC_COORDS


legend
Lines Added 
Lines changed
 Lines Removed

hdiff - version: 2.1.0