X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_CSA%2Freadrtns_csa.F;h=a00df40a0fa75d7a4ee8a32d1779e70247566e91;hb=deb02dfebfe0faeb2b03fbb9221bbbc85d4d269a;hp=c67d045e1cb2c5ae7104a0fcf5418d64bcd40e0b;hpb=a45ce81aae2c857c30b821e39e45a7a08356de4d;p=unres.git

diff --git a/source/unres/src_CSA/readrtns_csa.F b/source/unres/src_CSA/readrtns_csa.F
index c67d045..a00df40 100644
--- a/source/unres/src_CSA/readrtns_csa.F
+++ b/source/unres/src_CSA/readrtns_csa.F
@@ -1131,6 +1131,9 @@ c!bankt
       call readi(mcmcard,'NCONF_IN',nconf_in,0)
       call reada(mcmcard,'RDIH_BIAS',rdih_bias,0.5d0)
       write (iout,*) "NCONF_IN",nconf_in
+      tm_score=(index(mcmcard,'TMSCORE').gt.0)
+      if (tm_score) write (iout,*) "Using TM_Score instead of DIFF",
+     &      " for torsional angles" 
       return
       end