/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/NWints/texas/ |
H A D | shells.F | 4 common /types/itype,jtype,ktype,ltype,itype1,jtype1,ktype1,ltype1 local 24 ltype1=ltype 28 if(ltype.gt.4) ltype1=ltype-1 33 if(ltype1.gt.5) ltype1=ltype1-1 45 llen1=len(ltype1)
|
H A D | spec_block.F | 279 ltype1=ltype 281 if(ltype.gt.4) ltype1=ltype-1 283 if(ltype1.gt.5) ltype1=ltype1-1 284 nfkl=len(ktype1)*len(ltype1) 344 call blksize1(itype1,jtype1,ktype1,ltype1, 1480 ltype1=ltype 1482 if(ltype.gt.4) ltype1=ltype-1 1484 if(ltype1.gt.5) ltype1=ltype1-1 1493 nql=ndege(ltype1) 1501 nfijkl=nfij*len(ktype1)*len(ltype1) [all …]
|
H A D | spec_calcint.F | 311 common /types/itype,jtype,ktype,ltype,itype1,jtype1,ktype1,ltype1 local 446 call iobara(itype1,jtype1,ktype1,ltype1,where) 641 call get_spher_pnl_type(ltype1,ltyps) 796 common /types/itype,jtype,ktype,ltype,itype1,jtype1,ktype1,ltype1 local 1179 common /types/itype,jtype,ktype,ltype,itype1,jtype1,ktype1,ltype1 local 1354 common /types/itype,jtype,ktype,ltype,itype1,jtype1,ktype1,ltype1 local 1752 common /types/itype,jtype,ktype,ltype,itype1,jtype1,ktype1,ltype1 local
|
H A D | precalc2.F | 283 common /types/itype,jtype,ktype,ltype,itype1,jtype1,ktype1,ltype1 local 1317 common /types/itype,jtype,ktype,ltype,itype1,jtype1,ktype1,ltype1 local
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/NWints/texas/ |
H A D | shells.F | 4 common /types/itype,jtype,ktype,ltype,itype1,jtype1,ktype1,ltype1 local 24 ltype1=ltype 28 if(ltype.gt.4) ltype1=ltype-1 33 if(ltype1.gt.5) ltype1=ltype1-1 45 llen1=len(ltype1)
|
H A D | spec_block.F | 279 ltype1=ltype 281 if(ltype.gt.4) ltype1=ltype-1 283 if(ltype1.gt.5) ltype1=ltype1-1 284 nfkl=len(ktype1)*len(ltype1) 344 call blksize1(itype1,jtype1,ktype1,ltype1, 1480 ltype1=ltype 1482 if(ltype.gt.4) ltype1=ltype-1 1484 if(ltype1.gt.5) ltype1=ltype1-1 1493 nql=ndege(ltype1) 1501 nfijkl=nfij*len(ktype1)*len(ltype1) [all …]
|
H A D | spec_calcint.F | 311 common /types/itype,jtype,ktype,ltype,itype1,jtype1,ktype1,ltype1 446 call iobara(itype1,jtype1,ktype1,ltype1,where) 641 call get_spher_pnl_type(ltype1,ltyps) 796 common /types/itype,jtype,ktype,ltype,itype1,jtype1,ktype1,ltype1 1179 common /types/itype,jtype,ktype,ltype,itype1,jtype1,ktype1,ltype1 1354 common /types/itype,jtype,ktype,ltype,itype1,jtype1,ktype1,ltype1 1752 common /types/itype,jtype,ktype,ltype,itype1,jtype1,ktype1,ltype1
|
H A D | precalc2.F | 283 common /types/itype,jtype,ktype,ltype,itype1,jtype1,ktype1,ltype1 1317 common /types/itype,jtype,ktype,ltype,itype1,jtype1,ktype1,ltype1
|
/dports/science/cdo/cdo-2.0.0/libcdi/src/ |
H A D | varscan.c | 54 int ltype1; // GRIB first level type member 100 vartable[varID].ltype1 = 0; in paramInitEntry() 133 (vartable[varID].ltype1 == ltype1 ) && in varGetEntry() 390 int *pvarID, int *plevelID, int tsteptype, int ltype1, int ltype2, in varAddRecord() argument 402 vartable[varID].ltype1 = ltype1; in varAddRecord() 553 const int ltype1 = vartable[varid].ltype1; in cdi_generate_vars() local 556 if ( ltype1 == 0 && zaxistype == ZAXIS_GENERIC && cdiDefaultLeveltype != -1 ) in cdi_generate_vars() 808 bool ltype1_is_equal = (ltype1 == ltype1_0); in zaxisCompare() 860 int ltype1; member 918 query.ltype1 = ltype1; in varDefZaxis() [all …]
|
H A D | varscan.h | 11 int *pvarID, int *plevelID, int tsteptype, int ltype1, int ltype2, 19 const char *longname, const char *units, int prec, int mode, int ltype1, int ltype2); 39 …ol lbounds, const double *levels, const char *longname, const char *units, int ltype1, int ltype2);
|
H A D | cdilib.c | 38502 int *pvarID, int *plevelID, int tsteptype, int ltype1, int ltype2, 62723 int ltype1; // GRIB first level type member 62769 vartable[varID].ltype1 = 0; in paramInitEntry() 62802 (vartable[varID].ltype1 == ltype1 ) && in varGetEntry() 63059 int *pvarID, int *plevelID, int tsteptype, int ltype1, int ltype2, in varAddRecord() argument 63071 vartable[varID].ltype1 = ltype1; in varAddRecord() 63222 const int ltype1 = vartable[varid].ltype1; in cdi_generate_vars() local 63225 if ( ltype1 == 0 && zaxistype == ZAXIS_GENERIC && cdiDefaultLeveltype != -1 ) in cdi_generate_vars() 63477 bool ltype1_is_equal = (ltype1 == ltype1_0); in zaxisCompare() 63529 int ltype1; member [all …]
|
/dports/science/cdo/cdo-2.0.0/src/ |
H A D | WindTrans.cc | 1293 int code1, zaxisID1, ltype1; in TransformUV() local 1307 ltype1 = zaxis_to_ltype(zaxisID1); in TransformUV() 1315 varID1, code1, varname, ltype1, nlevel1, zaxisID1); in TransformUV() 1321 varID1, code1, varname, ltype1, nlevel1, zaxisID1); in TransformUV() 1344 … if (!((ltype1 == ltype2) && (nlevel1 == nlevel2) && (zaxisID1 == zaxisID2))) continue; in TransformUV() 1348 varID2, code2, varname, ltype1, nlevel2, zaxisID2); in TransformUV() 1438 … cdo_print("RotuvNorth(): processing level type: %d; level %d (out of [0:%d])", ltype1, levelID, in TransformUV() 1455 Debug(cdoDebugExt, "Finished processing level type: %d", ltype1); in TransformUV()
|
H A D | Change.cc | 301 const auto ltype1 = chltypes[i]; in changeLtype() local 303 if (ltype1 == ltype) in changeLtype()
|
/dports/lang/gambit-c/gambit-4.9.3/gsc/ |
H A D | _gvm.scm | 1328 (let ((ltype1 (label-type instr1)) 1330 (and (eq? ltype1 ltype2) 1331 (case ltype1
|
/dports/lang/gambit-c/gambit-4.9.3/bench/src/ |
H A D | test.scm | 3991 (let ((ltype1 (label-type instr1)) 3993 (and (eq? ltype1 ltype2) 3994 (case ltype1
|
H A D | compiler.scm | 3991 (let ((ltype1 (label-type instr1)) 3993 (and (eq? ltype1 ltype2) 3994 (case ltype1
|
/dports/lang/sagittarius-scheme/sagittarius-0.9.8/bench/gambit-benchmarks/ |
H A D | test.scm | 3991 (let ((ltype1 (label-type instr1)) 3993 (and (eq? ltype1 ltype2) 3994 (case ltype1
|
H A D | compiler.scm | 3991 (let ((ltype1 (label-type instr1)) 3993 (and (eq? ltype1 ltype2) 3994 (case ltype1
|
/dports/lang/chicken5/chicken-5.3.0/tests/ |
H A D | compiler.scm | 4019 (let ((ltype1 (label-type instr1)) 4021 (and (eq? ltype1 ltype2) 4022 (case ltype1
|