integer inp,iout,igeom,intin,ipdb,imol2,ipdbin,ithep,irotam,
& itorp,itordp,ifourier,ielep,isidep,iscpp,isccor,icbase,
& istat,ientin,ientout,isidep1,ibond,ihist,izsc,idistr,
- & iliptranpar
+ & iliptranpar,itube
common /iounits/ inp,iout,igeom,intin,ipdb,imol2,ipdbin,ithep,
& irotam,itorp,itordp,ifourier,ielep,isidep,iscpp,isccor,
& icbase,istat,ientin,ientout,isidep1,ibond,ihist,izsc,
- & idistr,iliptranpar
+ & idistr,iliptranpar,itube
character*256 outname,intname,pdbname,mol2name,statname,intinname,
& entname,restartname,prefix,scratchdir,sidepname,pdbfile,
& histname,zscname
C Parameter files
character*256 bondname,thetname,rotname,torname,tordname,
& fouriername,elename,sidename,scpname,sccorname,patname,
- & liptranname
+ & liptranname,tubename
common /parfiles/ thetname,rotname,torname,tordname,bondname,
& fouriername,elename,sidename,scpname,sccorname,patname,
- & liptranname
+ & liptranname,tubename
character*3 pot
C-----------------------------------------------------------------------
C INP - main input file