/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/external/qfitlib/src/ |
H A D | printpkg.F | 11 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 D | printpkg.F | 617 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 D | cc3_xi_cont.F | 2308 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 D | unit_gwrap.pas | 2002 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 D | baserou.F | 5654 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 D | baserou.F | 5666 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
|