timlim function ovrtim only on master and MPI_Bcast

[unres.git] / source / wham / src / cxread.F

diff --git a/source/wham/src/cxread.F b/source/wham/src/cxread.F
index 7c7ae50..5c6d751 100644 (file)
--- a/source/wham/src/cxread.F
+++ b/source/wham/src/cxread.F
@@ -84,7 +84,7 @@ c      print *,"bumbum"
       call xdrfint_(ixdrf, nprop, iret)
       if (umbrella(iparm) .or. homol_nset.gt.1 .or. read_iset(iparm) 
      &  .or. hamil_rep) 
-     &  call xdrfint(ixdrf, iset, iret)
+     &  call xdrfint_(ixdrf, iset, iret)
       do i=1,nprop
         call xdrffloat_(ixdrf, rprop(i), iret)
       enddo