cluster_wham iss(idssb(k)-nres)+nres
[unres.git] / source / cluster / wham / src-M-SAXS-homology / probabl.F
index a26d67a..a3a664b 100644 (file)
@@ -139,7 +139,6 @@ C          call flush(iout)
           write (structure(9:),'(bz,i6.6)') i
           call TMscore_sub(rmsdev,gdt_ts_tb(i),
      &    gdt_ha_tb(i),tmscore_tb(i),Structure,.false.)
-#define DEBUG 
 #ifdef DEBUG
           write (iout,*) rmsdev,gdt_ts_tb(i),gdt_ha_tb(i),
      &      tmscore_tb(i)