/dports/cad/opencascade/opencascade-7.6.0/src/IntPatch/ |
H A D | IntPatch_GLine.cxx | 54 indf(0), indl(0) in IMPLEMENT_STANDARD_RTTIEXT() 73 indf(0), indl(0) in IntPatch_GLine() 90 indf(0), indl(0) in IntPatch_GLine() 110 indf(0), indl(0) in IntPatch_GLine() 426 if(fipt) { if(indf>j) indf--; } in ComputeVertexParameters() 460 if(fipt) { if(indf>j) indf--; } in ComputeVertexParameters() 467 if(fipt) { if(indf>i) indf--; } in ComputeVertexParameters() 503 if(fipt) { if(indf>j) indf--; } in ComputeVertexParameters() 510 if(fipt) { if(indf>i) indf--; } in ComputeVertexParameters() 545 if(fipt) { if(indf==i) indf=i-1; else if(indf==i-1) indf=i; } in ComputeVertexParameters() [all …]
|
H A D | IntPatch_ALine.cxx | 38 indf(0), in IMPLEMENT_STANDARD_RTTIEXT() 53 indf(0), in IntPatch_ALine() 66 indf(0), in IntPatch_ALine() 304 if(fipt) { if(indf==i) indf=i-1; else if(indf==i-1) indf=i; } in ComputeVertexParameters() 326 if(fipt) { if(indf>=j) indf--; } in ComputeVertexParameters() 354 if(fipt) { if(indf>=j) indf--; } in ComputeVertexParameters() 380 if(fipt) { if(indf==i) indf=i-1; else if(indf==i-1) indf=i; } in ComputeVertexParameters() 461 if(fipt) { if(indf>i) indf--; else if(indf==i) indf=j; } in ComputeVertexParameters() 468 if(fipt) { if(indf>j) indf--; else if(indf==j) indf=i-1;} in ComputeVertexParameters()
|
H A D | IntPatch_RLine.cxx | 40 indf(0), in IMPLEMENT_STANDARD_RTTIEXT() 59 indf(0), in IntPatch_RLine() 76 indf(0), in IntPatch_RLine() 157 if(fipt) { if(indf>=j) indf--; } in ComputeVertexParameters() 185 if(fipt) { if(indf>=j) indf--; } in ComputeVertexParameters() 356 if(indf == i) indf = i-1; in ComputeVertexParameters() 357 else if(indf == (i-1)) indf = i; in ComputeVertexParameters()
|
/dports/math/scilab/scilab-6.1.1/scilab/modules/optimization/src/fortran/ |
H A D | icse1.f | 75 indf=2 80 if (indf.le.0) then 81 ind=indf 108 indf=1 112 if (indf.le.0) then 113 ind=indf 133 indf=1 137 if (indf.le.0) then 138 ind=indf 179 indf=1 [all …]
|
H A D | icse2.f | 152 indf=2 156 if (indf.le.0) then 157 ind=indf 226 indf=3 230 if (indf.le.0) then 231 ind=indf 275 indf=3 280 ind=indf 317 indf=2 321 if (indf.eq.0) then [all …]
|
/dports/science/cp2k-data/cp2k-7.1.0/src/input/ |
H A D | cp_parser_inpp_methods.F | 85 indf = indi 86 DO WHILE (.NOT. is_whitespace(input_line(indf:indf))) 87 indf = indf+1 89 mytag = input_line(indi:indf-1) 270 indf = indi 271 DO WHILE (.NOT. is_whitespace(varname(indf:indf))) 272 indf = indf+1 323 indi = indf 433 indf = indi 434 DO WHILE (input_line(indf:indf) /= " ") [all …]
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/input/ |
H A D | cp_parser_inpp_methods.F | 111 indf = indi 112 DO WHILE (.NOT. is_whitespace(input_line(indf:indf))) 113 indf = indf + 1 296 indf = indi 297 DO WHILE (.NOT. is_whitespace(varname(indf:indf))) 298 indf = indf + 1 300 value = TRIM(varname(indf:)) 357 indi = indf 467 indf = indi 468 DO WHILE (input_line(indf:indf) /= " ") [all …]
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/motion/ |
H A D | bfgs_optimizer.F | 292 dx(indf) = x0(indf) - xold(indf) 293 dg(indf) = g(indf) - gold(indf) 458 fun = fun + dg(indf)**2/(ln - eigval(indf)) 459 fung = fung - dg(indf)**2/(ln - eigval(indf)**2) 476 fun1 = fun1 + dg(indf)**2/(lam1 - eigval(indf)) 492 fun2 = fun2 + eigval(indf)**2/(lam2 - eigval(indf)) 541 eigval(indf) = eigval(indf)*work(indf) 551 eigval(indf) = eigval(indf) - ln 640 IF (eigval(indf) > 1000.0_dp) eigval(indf) = 1000.0_dp 701 eigval(indf) = one/eigval(indf) [all …]
|
/dports/science/cp2k-data/cp2k-7.1.0/src/motion/ |
H A D | bfgs_optimizer.F | 292 dx(indf) = x0(indf) - xold(indf) 293 dg(indf) = g(indf) - gold(indf) 458 fun = fun + dg(indf)**2/(ln - eigval(indf)) 459 fung = fung - dg(indf)**2/(ln - eigval(indf)**2) 476 fun1 = fun1 + dg(indf)**2/(lam1 - eigval(indf)) 492 fun2 = fun2 + eigval(indf)**2/(lam2 - eigval(indf)) 541 eigval(indf) = eigval(indf)*work(indf) 551 eigval(indf) = eigval(indf) - ln 640 IF (eigval(indf) > 1000.0_dp) eigval(indf) = 1000.0_dp 701 eigval(indf) = one/eigval(indf) [all …]
|
/dports/science/cdo/cdo-2.0.0/src/ |
H A D | Cat.cc | 48 for (int indf = 0; indf < nfiles; ++indf) in Cat() local 50 if (Options::cdoVerbose) cdo_print("Process file: %s", cdo_get_stream_name(indf)); in Cat() 53 const auto streamID1 = cdo_open_read(indf); in Cat() 60 if (indf == 0) in Cat() 119 const double fstatus = (ntsteps > 1) ? indf + (tsID1 + 1.) / ntsteps : indf + 1.; in Cat() 153 … if (Options::Timer) cdo_print("Processed file: %s %.2f seconds", cdo_get_stream_name(indf), tw); in Cat()
|
H A D | Copy.cc | 80 for (int indf = 0; indf < nfiles; ++indf) in Copy() local 82 if (Options::cdoVerbose) cdo_print("Process file: %s", cdo_get_stream_name(indf)); in Copy() 84 const auto streamID1 = cdo_open_read(indf); in Copy() 91 if (indf == 0) in Copy() 132 const double fstatus = (ntsteps > 1) ? indf + (tsID1 + 1.0) / ntsteps : indf + 1.0; in Copy()
|
/dports/math/octave-forge-matgeom/matgeom-1.2.3/inst/graphs/ |
H A D | grFaceToPolygon.m | 62 indf = varargin{2}; variable 68 indf = varargin{3}; variable 74 indf = varargin{4}; variable 80 if length(indf)==1 81 face = faces{indf}; 84 pts2 = cell(length(indf), 1); 85 for i=1:length(indf) 86 face = faces{indf(i)}; 92 if length(indf)==1 93 face = faces(indf, :); [all …]
|
/dports/astro/p5-Astro-FITS-Header/Astro-FITS-Header-3.08/lib/Astro/FITS/Header/ |
H A D | NDF.pm | 81 my ($indf, $started); 102 $indf = $args{ndfID}; 105 ndf_msg( "NDF", $indf ); 140 ndf_find(&NDF::DAT__ROOT(), $file, $indf, $status); 169 ndf_find(&NDF::DAT__ROOT(), $ndffile, $indf, $status); 192 ndf_xstat( $indf, "FITS", my $there, $status); 197 ndf_xloc($indf, 'FITS', 'READ', my $xloc, $status); 254 ndf_annul($indf, $status) if exists $args{File};
|
/dports/math/libpgmath/flang-d07daf3/test/ncar_kernels/PORT_sw_taumols/src/ |
H A D | rrtmg_sw_taumol.f90 | 321 (forref(indf+1,ig) - forref(indf,ig)))) 430 (forref(indf+1,ig) - forref(indf,ig)))) 471 (forref(indf+1,ig) - forref(indf,ig))) 566 (forref(indf+1,ig) - forref(indf,ig)))) 676 (forref(indf+1,ig) - forref(indf,ig)))) 755 (forref(indf+1,ig) - forref(indf,ig)))) & 870 (forref(indf+1,ig) - forref(indf,ig)))) 910 (forref(indf+1,ig) - forref(indf,ig))) 1011 (forref(indf+1,ig) - forref(indf,ig)))) & 1091 (forref(indf+1,ig) - forref(indf,ig)))) [all …]
|
/dports/math/libpgmath/flang-d07daf3/test/ncar_kernels/PORT_sw_rad/src/ |
H A D | rrtmg_sw_taumol.f90 | 342 (forref(indf+1,ig) - forref(indf,ig)))) 450 (forref(indf+1,ig) - forref(indf,ig)))) 491 (forref(indf+1,ig) - forref(indf,ig))) 584 (forref(indf+1,ig) - forref(indf,ig)))) 692 (forref(indf+1,ig) - forref(indf,ig)))) 769 (forref(indf+1,ig) - forref(indf,ig)))) & 882 (forref(indf+1,ig) - forref(indf,ig)))) 922 (forref(indf+1,ig) - forref(indf,ig))) 1021 (forref(indf+1,ig) - forref(indf,ig)))) & 1099 (forref(indf+1,ig) - forref(indf,ig)))) [all …]
|
/dports/math/libpgmath/flang-d07daf3/test/ncar_kernels/PORT_sw_spcvmc/src/ |
H A D | rrtmg_sw_taumol.f90 | 341 (forref(indf+1,ig) - forref(indf,ig)))) 449 (forref(indf+1,ig) - forref(indf,ig)))) 490 (forref(indf+1,ig) - forref(indf,ig))) 583 (forref(indf+1,ig) - forref(indf,ig)))) 691 (forref(indf+1,ig) - forref(indf,ig)))) 768 (forref(indf+1,ig) - forref(indf,ig)))) & 881 (forref(indf+1,ig) - forref(indf,ig)))) 921 (forref(indf+1,ig) - forref(indf,ig))) 1020 (forref(indf+1,ig) - forref(indf,ig)))) & 1098 (forref(indf+1,ig) - forref(indf,ig)))) [all …]
|
/dports/math/scilab/scilab-6.1.1/scilab/modules/optimization/demos/icse/ |
H A D | icsest.f | 11 subroutine stsec(indf,t,y,uc,uv,f,fy,fu,b,itu,dtu, argument 38 call seros(indf,t,y,uc,uv,f,fy,fu,itu,dtu, 42 subroutine seros(indf,t,y,uc,uv,f,fy,fu,itu,dtu, argument 56 if (indf.eq.1) then 65 if (indf.eq.2) then 81 if (indf.eq.3) then
|
/dports/misc/gpsim/gpsim-0.31.0/src/ |
H A D | 14bit-instructions.cc | 180 new_value = ia->indf.get(); in execute() 186 new_value = ia->indf.get(); in execute() 191 new_value = ia->indf.get(); in execute() 197 new_value = ia->indf.get(); in execute() 204 new_value = ia->indf.get(); in execute() 288 ia->indf.put(cpu14->Wget()); in execute() 293 ia->indf.put(cpu14->Wget()); in execute() 297 ia->indf.put(cpu14->Wget()); in execute() 302 ia->indf.put(cpu14->Wget()); in execute() 309 ia->indf.put(cpu14->Wget()); in execute()
|
/dports/misc/gpsim/gpsim-0.31.0/examples/14bit/ |
H A D | p16f877_test.asm | 125 movwf indf ; two 7-bit values that are copied to 129 movwf indf 332 movwf indf ;Preset... 338 movwf indf 344 movwf indf 350 movwf indf 376 incf indf,f 381 incf indf,f 386 incf indf,f 391 incf indf,f
|
/dports/math/libpgmath/flang-d07daf3/test/ncar_kernels/PSRAD_lrtm_Bangalore/src/ |
H A D | mo_lrtm_gas_optics.f90 | 322 INTEGER :: indf local 370 indf,ig))) 402 INTEGER :: indf local 421 indf,ig))) 433 indf,ig))) 463 INTEGER :: indf local 640 indf,ig))) 731 indf,ig))) 901 indf,ig))) 1164 indf,ig))) [all …]
|
/dports/math/libpgmath/flang-d07daf3/test/ncar_kernels/PORT_lw_rad/src/ |
H A D | rrtmg_lw_taumol.f90 | 334 (forref(indf+1,ig) - forref(indf,ig))) 416 (forref(indf+1,ig) - forref(indf,ig))) 648 (forref(indf+1,ig) - forref(indf,ig))) 941 (forref(indf+1,ig) - forref(indf,ig))) 1235 (forref(indf+1,ig) - forref(indf,ig))) 1405 (forref(indf+1,ig) - forref(indf,ig))) 1629 (forref(indf+1,ig) - forref(indf,ig))) 1801 (forref(indf+1,ig) - forref(indf,ig))) 2054 (forref(indf+1,ig) - forref(indf,ig))) 2181 (forref(indf+1,ig) - forref(indf,ig))) [all …]
|
/dports/math/libpgmath/flang-d07daf3/test/ncar_kernels/PSRAD_lrtm_codereview/src/ |
H A D | mo_lrtm_gas_optics.f90 | 330 INTEGER :: indf local 378 indf,ig))) 410 INTEGER :: indf local 429 indf,ig))) 441 indf,ig))) 471 INTEGER :: indf local 648 indf,ig))) 739 indf,ig))) 909 indf,ig))) 1172 indf,ig))) [all …]
|
/dports/math/libpgmath/flang-d07daf3/test/ncar_kernels/PSRAD_lrtm/src/ |
H A D | mo_lrtm_gas_optics.f90 | 322 INTEGER :: indf local 370 indf,ig))) 402 INTEGER :: indf local 421 indf,ig))) 433 indf,ig))) 463 INTEGER :: indf local 639 indf,ig))) 729 indf,ig))) 899 indf,ig))) 1162 indf,ig))) [all …]
|
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/gp/ |
H A D | gpjt.F | 564 integer lenstr, indf, indl, cursor, ind2, i 618 indf = 0 630 if(indf+1.le.indl-1) then 632 fields(NF) = copy(indf+1:indl-1) 633 lenfld(NF) = indl - indf - 1 636 indf = indl 638 fields(NF) = copy(indf+1:) 639 lenfld(NF) = lenstr - indf
|
/dports/math/singular/Singular-Release-4-2-1/factory/ |
H A D | facFqBivarUtil.cc | 1107 int indf= sizef - 1; in substituteCheck() local 1108 if (expf[indf] == 0) in substituteCheck() 1109 indf--; in substituteCheck() 1160 int indf= sizef - 1; in substituteCheck() local 1162 if (expf[indf] == 0) in substituteCheck() 1163 indf--; in substituteCheck() 1167 if ((expg[indg]%expf [indf] != 0 && expf[indf]%expg[indg] != 0) || in substituteCheck() 1226 int indf= sizef - 1; in recSubstituteCheck() local 1227 if (expf[indf] == 0) in recSubstituteCheck() 1228 indf--; in recSubstituteCheck() [all …]
|