ENDMDL cluster_wham/src
authorCezary Czaplewski <czarek@chem.univ.gda.pl>
Thu, 5 Apr 2018 08:37:48 +0000 (10:37 +0200)
committerCezary Czaplewski <czarek@chem.univ.gda.pl>
Thu, 5 Apr 2018 08:37:48 +0000 (10:37 +0200)
source/cluster/wham/src/geomout.F

index f7dc611..8d9440d 100644 (file)
@@ -48,6 +48,7 @@
       do i=1,nss
         write (ipdb,30) ica(ihpb(i))+1,ica(jhpb(i))+1
       enddo
+      write (ipdb,'(a6)') 'ENDMDL'
   10  FORMAT ('ATOM',I7,'  CA  ',A3,I6,4X,3F8.3,f6.2,f6.2)
   20  FORMAT ('ATOM',I7,'  CB  ',A3,I6,4X,3F8.3,f6.2,f6.2)
   30  FORMAT ('CONECT',8I5)