DEHam/src/natomax.irp.f

23 lines
507 B
Fortran

BEGIN_PROVIDER [integer, natomax]
&BEGIN_PROVIDER [integer, jrangmax]
&BEGIN_PROVIDER [integer, maxial]
&BEGIN_PROVIDER [integer, maxlien]
&BEGIN_PROVIDER [integer, maxplac]
&BEGIN_PROVIDER [integer, maxdet]
&BEGIN_PROVIDER [integer, nrows]
BEGIN_DOC
! provides natomax=22
! provides jrangmax=705432
! provides maxial=20
! provides maxlien=42
END_DOC
implicit none
natomax=900
jrangmax=10705432
maxial=20
maxlien=900
maxplac=20
maxdet=10000
END_PROVIDER