/dports/science/cgnslib/CGNS-4.1.2/src/cgnstools/utilities/ |
H A D | p3dfint.f | 16 integer icnt,idata(*) 24 integer icnt 33 integer icnt 42 integer icnt,idata(*),ierr 44 read (2,end=10) (rdata(i),i=1,3*icnt),(idata(i),i=1,icnt) 53 read (2,end=10) (rdata(i),i=1,3*icnt),(idata(i),i=1,icnt) 60 integer icnt,idata(*) 66 integer icnt 73 integer icnt 82 write (2) (rdata(i),i=1,3*icnt),(idata(i),i=1,icnt) [all …]
|
H A D | p3dfout.c | 51 void WRITEIF (int *icnt, int *idata, int *ierr) in WRITEIF() argument 53 unsigned int reclen = (unsigned int)*icnt * sizeof(int); in WRITEIF() 56 fwrite (idata, sizeof(int), *icnt, p3dout) != *icnt || in WRITEIF() 64 void WRITEFF (int *icnt, float *rdata, int *ierr) in WRITEFF() argument 69 fwrite (rdata, sizeof(float), *icnt, p3dout) != *icnt || in WRITEFF() 77 void WRITEDF (int *icnt, double *rdata, int *ierr) in WRITEDF() argument 82 fwrite (rdata, sizeof(double), *icnt, p3dout) != *icnt || in WRITEDF() 92 unsigned int rcnt = 3 * (unsigned int)*icnt; in WRITEGFF() 98 fwrite (idata, sizeof(int), *icnt, p3dout) != *icnt || in WRITEGFF() 108 unsigned int rcnt = 3 * (unsigned int)*icnt; in WRITEGDF() [all …]
|
/dports/devel/ga/ga-5.8/global/examples/md_cluster/ |
H A D | sort.F | 8 integer i,icnt,inode,mynode 27 icnt = 0 29 icnt = icnt + 1 30 xcrd(icnt) = ra(i,1,6) 36 mbuf(icnt) = mass(i) 37 bidx(icnt) = aidx(i) 38 bat(icnt) = at(i) 63 icnt = 0 77 icnt = 0 91 icnt = icnt + 1 [all …]
|
H A D | shuffle.F | 8 integer icnt,inode,me local 22 icnt = 0 24 icnt = icnt + 1 36 bat(icnt) = at(i) 58 icnt = 0 60 icnt = icnt + 1 88 icnt = 0 90 icnt = icnt + 1 295 icnt = 0 317 icnt = icnt + 1 [all …]
|
H A D | newcfg.F | 20 integer fill(nc,nc,nc,2), icnt local 86 300 icnt = 0 101 icnt = icnt + 1 108 icnt = icnt + 1 117 if (icnt.lt.natom2) then 127 do icnt = 1, natom2 128 rx = rx + coords(natom1+icnt,1) 140 do icnt = 1, natom2 149 icnt = 0 157 icnt = icnt + 1 [all …]
|
H A D | update.F | 55 icnt = 0 72 icnt = icnt + 1 106 icnt = icnt + 1 151 icnt = icnt + 1 197 icnt = icnt + 1 231 icnt = icnt + 1 253 icnt = 0 276 icnt = icnt + 1 322 icnt = icnt + 1 356 icnt = icnt + 1 [all …]
|
H A D | rdpar.F | 418 icnt = 0 424 icnt = icnt + 1 425 read(2,*) at(icnt),(ra(icnt,j,1),j=1,3) 426 if (at(icnt).eq.2) ctot = ctot + 1 432 ra(icnt,j,2) = scl * gasdev(0) 434 aidx(icnt) = i 442 icnt = icnt + 1 443 read(2,*) at(icnt),(ra(icnt,j,1),j=1,3), 444 + (ra(icnt,j,2),j=1,3) 446 aidx(icnt) = i [all …]
|
/dports/databases/p5-Genezzo/Genezzo-0.72/t/ |
H A D | PushHash1.t | 59 my $icnt; 82 # print $td_hash{$tempo1[$icnt]}, "\t", $tempo2[$icnt], "\n"; 83 unless ($td_hash{$tempo1[$icnt]} eq $tempo2[$icnt]) 202 my $icnt; 219 # print $tempo1[$icnt], "\t", $tempo2[$icnt], "\n"; 220 unless ($tempo1[$icnt] eq $tempo2[$icnt]) 259 my $icnt; 289 unless ($td_hash{$tempo1[$icnt]} eq $tempo2[$icnt]) 328 my $icnt; 476 my $icnt; [all …]
|
H A D | Row1.t | 59 my $icnt; 83 unless ($td_hash{$tempo1[$icnt]} eq $tempo2[$icnt]) 200 my $icnt; 217 # print $tempo1[$icnt], "\t", $tempo2[$icnt], "\n"; 218 unless ($tempo1[$icnt] eq $tempo2[$icnt]) 255 my $icnt; 323 my $icnt; 469 my $icnt; 520 my $icnt; 576 unless ($h1{$icnt} eq $plist[$icnt]) [all …]
|
H A D | Block1.t | 81 my $icnt; 87 push @tempo, [$icnt, $icnt, $icnt]; 88 SetRDEntry($href, $icnt, $icnt, $icnt, $icnt); 143 my $icnt; 146 for $icnt (0..1) 148 unless ($h1{$icnt} eq $plist[$icnt]) 208 my $icnt; 213 unless ($h1{$icnt} eq $plist[$icnt]) 234 for $icnt (0..10) 370 my $icnt; [all …]
|
/dports/multimedia/v4l_compat/linux-5.13-rc2/drivers/regulator/ |
H A D | lp8755.c | 237 int ret, icnt, buck_num; in lp8755_init_data() local 247 for (icnt = 0; icnt < mphase_buck[pchip->mphase].nreg; icnt++) { in lp8755_init_data() 293 for (icnt = 0; icnt < mphase_buck[pchip->mphase].nreg; icnt++) { in lp8755_regulator_init() 314 int ret, icnt; in lp8755_irq_handler() local 328 for (icnt = 0; icnt < LP8755_BUCK_MAX; icnt++) in lp8755_irq_handler() 348 for (icnt = 0; icnt < LP8755_BUCK_MAX; icnt++) in lp8755_irq_handler() 357 for (icnt = 0; icnt < LP8755_BUCK_MAX; icnt++) in lp8755_irq_handler() 402 int ret, icnt; in lp8755_probe() local 458 for (icnt = 0; icnt < LP8755_BUCK_MAX; icnt++) in lp8755_probe() 466 int icnt; in lp8755_remove() local [all …]
|
/dports/multimedia/libv4l/linux-5.13-rc2/drivers/regulator/ |
H A D | lp8755.c | 237 int ret, icnt, buck_num; in lp8755_init_data() local 247 for (icnt = 0; icnt < mphase_buck[pchip->mphase].nreg; icnt++) { in lp8755_init_data() 293 for (icnt = 0; icnt < mphase_buck[pchip->mphase].nreg; icnt++) { in lp8755_regulator_init() 314 int ret, icnt; in lp8755_irq_handler() local 328 for (icnt = 0; icnt < LP8755_BUCK_MAX; icnt++) in lp8755_irq_handler() 348 for (icnt = 0; icnt < LP8755_BUCK_MAX; icnt++) in lp8755_irq_handler() 357 for (icnt = 0; icnt < LP8755_BUCK_MAX; icnt++) in lp8755_irq_handler() 402 int ret, icnt; in lp8755_probe() local 458 for (icnt = 0; icnt < LP8755_BUCK_MAX; icnt++) in lp8755_probe() 466 int icnt; in lp8755_remove() local [all …]
|
/dports/multimedia/v4l-utils/linux-5.13-rc2/drivers/regulator/ |
H A D | lp8755.c | 237 int ret, icnt, buck_num; in lp8755_init_data() local 247 for (icnt = 0; icnt < mphase_buck[pchip->mphase].nreg; icnt++) { in lp8755_init_data() 293 for (icnt = 0; icnt < mphase_buck[pchip->mphase].nreg; icnt++) { in lp8755_regulator_init() 314 int ret, icnt; in lp8755_irq_handler() local 328 for (icnt = 0; icnt < LP8755_BUCK_MAX; icnt++) in lp8755_irq_handler() 348 for (icnt = 0; icnt < LP8755_BUCK_MAX; icnt++) in lp8755_irq_handler() 357 for (icnt = 0; icnt < LP8755_BUCK_MAX; icnt++) in lp8755_irq_handler() 402 int ret, icnt; in lp8755_probe() local 458 for (icnt = 0; icnt < LP8755_BUCK_MAX; icnt++) in lp8755_probe() 466 int icnt; in lp8755_remove() local [all …]
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/NWints/api/ |
H A D | int_nint.F | 51 & icnt.eq.jcnt.and. 54 & icnt.eq.0 63 if (icnt.gt.0) then 144 & icnt.eq.jcnt.and. 147 & icnt.eq.0 156 if (icnt.gt.0) then 236 & icnt.eq.jcnt.and. 239 & icnt.eq.0 249 if (icnt.gt.0) then 348 & icnt.eq.0 [all …]
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/NWints/api/ |
H A D | int_nint.F | 51 & icnt.eq.jcnt.and. 54 & icnt.eq.0 63 if (icnt.gt.0) then 144 & icnt.eq.jcnt.and. 147 & icnt.eq.0 156 if (icnt.gt.0) then 236 & icnt.eq.jcnt.and. 239 & icnt.eq.0 249 if (icnt.gt.0) then 348 & icnt.eq.0 [all …]
|
/dports/graphics/gle/gle-3.1.0/src/ |
H A D | ex_cut_round.c | 411 icnt = 0; in draw_fillets_and_join_plain() 434 icnt ++; in draw_fillets_and_join_plain() 441 icnt ++; in draw_fillets_and_join_plain() 462 for (; icnt_prev < istop; icnt_prev ++, icnt ++, icnt %= ncp) { in draw_fillets_and_join_plain() 558 icnt += ncp; in draw_fillets_and_join_plain() 559 icnt %= ncp; in draw_fillets_and_join_plain() 628 icnt = 0; in draw_fillets_and_join_n_norms() 653 icnt ++; in draw_fillets_and_join_n_norms() 660 icnt ++; in draw_fillets_and_join_n_norms() 790 icnt += ncp; in draw_fillets_and_join_n_norms() [all …]
|
/dports/devel/judy/judy-1.0.5/test/ |
H A D | Judy1LTime.c | 763 Word_t icnt; in TestJudyIns() local 814 icnt = ICNT; in TestJudyIns() 896 Word_t icnt; in TestJudyDup() local 940 icnt = ICNT; in TestJudyDup() 1000 Word_t icnt; in TestJudyGet() local 1044 icnt = ICNT; in TestJudyGet() 1102 Word_t icnt; in TestJudyCount() local 1185 Word_t icnt; in TestJudyNext() local 1274 Word_t icnt; in TestJudyPrev() local 1361 Word_t icnt; in TestJudyNextEmpty() local [all …]
|
H A D | Judy1LHTime.c | 965 Word_t icnt; in TestJudyIns() local 1181 Word_t icnt; in TestJudyDup() local 1228 icnt = ICNT; in TestJudyDup() 1271 icnt = ICNT; in TestJudyDup() 1330 Word_t icnt; in TestJudyGet() local 1386 icnt = ICNT; in TestJudyGet() 1440 icnt = ICNT; in TestJudyGet() 1496 Word_t icnt; in TestJudy1Copy() local 1575 Word_t icnt; in TestJudyCount() local 1680 Word_t icnt; in TestJudyNext() local [all …]
|
/dports/biology/molden/molden5.8/ |
H A D | dencnt.f | 13 common /cntval/ cntval, euclid, yes, icnt, iflag local 35 icnt = 0 48 if (icnt.lt.mxcntr) then 49 icnt = icnt + 1 50 fcnt(icnt) = cntval 52 + icnt,cntval 100 if (icnt.lt.mxcntr) then 101 icnt = icnt + 1 102 fcnt(icnt) = cntval 104 + write(iun3,'(4x,i3,15x,f13.5)') icnt,cntval
|
H A D | tomold.f | 74 icnt = 0 78 icnt = icnt + 1 79 icnn(icnt) = iconn(1+j,k) 84 do j=1,icnt 85 iconn(1+(icnt-j+1),k) = icnn(j) 87 iconn(1,k) = icnt 91 icnt = 0 95 icnt = icnt + 1 96 icnn(icnt) = iconn(1+j,k) 101 do j=1,icnt [all …]
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/stepper/ |
H A D | read_genr.F | 49 integer icnt, jcnt, iatom, ixyz, jatom, jxyz 59 icnt = 0 62 icnt = icnt + 1 63 if (abs(hess(icnt,jcnt)).gt.1.0d-07) then 66 & hess(icnt,jcnt) 84 integer icnt, iatom, ixyz 90 icnt = 0 93 icnt = icnt + 1 94 if (abs(grad0(icnt)).gt.1.0d-07) then 95 write(6,10000)iatom,labxyz(ixyz),grad0(icnt)
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/stepper/ |
H A D | read_genr.F | 49 integer icnt, jcnt, iatom, ixyz, jatom, jxyz 59 icnt = 0 62 icnt = icnt + 1 63 if (abs(hess(icnt,jcnt)).gt.1.0d-07) then 66 & hess(icnt,jcnt) 84 integer icnt, iatom, ixyz 90 icnt = 0 93 icnt = icnt + 1 94 if (abs(grad0(icnt)).gt.1.0d-07) then 95 write(6,10000)iatom,labxyz(ixyz),grad0(icnt)
|
/dports/devel/ga/ga-5.8/global/testing/ |
H A D | mtest.c | 22 int icnt, idx, jdx, ld; in main() local 76 icnt = me; in main() 78 values[i] = icnt; in main() 79 idx = icnt%N; in main() 80 jdx = (icnt-idx)/N; in main() 84 if (idx<0 || idx>=N) printf("p[%d] bogus idx: %d icnt: %d\n",me,idx,icnt); in main() 85 if (jdx<0 || jdx>=N) printf("p[%d] bogus jdx: %d jcnt: %d\n",me,jdx,icnt); in main() 86 icnt += nproc; in main() 87 icnt = icnt%size; in main()
|
/dports/print/fontforge/fontforge-20201107/fontforge/ |
H A D | ttfinstrs.c | 387 instrs[icnt++] = numberstack[0]; in _IVParse() 398 instrs[icnt++] = numberstack[nread]>>8; in _IVParse() 405 instrs[icnt++] = numberstack[nread++]; in _IVParse() 428 instrs[icnt++] = ttf_npushb; in _IVParse() 429 instrs[icnt++] = i-nread; in _IVParse() 432 instrs[icnt++] = numberstack[nread++]; in _IVParse() 439 instrs[icnt++] = ttf_npushw; in _IVParse() 440 instrs[icnt++] = i-nread; in _IVParse() 473 instrs[icnt++] = i; in _IVParse() 486 *len = icnt; in _IVParse() [all …]
|
/dports/science/hypre/hypre-2.23.0/src/FEI_mv/fei-hypre/ |
H A D | hypre_lsi_ddamg.c | 714 icnt = 0; in HYPRE_IntfaceSolve() 718 icnt++; in HYPRE_IntfaceSolve() 753 gam=sqrt(HH[icnt][icnt]*HH[icnt][icnt]+ in HYPRE_IntfaceSolve() 754 HH[icnt2][icnt]*HH[icnt2][icnt]); in HYPRE_IntfaceSolve() 756 C[icnt] = HH[icnt][icnt] / gam; in HYPRE_IntfaceSolve() 757 S[icnt] = HH[icnt2][icnt] / gam; in HYPRE_IntfaceSolve() 758 RS[icnt2] = -S[icnt] * RS[icnt]; in HYPRE_IntfaceSolve() 759 RS[icnt] = C[icnt] * RS[icnt]; in HYPRE_IntfaceSolve() 760 HH[icnt][icnt] = C[icnt] * HH[icnt][icnt] + in HYPRE_IntfaceSolve() 761 S[icnt] * HH[icnt2][icnt]; in HYPRE_IntfaceSolve() [all …]
|