We cannot guarentee that the pGens are going to be the same - in fact, generally, they wont be.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | nI(nel) | |||
| integer(kind=n_int), | intent(in) | :: | iLutnI(0:niftot) | |||
| integer, | intent(out) | :: | nJ(nel) | |||
| integer(kind=n_int), | intent(out) | :: | iLutnJ(0:niftot) | |||
| integer, | intent(in) | :: | exFlag | |||
| integer, | intent(out) | :: | IC | |||
| integer, | intent(out) | :: | ExcitMat(2,maxExcit) | |||
| logical, | intent(out) | :: | tParity | |||
| real(kind=dp), | intent(out) | :: | pGen | |||
| real(kind=dp), | intent(out) | :: | HEl | |||
| type(excit_gen_store_type), | intent(inout), | target | :: | store | ||
| integer, | intent(in), | optional | :: | part_type |