Home
last modified time | relevance | path

Searched refs:ISINT1RB (Results 1 – 2 of 2) sorted by relevance

/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/cc/
H A Dcc3_gmatnew.F121 INTEGER ISINT1RB,ISINT2RB,ISINT1BC local
515 ISINT1RB = MULD2H(ISINT1,ISYMRB)
580 KBIOVVO = KBIOOOO + N3ORHF(ISINT1RB)
581 KBIOOVV = KBIOVVO + NT2SQ(ISINT1RB)
582 KEND0 = KBIOOVV + NT2SQ(ISINT1RB)
589 CALL DZERO(WORK(KBIOVVO),NT2SQ(ISINT1RB))
590 CALL DZERO(WORK(KBIOOVV),NT2SQ(ISINT1RB))
593 * ISINT1RB,LU4VB,FN4VB,
1323 * ISINT1RB,WORK(KT2RC),ISYMRC,
1472 * WORK(KBIOOOO),ISINT1RB,
H A Dcc3_hmat.F131 INTEGER ISINT1RB,ISINT2RB,ISINT1BC,ISINT1RBD,ISINT1BCD local
561 ISINT1RB = MULD2H(ISINT1,ISYMRB)