Home
last modified time | relevance | path

Searched refs:ISPOBEX (Results 1 – 8 of 8) sorted by relevance

/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/lucia/
H A Dlucia_gencc3.F27 CALL OP_T_OCC(ISPOBEX(1,ITTP),ISPOBEX(1,IFTP),
82 CALL OP_T_OCC(ISPOBEX(1,ITTP),ISPOBEX(1,IFTP),
234 INTEGER ISPOBEX(4*NGAS,*)
1531 INTEGER ISPOBEX(*)
1545 INTEGER ISPOBEX(*)
1551 ISPOBEX(NSPOBEX) = JSPOBEX
1880 CALL OP_T_OCC(ISPOBEX(1,ITTP),ISPOBEX(1,IFTP),
2067 INTEGER ISPOBEX(4*NGAS,NSPOBEX)
2155 INTEGER ISPOBEX(NGAS,4,NSPOBEX)
8379 INTEGER ISPOBEX(4*NGAS,*)
[all …]
H A Dlucia_icei.F2683 INTEGER ISPOBEX(NGAS,4,*)
2801 CALL ICOPVE(ISPOBEX(1,1,IB_INTP-1+I_INTP),
2802 & ISPOBEX(1,1,II_INTP),4*NGAS)
2820 IALDEL = IELSUM(ISPOBEX(1,1,1),NGAS)-IELSUM(ISPOBEX(1,3,1),NGAS)
2821 IBEDEL = IELSUM(ISPOBEX(1,2,1),NGAS)-IELSUM(ISPOBEX(1,4,1),NGAS)
3865 & N_INTP,ISPOBEX,N_EXTP,
3907 INTEGER ISPOBEX(NGAS,4,*)
4000 CALL ICOPVE(ISPOBEX(1,1,IB_INTP-1+I_INTP),
4001 & ISPOBEX(1,1,II_INTP),4*NGAS)
4012 IALDEL = IELSUM(ISPOBEX(1,1,1),NGAS)-IELSUM(ISPOBEX(1,3,1),NGAS)
[all …]
H A Dlucia_csf.F1801 & NSPOBEX_TP,ISPOBEX,ISPOBEX_TO_OCCLS,
1821 INTEGER ISPOBEX(4*NGAS,*)
1876 & ISPOBEX((1-1)*NGAS+1,ISPOX),
1877 & ISPOBEX((3-1)*NGAS+1,ISPOX),
1881 & ISPOBEX((2-1)*NGAS+1,ISPOX),
1882 & ISPOBEX((4-1)*NGAS+1,ISPOX),
1953 & ISPOBEX((1-1)*NGAS+1,ISPOX),
1954 & ISPOBEX((3-1)*NGAS+1,ISPOX),
1958 & ISPOBEX((2-1)*NGAS+1,ISPOX),
1959 & ISPOBEX((4-1)*NGAS+1,ISPOX),
H A Dlucia_gencc.F349 DO ISPOBEX = 1, NSPOBEX_TP
350 IEXC = IEXC_FOR_OBEX(ISOX_TO_OX(ISPOBEX))
358 ISPOBEX_FRZ(ISPOBEX) = IFREEZE
/dports/science/nwchem-data/nwchem-7.0.2-release/src/lucia/
H A Dlucia_gencc3.F27 CALL OP_T_OCC(ISPOBEX(1,ITTP),ISPOBEX(1,IFTP),
82 CALL OP_T_OCC(ISPOBEX(1,ITTP),ISPOBEX(1,IFTP),
234 INTEGER ISPOBEX(4*NGAS,*)
1531 INTEGER ISPOBEX(*)
1545 INTEGER ISPOBEX(*)
1551 ISPOBEX(NSPOBEX) = JSPOBEX
1880 CALL OP_T_OCC(ISPOBEX(1,ITTP),ISPOBEX(1,IFTP),
2067 INTEGER ISPOBEX(4*NGAS,NSPOBEX)
2155 INTEGER ISPOBEX(NGAS,4,NSPOBEX)
8379 INTEGER ISPOBEX(4*NGAS,*)
[all …]
H A Dlucia_icei.F2683 INTEGER ISPOBEX(NGAS,4,*)
2801 CALL ICOPVE(ISPOBEX(1,1,IB_INTP-1+I_INTP),
2802 & ISPOBEX(1,1,II_INTP),4*NGAS)
2820 IALDEL = IELSUM(ISPOBEX(1,1,1),NGAS)-IELSUM(ISPOBEX(1,3,1),NGAS)
2821 IBEDEL = IELSUM(ISPOBEX(1,2,1),NGAS)-IELSUM(ISPOBEX(1,4,1),NGAS)
3865 & N_INTP,ISPOBEX,N_EXTP,
3907 INTEGER ISPOBEX(NGAS,4,*)
4000 CALL ICOPVE(ISPOBEX(1,1,IB_INTP-1+I_INTP),
4001 & ISPOBEX(1,1,II_INTP),4*NGAS)
4012 IALDEL = IELSUM(ISPOBEX(1,1,1),NGAS)-IELSUM(ISPOBEX(1,3,1),NGAS)
[all …]
H A Dlucia_csf.F1801 & NSPOBEX_TP,ISPOBEX,ISPOBEX_TO_OCCLS,
1821 INTEGER ISPOBEX(4*NGAS,*)
1876 & ISPOBEX((1-1)*NGAS+1,ISPOX),
1877 & ISPOBEX((3-1)*NGAS+1,ISPOX),
1881 & ISPOBEX((2-1)*NGAS+1,ISPOX),
1882 & ISPOBEX((4-1)*NGAS+1,ISPOX),
1953 & ISPOBEX((1-1)*NGAS+1,ISPOX),
1954 & ISPOBEX((3-1)*NGAS+1,ISPOX),
1958 & ISPOBEX((2-1)*NGAS+1,ISPOX),
1959 & ISPOBEX((4-1)*NGAS+1,ISPOX),
H A Dlucia_gencc.F349 DO ISPOBEX = 1, NSPOBEX_TP
350 IEXC = IEXC_FOR_OBEX(ISOX_TO_OX(ISPOBEX))
358 ISPOBEX_FRZ(ISPOBEX) = IFREEZE