mirror of
https://github.com/LCPQ/DEHam
synced 2024-10-18 05:51:36 +02:00
10 lines
159 B
FortranFixed
10 lines
159 B
FortranFixed
|
BEGIN_PROVIDER [integer, nnk]
|
||
|
|
||
|
implicit none
|
||
|
BEGIN_DOC
|
||
|
! provides nnk = total number of non zero elements in H
|
||
|
END_DOC
|
||
|
|
||
|
nnk=0
|
||
|
END_PROVIDER
|