mirror of
https://github.com/QuantumPackage/qp2.git
synced 2024-09-07 19:44:44 +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
|