X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fdata%2Fio_units.f90;h=762eda08bbf8860e3f5ee791cbc5bb9e3d68cf22;hb=365d8ef5f0d267dc8ad542b254c40d921c1043b9;hp=e470892fe69830fe19064b5c13e9a7b50bb851bc;hpb=299e2c41124d3fa8adba7244716515a2cc160ed1;p=unres4.git diff --git a/source/unres/data/io_units.f90 b/source/unres/data/io_units.f90 index e470892..762eda0 100644 --- a/source/unres/data/io_units.f90 +++ b/source/unres/data/io_units.f90 @@ -14,7 +14,10 @@ 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 + 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,& + iion #ifdef WHAM_RUN ! el wham iounits integer :: isidep1,ihist,iweight,izsc,idistr @@ -43,7 +46,11 @@ ! common /parfiles/ character(len=256) :: bondname,thetname,rotname,torname,tordname,& fouriername,elename,sidename,scpname,sccorname,patname,& - thetname_pdb,rotname_pdb + thetname_pdb,rotname_pdb,liptranname,tubename, & + bondname_nucl,thetname_nucl,rotname_nucl,torname_nucl, & + tordname_nucl,sidename_nucl,scpname_nucl, & + sidename_scbase,pepname_pepbase,pepname_scpho, & + ionname !----------------------------------------------------------------------- ! INP - main input file ! IOUT - list file