adding ebend_nucl to UCGM+some further reading

[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 ebda347..8b79b35 100644 (file)
--- a/source/unres/data/io_units.f90
+++ b/source/unres/data/io_units.f90
@@ -14,7 +14,9 @@
       integer :: inp,iout,igeom,intin,ipdb,imol2,ipdbin,ithep,irotam,&
        itorp,itordp,ifourier,ielep,isidep,iscpp,icbase,istat,ientin,&
        ientout,izs1,isecpred,ibond,irest2,iifrag,icart,irest1,isccor,&
-       ithep_pdb,irotam_pdb,iliptranpar,itube
+       ithep_pdb,irotam_pdb,iliptranpar,itube,   &
+       ibond_nucl,ithep_nucl,irotam_nucl,itorp_nucl,itordp_nucl,     &
+       isidep_nucl      
 #ifdef WHAM_RUN
 ! el wham iounits
       integer :: isidep1,ihist,iweight,izsc,idistr
@@ -43,7 +45,9 @@
 !      common /parfiles/
       character(len=256) :: bondname,thetname,rotname,torname,tordname,&
        fouriername,elename,sidename,scpname,sccorname,patname,&
-       thetname_pdb,rotname_pdb,liptranname,tubename
+       thetname_pdb,rotname_pdb,liptranname,tubename,         &
+       bondname_nucl,thetname_nucl,rotname_nucl,torname_nucl, &
+       tordname_nucl,sidename_nucl
 !-----------------------------------------------------------------------
 ! INP    - main input file
 ! IOUT   - list file