Revision 3 utils/Xyz2Path.f

Xyz2Path.f (revision 3)
130 130
!           write(*,*) I,Atoms(I),Mass(I),geos1(:,I)
131 131
         END DO
132 132

  
133
         Nat=nnn
134

  
133 135
         if (FExist) THEN
134 136
         open(14,file='list')
135 137
         Type="d"

Also available in: Unified diff