small cleaning
[unres4.git] / source / wham / conform_compar.f90
index e983f7f..701e920 100644 (file)
        use w_comm_local
        integer :: nfrg,nlev
 
-write(iout,*) "in alloc conpar arrays: nlevel=", nlevel," nfrag(1)=",nfrag(1)
+!write(iout,*) "in alloc conpar arrays: nlevel=", nlevel," nfrag(1)=",nfrag(1)
 !------------------------
 ! commom.contacts
 !      common /contacts/