mirror of
https://github.com/QuantumPackage/qp2.git
synced 2024-07-06 19:25:49 +02:00
11 lines
288 B
Fortran
11 lines
288 B
Fortran
BEGIN_PROIDER[ integer, NSOMOMax]
|
|
implicit none
|
|
BEGIN_DOC
|
|
! Documentation for NSOMOMax
|
|
! The maximum number of SOMOs for the current calculation.
|
|
! required for the calculation of prototype arrays.
|
|
END_DOC
|
|
NSOMOMax = 8
|
|
NCSFMAx = 14 ! TODO: NCSFs for MS=0
|
|
END_PROVIDER
|