Searched refs:LDERIV (Results 1 – 9 of 9) sorted by relevance
| /dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/cc/ |
| H A D | cc_iajb.F | 180 IF ( LRELAX .AND. LDERIV ) THEN
189 IF ( LRELAX .OR. LDERIV ) THEN
211 IF (LDERIV.OR.LRELAX) THEN
224 IF (LDERIV.OR.LRELAX) THEN
269 IF ( LDERIV .OR. LRELAX ) THEN
302 IF ( LDERIV .OR. LRELAX ) THEN
339 IF ( LDERIV .OR. LRELAX ) THEN
422 LOGICAL LDERIV, LRELAX, LAO, LX2ISQ local
459 IF ( LRELAX .AND. LDERIV ) THEN
656 IF ( LDERIV .OR. LRELAX ) THEN
[all …]
|
| H A D | cc_ijcb.F | 31 & IOPT, LDERIV, LRELAX, LZERO, argument
91 LOGICAL LDERIV, LRELAX, LZERO, LNEWTA, LX2ISQ local
142 IF ((LDERIV).AND.(.NOT.LX2ISQ)) THEN
162 IF ((LDERIV).AND.(.NOT.LX2ISQ)) THEN
206 & IOPT, LDERIV, LRELAX, LZERO, argument
239 LOGICAL LDERIV, LRELAX, LZERO, LNEWTA local
309 IF (LDERIV .OR. LRELAX) THEN
636 IF (LDERIV) THEN
735 IF (LDERIV) THEN
853 IF ( LDERIV .OR. LRELAX ) THEN
[all …]
|
| H A D | cc_21i3.F | 27 * WORK,LWORK,IOPT,LRHOAO,LDERIV,LXI1SQ)
63 LOGICAL LRHOAO, LDERIV, LXI1SQ
153 IF ((IOPT.EQ.2).AND.LDERIV) THEN
243 IF (LDERIV) THEN
319 IF (LDERIV) THEN
339 IF ((IOPT.EQ.2).AND.LDERIV) THEN
|
| H A D | cc_21i2.F | 24 * WORK,LWORK,IOPT,LRHOAO,LDERIV,LX2ISQ)
58 LOGICAL LRHOAO, LDERIV, LX2ISQ
127 IF (LDERIV) THEN
191 IF (LDERIV) THEN
254 IF (LDERIV) THEN
274 IF (IOPT.EQ.3 .AND. LDERIV) THEN
|
| H A D | cc_bmat.F | 6128 & IOPT, LDERIV, LRELAX )
6189 LOGICAL LDERIV, LRELAX
|
| /dports/math/math77/MATH77/ |
| H A D | dilupm.f | 526 LDERIV = 0
576 LDERIV = KPTD(NDIMI-1)
653 if (LDERIV .ne. 0) then
655 LDERIV = KPTD(KDIM-1)
656 if (KDIM .ne. 1) LDERIV = LDERIV + NUMD(KDIM) *
697 if (LDERIV .gt. 0) then
716 LDERIV = IYDSAV + 1
732 if (LDERIV .gt. 0) then
735 LDERIV = -KDIM
740 LDERIV = LDERIV + NUMD(NDIMI)
[all …]
|
| H A D | silupm.f | 526 LDERIV = 0
576 LDERIV = KPTD(NDIMI-1)
653 if (LDERIV .ne. 0) then
655 LDERIV = KPTD(KDIM-1)
656 if (KDIM .ne. 1) LDERIV = LDERIV + NUMD(KDIM) *
697 if (LDERIV .gt. 0) then
716 LDERIV = IYDSAV + 1
732 if (LDERIV .gt. 0) then
735 LDERIV = -KDIM
740 LDERIV = LDERIV + NUMD(NDIMI)
[all …]
|
| H A D | dilup.f | 298 integer KAOS, KEXTRP, KGOC,LDERIV,LEXERR,LEXIT,NDEGEC, local
302 1 LDERIV, LEXERR,LEXIT,NDEGEC,IDX,GETERR local
807 LDERIV = IOPT(I-1)
866 EOPT(I+LDERIV-1) = 0.D0
876 EOPT(LDERIV) = TP1
883 EOPT(K+LDERIV-1) = TP1
|
| H A D | silup.f | 298 integer KAOS, KEXTRP, KGOC,LDERIV,LEXERR,LEXIT,NDEGEC, local
302 1 LDERIV, LEXERR,LEXIT,NDEGEC,IDX,GETERR local
807 LDERIV = IOPT(I-1)
866 EOPT(I+LDERIV-1) = 0.E0
876 EOPT(LDERIV) = TP1
883 EOPT(K+LDERIV-1) = TP1
|