cmake src_CSA default -std=legacy

[unres.git] / source / cluster / unres / src / readrtns.F

diff --git a/source/cluster/unres/src/readrtns.F b/source/cluster/unres/src/readrtns.F
index 86d6dae..9838839 100644 (file)
--- a/source/cluster/unres/src/readrtns.F
+++ b/source/cluster/unres/src/readrtns.F
@@ -450,6 +450,7 @@ C Get the names and open the input files
           write (iout,*) cxfiles(i)(:ilen(cxfiles(i)))
         enddo
       else
+        intname=prefintin(:lenint)//'_clust'//'.int'
         intinname=prefintin(:lenint)//'.int'
       endif
       if (lprint_cart) then