Naprawienie wham'a oraz wprowadzenie SCcorr do CSA

[unres.git] / source / unres / src_MD-M / int_to_cart.f

diff --git a/source/unres/src_MD-M/int_to_cart.f b/source/unres/src_MD-M/int_to_cart.f
index e178afe..12ebe53 100644 (file)
--- a/source/unres/src_MD-M/int_to_cart.f
+++ b/source/unres/src_MD-M/int_to_cart.f
@@ -78,7 +78,7 @@ c    If there are more than five residues
         enddo
       endif    
 c  Setting dE/ddnres-2      
-      write(iout,*) "ATUCHUJ?" 
+C      write(iout,*) "ATUCHUJ?" 
       if(nres.gt.5) then
          do j=1,3
            gcart(j,nres-2)=gcart(j,nres-2)+gloc(nres-4,icg)*
@@ -116,7 +116,7 @@ c   The side-chain vector derivatives
             enddo
          endif     
        enddo
-       write(iout,*) "TU DOCHODZE"
+C       write(iout,*) "TU DOCHODZE"
                                                                                                                                                        
 c----------------------------------------------------------------------
 C INTERTYP=1 SC...Ca...Ca...Ca