Page Menu
Home
c4science
Search
Configure Global Search
Log In
Files
F102275104
cbka.blk
No One
Temporary
Actions
Download File
Edit File
Delete File
View Transforms
Subscribe
Mute Notifications
Award Token
Subscribers
None
File Metadata
Details
File Info
Storage
Attached
Created
Wed, Feb 19, 00:18
Size
5 KB
Mime Type
text/x-c
Expires
Fri, Feb 21, 00:18 (2 d)
Engine
blob
Format
Raw Data
Handle
24221734
Attached To
rLAMMPS lammps
cbka.blk
View Options
#include "reax_defs.h"
implicit real*8 (a-h,o-z),integer(i-n)
parameter (nneighmax=NNEIGHMAXDEF)
parameter (nat=NATDEF) !Max number of atoms
parameter (nattot=NATTOTDEF) !Max number of global atoms
parameter (nsort=NSORTDEF) !Max number of atom types
parameter (mbond=MBONDDEF) !Max number of bonds connected to one atom
parameter (na1mx3=3*nat) !3*max number of atoms
parameter (navib=NAVIBDEF) !for 2nd derivatives
parameter (nbotym=NBOTYMDEF) !Max number of bond types
parameter (nvatym=NVATYMDEF) !Max number of valency angle types
parameter (ntotym=NTOTYMDEF) !Max number of torsion angle types
parameter (nhbtym=NHBTYMDEF) !Max number of hydrogen bond types
parameter (nodmtym=NODMTYMDEF) !Max number of off-diagonal Morse types
parameter (nboallmax=NBOALLMAXDEF) !Max number of all bonds
parameter (nbomax=NBOMAXDEF) !Max number of bonds
parameter (nhbmax=NHBMAXDEF) !Max number of hydrogen bonds
parameter (nvamax=NVAMAXDEF) !Max number of valency angles
parameter (nopmax=NOPMAXDEF) !Max number of out of plane angles
parameter (ntomax=NTOMAXDEF) !Max number of torsion angles
parameter (npamax=NPAMAXDEF) !Max number of general parameters in force field
parameter (nmolmax=NMOLMAXDEF) !Max number of molecules in system
parameter (nmolset=NMOLSETDEF) !Max number of molecules in training set
parameter (mrestra=MRESTRADEF) !Max number of restraints
parameter (mtreg=MTREGDEF) !Max number of temperature regimes
parameter (mtzone=MTZONEDEF) !Max number of temperature zones
parameter (mvreg=MVREGDEF) !Max number of volume regimes
parameter (mvzone=MVZONEDEF) !Max number of volume zones
parameter (mereg=MEREGDEF) !Max number of electric field regimes
parameter (mezone=MEZONEDEF) !Max number of electric field zones
character*1 qr,qrset,qresi2
character*2 qaset,qadd
character*3 qresi1
character*5 qlabel,qffty,qbgfaxes,qbgfsgn,qresi3
character*20 qkeyw
character*25 qfile
character*40 qffield,qformat,qstrana2
character*60 qremark,qremset,qmolset
character*200 qstrana1
common
$/cbka/ dhbdc(nhbmax,3,3),cp(nat,3),
$ cadd(nat,3),d2(3*navib,3*navib),
$ veladd(3,nat),
$ aold(3,nat),dic(3,nat),pvdw1(nsort,nsort),
$ pvdw2(nsort,nsort),angimp(nat,6),
$ yt(na1mx3),pt(na1mx3),gi(na1mx3),enmolset(nmolset),
$ ai(na1mx3),bi(na1mx3),yi(na1mx3),pn(na1mx3),tbo(nat),
$ chgbgf(nattot),
$ abo2(nat),bor4(nat),bos(nbomax),
$ eldef(nat),vradic(nat),
$ vmo2(nat),
$ ro(nbomax),dbondr(nbomax),
$ dbosidr(nbomax),thgo(nopmax),
$ elmol(nmolmax),
$ elaf(nsort),vpq(nsort),
$ rvdw(nsort),alf(nsort),eps(nsort),chat(nsort),
$ rcore(nsort,nsort),ecore(nsort,nsort),acore(nsort,nsort),
$ vlp2(nsort),
$ valp2(nsort),vincr(nsort),
$ vval3(nsort),
$ vuncor(nbotym),
$ vop(nsort),
$ sigqeq(nsort),
$ rrcha(mrestra),
$ rmstra3(mrestra),
$ rmcha(mrestra),
$ rtcha(mrestra),rvcha(mrestra),
$ v2bo(ntotym),v3bo(ntotym),
$ eel,fctor,elr,
$ presx2,presy2,presz2,
$ tset2,
$ enmol,formol,vvol,tpnrad,
$ delvib,
$ taut2,tincr,xmasmd,
$ gdicmax,parc1,parc2,sumelec,
$ xinh,fsnh,vqnh,snh,ham,errnh,sumhe,
$ swa,swb2,swc0,swc1,swc2,swc3,swc4,swc5,swc6,
$ swc7,plr,endpo2,ccpar,
$ c4,estrmin,endpo,accincr,
$ endpoold,xadd,yadd,zadd,addist,taddmol,
$ Hug_E0, Hug_P0, Hug_V0, xImpVcm, shock_vel,
$ shock_z_sep
common
$/cbka/
$ ioop(nopmax,9),ifreqset(nmolset),
$ ijk(nat,4),icgeopt(nmolset),
$ irap(50),irdo(50,2),
$ ityadd(nat),
$ nmoloo(nat),iradic(nat),idef(nsort),nasort(nsort),
$ ibgr1(nattot),ibgr2(nattot),idupc(6),
$ imolsta(nat),
$ ncent2(nbomax),irads,nrdd,nrddf,nbiolab,nuge,
$ nbon2,npar,nodmty,ngnh,irac,nincrop,
$ nboty,mdstep,
$ nreac,
$ nbonop,icelo2,
$ iaddfreq,iveladd,invt,
$ noop,ndtau,
$ nelc3,nfc,nsav2,nmmax,ibh2,
$ nmmaxold,nfcold,icellold,imodfile,
$ icelo2old,inmov1,inmov2,nchaold,naa,nadattempt,
$ nequi,iadj,
$ ntest,nmm,
$ nmolo5o,nradcount,nmollset,iflga,
$ iperiod,ibgfversion,iremark,iconne,
$ kx,ky,kz,iexco,iruid,ibity,nvlist,
$ ityrad,iredo,iexx,iexy,iexz,ncellopt,
$ ndata2,nprob,nit,i5758,ingeo,nmoloold,itemp,
$ icgeo,ishock_type,isymm,
$ qadd(nat),qlabel(nattot),qffty(nattot),qresi1(nattot),
$ qresi2(nattot),qresi3(nattot),
$ qremark(20),qformat(20),qr,qffield,
$ qstrana1,qstrana2,qmolset(nmolset)
***********************************************************************
Event Timeline
Log In to Comment