Home
last modified time | relevance | path

Searched refs:COLLOW (Results 1 – 6 of 6) sorted by relevance

/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/external/qfitlib/src/
H A Dprintpkg.F11 SUBROUTINE OUTPUT (AMATRX,ROWLOW,ROWHI,COLLOW,COLHI,ROWDIM,COLDIM, argument
52 INTEGER ROWLOW,ROWHI,COLLOW,COLHI,ROWDIM,COLDIM,BEGIN,KCOL
62 IF (COLHI.LT.COLLOW) GO TO 3
66 DO 10 J = COLLOW,COLHI
102 LAST = MIN(COLHI,COLLOW+KCOL-1)
103 DO 2 BEGIN = COLLOW,COLHI,KCOL
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/pdpack/
H A Dprintpkg.F617 IF (COLHI.LT.COLLOW) GO TO 3
620 DO 10 J = COLLOW,COLHI
656 LAST = MIN(COLHI,COLLOW+KCOL-1)
657 DO 2 BEGIN = COLLOW,COLHI,KCOL
717 IF (COLHI.LT.COLLOW) GO TO 3
720 DO 10 J = COLLOW,COLHI
752 LAST = MIN(COLHI,COLLOW+KCOL-1)
753 DO 2 BEGIN = COLLOW,COLHI,KCOL
1123 IF (COLHI.LT.COLLOW) GO TO 3
1126 DO 10 J = COLLOW,COLHI
[all …]
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/cc/
H A Dcc3_xi_cont.F2308 SUBROUTINE OUTPUT_E(AMATRX,ROWLOW,ROWHI,COLLOW,COLHI,ROWDIM, argument
2348 INTEGER ROWLOW,ROWHI,COLLOW,COLHI,ROWDIM,COLDIM,BEGIN,KCOL local
2357 IF (COLHI.LT.COLLOW) GO TO 3
2360 DO 10 J = COLLOW,COLHI
2388 LAST = MIN(COLHI,COLLOW+KCOL-1)
2389 DO 2 BEGIN = COLLOW,COLHI,KCOL
/dports/archivers/peazip/peazip-8.1.0.src/
H A Dunit_gwrap.pas2002 Form_gwrap.ShapeTitleb1.Brush.Color:=StringToColor(COLLOW);
2003 Form_gwrap.ShapeTitleb2.Brush.Color:=StringToColor(COLLOW);
2004 Form_gwrap.ShapeTitleb3.Brush.Color:=StringToColor(COLLOW);
2005 Form_gwrap.ShapeTitleb4.Brush.Color:=StringToColor(COLLOW);
/dports/science/nwchem-data/nwchem-7.0.2-release/src/lucia/
H A Dbaserou.F5654 SUBROUTINE LUCIAOUTPUT (MATRIX,ROWLOW,ROWHI,COLLOW,COLHI,ROWDIM, argument
5688 INTEGER ROWLOW,ROWHI,COLLOW,COLHI,ROWDIM,COLDIM,BEGIN,ASA,BLANK,
5697 IF (COLHI .LT. COLLOW) GO TO 500
5698 LAST = MIN(COLHI,COLLOW+KCOL-1)
5699 DO 400 BEGIN = COLLOW,COLHI,KCOL
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/lucia/
H A Dbaserou.F5666 SUBROUTINE LUCIAOUTPUT (MATRIX,ROWLOW,ROWHI,COLLOW,COLHI,ROWDIM, argument
5700 INTEGER ROWLOW,ROWHI,COLLOW,COLHI,ROWDIM,COLDIM,BEGIN,ASA,BLANK,
5709 IF (COLHI .LT. COLLOW) GO TO 500
5710 LAST = MIN(COLHI,COLLOW+KCOL-1)
5711 DO 400 BEGIN = COLLOW,COLHI,KCOL