X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;ds=sidebyside;f=source%2Fwham%2Fsrc-M%2Fmolread_zs.F;h=3e09be567dfb418fb63a4d530e56b8e7da67f667;hb=cc8bbed784599574de0b4dc917e99ff438a6c6d5;hp=48ce1893d4a8d1188e08fbb0fcc7a8ea380cc41f;hpb=d4479dd2119d03a168ef9526875205081c53e5a9;p=unres.git diff --git a/source/wham/src-M/molread_zs.F b/source/wham/src-M/molread_zs.F index 48ce189..3e09be5 100644 --- a/source/wham/src-M/molread_zs.F +++ b/source/wham/src-M/molread_zs.F @@ -67,6 +67,10 @@ C Convert sequence to numeric code itel(i)=2 endif enddo + write (iout,*) "ITEL" + do i=1,nres-1 + write (iout,*) i,itype(i),itel(i) + enddo call read_bridge if (with_dihed_constr) then