X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;ds=sidebyside;f=source%2Funres%2Fdata%2Fio_units.f90;h=8b79b357ce03560f404d48867def4f022540b832;hb=bbbdc8e18680625d3004f414aec255e9ca7b7353;hp=ebda347ea3ed0500abce88f60b5b3b6ce20953b2;hpb=7c0faf2ccb6f94ed9a77aa527d3885ba054d3fb2;p=unres4.git

diff --git a/source/unres/data/io_units.f90 b/source/unres/data/io_units.f90
index ebda347..8b79b35 100644
--- 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