X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fwham%2Fsrc-HCD-5D%2Fread_constr_homology.F;h=ab9901d31b80752847d765b4dc2aaa1a686c6449;hb=b3efc8d5acc9051f49c246721f0d1f78dde46d01;hp=7884fd5a52f3766d96da2a12662c6092da2a3e46;hpb=a30bd29e64da2aa47b84963fdd0bf4192ead2738;p=unres.git diff --git a/source/wham/src-HCD-5D/read_constr_homology.F b/source/wham/src-HCD-5D/read_constr_homology.F index 7884fd5..ab9901d 100644 --- a/source/wham/src-HCD-5D/read_constr_homology.F +++ b/source/wham/src-HCD-5D/read_constr_homology.F @@ -184,14 +184,13 @@ c write(iout,*) "tpl_k_rescore - ",tpl_k_rescore do irec=nnt,nct ! loop for reading res sim if (read2sigma) then read (ientin,*,end=1401) i_tmp,rescore2_tmp,rescore_tmp, - & idomain_tmp, & rescore3_tmp,idomain_tmp i_tmp=i_tmp+nnt-1 idomain(k,i_tmp)=idomain_tmp rescore(k,i_tmp)=rescore_tmp rescore2(k,i_tmp)=rescore2_tmp rescore3(k,i_tmp)=rescore3_tmp - write(iout,'(a7,i5,2f10.5,i5)') "rescore", + write(iout,'(a7,i5,3f10.5,i5)') "rescore", & i_tmp,rescore2_tmp,rescore_tmp, & rescore3_tmp,idomain_tmp else