Searched refs:IREF_AL (Results 1 – 6 of 6) sorted by relevance
| /dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/lucia/ |
| H A D | lucia_gencc2.F | 1056 SUBROUTINE GET_REF_ALBE_OCC(IREFSPC,IREF_AL,IREF_BE) argument
1074 INTEGER IREF_AL(NGAS),IREF_BE(NGAS)
1092 IREF_AL(IGAS) = NORB
1095 IREF_AL(IGAS) = 0
1098 IREF_AL(IGAS) = NVAL_AL
1107 CALL IWRTMA(IREF_AL,1,NGAS,1,NGAS)
1113 SUBROUTINE GET_REF_ALBE_STR(IREFSPC,IREF_AL,IREF_BE) argument
1131 INTEGER IREF_AL(NGAS),IREF_BE(NGAS)
1159 IREF_AL(IOFF_AL-1+IORB) = IOFF-1+IORB
1166 IREF_AL(IOFF_AL-1+IORB) = IOFF-1+IORB
[all …]
|
| H A D | lucia_gencc.F | 5212 INTEGER IREF_AL(MXPNGAS),IREF_BE(MXPNGAS)
5249 CALL GET_REF_ALBE_OCC(IREFSPC,IREF_AL,IREF_BE)
5279 & IACT_SPC,IAAEXC,IREF_AL,IREF_BE,
5420 INTEGER IREF_AL(MXPNGAS),IREF_BE(MXPNGAS)
5449 CALL GET_REF_ALBE_OCC(IREFSPC,IREF_AL,IREF_BE)
5479 & IACT_SPC,IAAEXC,IREF_AL,IREF_BE,
5582 & NOBPT,IMSCOMB,IACT_SPC,IAAEXC,IREF_AL,IREF_BE,
5623 INTEGER IREF_AL(*),IREF_BE(*)
5724 IF(NAA(IGAS).GT.IREF_AL(IGAS) ) I_EXCLUDE = 1
5728 IF(NCA(IGAS)-NAA(IGAS)+IREF_AL(IGAS).GT.NOBPT(IGAS))
|
| H A D | lucia_csf.F | 3399 & IREF_AL,IREF_BE,NOPEN_PER_GAS,IOC_PER_GAS,LU_LEA)
3449 INTEGER IREF_AL(NGAS), IREF_BE(NGAS)
3464 CALL IVCSUM(IREF_OC,IREF_AL, IREF_BE, IONE, IONE, NGAS)
|
| /dports/science/nwchem-data/nwchem-7.0.2-release/src/lucia/ |
| H A D | lucia_gencc2.F | 1056 SUBROUTINE GET_REF_ALBE_OCC(IREFSPC,IREF_AL,IREF_BE) argument
1074 INTEGER IREF_AL(NGAS),IREF_BE(NGAS)
1092 IREF_AL(IGAS) = NORB
1095 IREF_AL(IGAS) = 0
1098 IREF_AL(IGAS) = NVAL_AL
1107 CALL IWRTMA(IREF_AL,1,NGAS,1,NGAS)
1113 SUBROUTINE GET_REF_ALBE_STR(IREFSPC,IREF_AL,IREF_BE) argument
1131 INTEGER IREF_AL(NGAS),IREF_BE(NGAS)
1159 IREF_AL(IOFF_AL-1+IORB) = IOFF-1+IORB
1166 IREF_AL(IOFF_AL-1+IORB) = IOFF-1+IORB
[all …]
|
| H A D | lucia_gencc.F | 5212 INTEGER IREF_AL(MXPNGAS),IREF_BE(MXPNGAS)
5249 CALL GET_REF_ALBE_OCC(IREFSPC,IREF_AL,IREF_BE)
5279 & IACT_SPC,IAAEXC,IREF_AL,IREF_BE,
5420 INTEGER IREF_AL(MXPNGAS),IREF_BE(MXPNGAS)
5449 CALL GET_REF_ALBE_OCC(IREFSPC,IREF_AL,IREF_BE)
5479 & IACT_SPC,IAAEXC,IREF_AL,IREF_BE,
5582 & NOBPT,IMSCOMB,IACT_SPC,IAAEXC,IREF_AL,IREF_BE,
5623 INTEGER IREF_AL(*),IREF_BE(*)
5724 IF(NAA(IGAS).GT.IREF_AL(IGAS) ) I_EXCLUDE = 1
5728 IF(NCA(IGAS)-NAA(IGAS)+IREF_AL(IGAS).GT.NOBPT(IGAS))
|
| H A D | lucia_csf.F | 3399 & IREF_AL,IREF_BE,NOPEN_PER_GAS,IOC_PER_GAS,LU_LEA)
3449 INTEGER IREF_AL(NGAS), IREF_BE(NGAS)
3464 CALL IVCSUM(IREF_OC,IREF_AL, IREF_BE, IONE, IONE, NGAS)
|