mirror of
https://github.com/LCPQ/DEHam
synced 2024-06-16 02:05:29 +02:00
23 lines
507 B
Fortran
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
|