correction in new ions and clusterfix

[unres4.git] / source / unres / data / io_units.F90

diff --git a/source/unres/data/io_units.F90 b/source/unres/data/io_units.F90
index 909e6fd..764889b 100644 (file)
--- a/source/unres/data/io_units.F90
+++ b/source/unres/data/io_units.F90
@@ -17,7 +17,7 @@
        ithep_pdb,irotam_pdb,iliptranpar,itube,   &
        ibond_nucl,ithep_nucl,irotam_nucl,itorp_nucl,itordp_nucl,     &
        isidep_nucl,iscpp_nucl,isidep_scbase,isidep_pepbase,isidep_scpho,&
-       isidep_peppho,iion      
+       isidep_peppho,iion,iionnucl      
 #ifdef WHAM_RUN
 ! el wham iounits
       integer :: isidep1,ihist,iweight,izsc,idistr
@@ -50,7 +50,7 @@
        bondname_nucl,thetname_nucl,rotname_nucl,torname_nucl, &
        tordname_nucl,sidename_nucl,scpname_nucl,              &
        sidename_scbase,pepname_pepbase,pepname_scpho,pepname_peppho, &
-       ionname
+       ionname,ionnuclname
 !-----------------------------------------------------------------------
 ! INP    - main input file
 ! IOUT   - list file