5D update

[unres.git] / source / wham / src-HCD-5D / read_constr_homology.F

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 (file)
--- 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