/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/cc/ |
H A D | crayio2.F | 92 INTEGER LMAX, JADR, NBATCH, LETOT, IBATCH, IOFF 108 NBATCH = (LEN - 1) / LMAX + 1 109 DO IBATCH = 1, NBATCH 152 INTEGER LMAX, JADR, NBATCH, LETOT, IBATCH, IOFF 170 NBATCH = (LEN - 1) / LMAX + 1 171 DO IBATCH = 1, NBATCH
|
H A D | cc_fbta.F | 60 INTEGER NTRAN, IBATCH, NBATCH, IDUM 79 IF (NBATCH.GT.1) THEN 91 DO IBATCH = 1, NBATCH 732 NBATCH = 1 736 ISTART(NBATCH) = 1 750 NBATCH = NBATCH + 1 751 ISTART(NBATCH) = ITRAN 763 NBATCH = NBATCH + 1 776 NBATCH = NBATCH + 1 793 IEND(NBATCH) = NFBTRAN [all …]
|
H A D | cc_jmat.F | 59 INTEGER MAXJTRAN, NTRAN, ISTART, IBATCH, NBATCH local 63 NBATCH = (NJTRAN+MAXJTRAN-1)/MAXJTRAN 67 WRITE (LUPRI,*) 'nb. of batches needed:', NBATCH 70 DO IBATCH = 1, NBATCH 197 INTEGER NBATCH local
|
H A D | cc_kmat.F | 59 INTEGER MAXKTRAN, NTRAN, ISTART, IBATCH, NBATCH local 63 NBATCH = (NKTRAN+MAXKTRAN-1)/MAXKTRAN 67 WRITE (LUPRI,*) 'nb. of batches needed:', NBATCH 70 DO IBATCH = 1, NBATCH 206 INTEGER NBATCH local
|
H A D | cceom_xieta.F | 76 INTEGER NTRAN, IFIRST, IBATCH, NBATCH, IDUM 90 NBATCH = (NXETRAN+MAXXETRAN-1)/MAXXETRAN 94 WRITE (LUPRI,*) 'nb. of batches needed:', NBATCH 98 DO IBATCH = 1, NBATCH 424 NBATCH = 1 428 ISTART(NBATCH) = 1 455 IEND(NBATCH) = NXETRAN 459 WRITE (LUPRI,*) 'CCEOM_XIETA> NBATCH : ',NBATCH 461 & (ISTART(IBATCH),IBATCH=1,NBATCH) 463 & (IEND(IBATCH), IBATCH=1,NBATCH) [all …]
|
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/choles/ |
H A D | cc_cia.F | 680 NCHBAT(ISYCHO) = NBATCH 685 DO IBATCH = 1,NBATCH 688 IF (IBATCH .EQ. NBATCH) THEN 887 NCHBAT(ISYCHO) = NBATCH 892 DO IBATCH = 1,NBATCH 1098 NCHBAT(ISYCHO) = NBATCH 1103 DO IBATCH = 1,NBATCH 1378 NCHBAT(ISYCHO) = NBATCH 1383 DO IBATCH = 1,NBATCH 1678 NCHBAT(ISYCHO) = NBATCH [all …]
|
H A D | cc_cholrim.F | 481 DO IBATCH = 1,NBATCH 484 IF (IBATCH .EQ. NBATCH) THEN 835 DO IBATCH = 1,NBATCH 838 IF (IBATCH .EQ. NBATCH) THEN 1158 DO IBATCH = 1,NBATCH 1161 IF (IBATCH .EQ. NBATCH) THEN 1406 DO IBATCH = 1,NBATCH 1409 IF (IBATCH .EQ. NBATCH) THEN 1954 DO IBATCH = 1,NBATCH 2215 DO IBATCH = 1,NBATCH [all …]
|
H A D | cc_chomp2.F | 894 DO IBATCH = 1,NBATCH 1491 DO IBATCH = 1,NBATCH 1496 IF (IBATCH .EQ. NBATCH) THEN 2011 DO IBATCH = 1,NBATCH 2372 DO IBATCH = 1,NBATCH 2375 IF (IBATCH .EQ. NBATCH) THEN 2580 DO IBATCH = 1,NBATCH 2583 IF (IBATCH .EQ. NBATCH) THEN 2863 DO IBATCH = 1,NBATCH 3752 DO IBATCH = 1,NBATCH [all …]
|
H A D | cc_chocc2.F | 1124 NBATCH = (NUMCHO(ISYCHO) - 1)/NVEC + 1 1129 DO IBATCH = 1,NBATCH 1132 IF (IBATCH .EQ. NBATCH) THEN 2564 DO IBATCH = 1,NBATCH 2567 IF (IBATCH .EQ. NBATCH) THEN 3332 DO IBATCH = 1,NBATCH 3335 IF (IBATCH .EQ. NBATCH) THEN 3734 DO IBATCH = 1,NBATCH 3737 IF (IBATCH .EQ. NBATCH) THEN 4162 DO IBATCH = 1,NBATCH [all …]
|
H A D | cc_chodbg.F | 853 NBATCH = (NUMCHO(ISYCHO) - 1)/NVEC + 1 858 DO IBATCH = 1,NBATCH 861 IF (IBATCH .EQ. NBATCH) THEN 862 NUMV = NUMCHO(ISYCHO) - NVEC*(NBATCH - 1) 895 & 'This is batch ',IBATCH,' out of ',NBATCH
|
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/sirius/ |
H A D | intsort.F | 327 NBATCH = 0 370 NBATCH = NBATCH+1 371 IBATCH(LSPQRS) = NBATCH 375 IF (NBATCH .EQ. 0) THEN 376 WRITE (LUPRI,*) 'Number of batches in INTSORT =',NBATCH 395 LSORTX=MIN(LSORT,NBATCH*LBMAX) 403 NBP=(NBATCH+NSTEP-1)/NSTEP 412 WRITE(LUPRI,1200) NBATCH,LBATCH,LSORTX,NSTEP 441 IF(NBP2.GT.NBATCH) NBP2=NBATCH 619 WRITE(LUPRI,1260) (NREC(I),I=1,NBATCH) [all …]
|
H A D | sirtra.F | 354 IF (NBATCH .GT. IBUFL) THEN 373 NDIV = NBATCH*NBLOCK 377 LDABUF = (MEMS/(NBATCH+NBATCH/IRAT+1)) - 1 408 DO 25 K = 1,NBATCH 428 NOB = NBATCH 566 IOFF = (ISQ-1)*NBATCH 720 NDIV = NBATCH*NBLOCK 724 LDABUG = (MEMS/(1+NBATCH+NBATCH/IRAT)) - 1 747 DO 25 K = 1,NBATCH 765 NOB = NBATCH [all …]
|
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/gp/ |
H A D | gplupar.F | 95 NBATCH = 0 100 NBATCH = NBATCH + 1 101 LBATCH(NBATCH) = 0 136 LBATCH(NBATCH) = LBATCH(NBATCH)+1 171 DO JBATCH = 1, NBATCH 1431 DO ISBATCH = 1, NBATCH 1583 DO ISBATCH = 1, NBATCH 4402 NBATCH = 0 4407 NBATCH = NBATCH + 1 4408 LBATCH(NBATCH) = 0 [all …]
|
H A D | gplucia_io.F | 609 NBATCH = 0 613 NBATCH = NBATCH + 1 627 IF(NBATCH.EQ.1) THEN 630 WRITE(6,*) ' NBATCH, LBATCHP', NBATCH,LBATCHP 707 NBATCH = 0 711 NBATCH = NBATCH + 1 725 IF(NBATCH.EQ.1) THEN 728 WRITE(6,*) ' NBATCH, LBATCHP', NBATCH,LBATCHP
|
H A D | gplucia.F | 3070 LBATCH(NBATCH) = LBATCH(NBATCH) - 1 3071 LEBATCH(NBATCH) = LEBATCH(NBATCH) - IBATCH(8,IBLOCK) 5142 NBATCH = 0 5147 NBATCH = NBATCH + 1 5148 LBATCH(NBATCH) = 0 5179 LBATCH(NBATCH) = LBATCH(NBATCH)+1 5210 DO JBATCH = 1, NBATCH 5323 NBATCH = 0 5328 NBATCH = NBATCH + 1 5329 LBATCH(NBATCH) = 0 [all …]
|
/dports/science/erd/erd-3.0.6/src/ |
H A D | erd__csgto.f | 29 + NBATCH, 252 INTEGER NBATCH,NFIRST 370 NBATCH = 0 427 NBATCH = 0 969 MOVE = NBATCH / (NOTMOVE * NRYD) 974 + ( NBATCH,4, 1027 MOVE = NBATCH / (NOTMOVE * NRYC) 1032 + ( NBATCH,4, 1134 MOVE = NBATCH / (NOTMOVE * NRYB) 1139 + ( NBATCH,4, [all …]
|
H A D | erd__gener_eri_batch.f | 28 + NBATCH, 111 INTEGER NBATCH,NFIRST 150 + NBATCH, 171 + NBATCH,
|
H A D | erd__derv_csgto.f | 33 + NBATCH, 273 INTEGER NBATCH,NFIRST 431 NBATCH = 0 525 NBATCH = 0 563 + NBATCH, 627 + ( NBATCH, 1050 MOVE = NBATCH / (NOTMOVE * NRYD) 1055 + ( NBATCH,4, 1113 + ( NBATCH,4, 1241 + ( NBATCH,4, [all …]
|
H A D | erd__derv_def_blocks.f | 36 + NBATCH, 293 INTEGER NBATCH 496 NBATCH = MAX (MGQIJKL*PSHELL,NXYZT*MIJKL) 501 ZONE3B = NBATCH + NINT2DX + NINT2DY + NINT2DZ 516 NBATCH = MAX (MGQIJKL*PSHELL,NXYZT*MIJKL) 521 ZONE3B = NBATCH + NINT2DX + NINT2DY + NINT2DZ 559 NBATCH = MAX (MGQIJKL*PSHELL,NXYZT*MIJKL) 564 ZONE3B = NBATCH + NINT2DX + NINT2DY + NINT2DZ 591 ZP = ZPBATCH + NBATCH
|
H A D | erd__gener_eri_derv_batch.f | 32 + NBATCH, 120 INTEGER NBATCH,NFIRST 160 + NBATCH,
|
H A D | erd__ssss_pcgto_block.f | 17 + ( NBATCH, 163 INTEGER NBATCH 201 DOUBLE PRECISION BATCH (1:NBATCH)
|
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/lucita/ |
H A D | par_lucia.F | 84 DO ISBATCH = 1, NBATCH 265 DO ISBATCH = 1, NBATCH 373 DO ISBATCH = 1, NBATCH 459 DO ISBATCH = 1, NBATCH 515 DO ISBATCH = 1, NBATCH 655 DO ISBATCH = 1, NBATCH 742 DO ISBATCH = 1, NBATCH 923 DO ISBATCH = 1, NBATCH 1024 DO ISBATCH = 1, NBATCH 1174 DO ISBATCH = 1, NBATCH [all …]
|
H A D | transform.F | 23 & NBATCH,NBLOCK,blocks_per_batch, 206 & NBATCH,blocks_per_batch, 254 & NBATCH,blocks_per_batch, 290 & NBATCH,blocks_per_batch,
|
/dports/audio/csound/csound-6.15.0/Opcodes/cuda/ |
H A D | slidingm.cu | 49 #define NBATCH (256) macro 406 if(!p->aframesin.auxp || p->aframesin.size < sizeof(real)*NBATCH) in cuinit() 407 csound->AuxAlloc(csound, sizeof(real)*NBATCH, &p->aframesin); in cuinit() 408 if(!p->aframesout.auxp || p->aframesout.size < sizeof(real)*NBATCH) in cuinit() 409 csound->AuxAlloc(csound, sizeof(real)*NBATCH, &p->aframesout); in cuinit() 410 if(!p->aframesfm.auxp || p->aframesfm.size < sizeof(real)*NBATCH) in cuinit() 411 csound->AuxAlloc(csound, sizeof(real)*NBATCH, &p->aframesfm); in cuinit() 592 cuinit(csound,p,NBATCH,*p->iN,0); in spv_init() 614 if(count == NBATCH) { in spv_perf()
|
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/eri/ |
H A D | eri2par.F | 293 & NTASK,NBATCH,NPOS,IPRINT) 302 CALL DOPAR(INDEX,MXCLS2,NBATCH,NSTAT,IPRINT) 324 SUBROUTINE DOPAR(INDEX,MXBTCH,NBATCH,NSTAT,IPRINT) argument 402 IF (IPLACE .GT. NBATCH .AND. NQUEUE(NWHO) .EQ. 0) THEN 460 IF (IPLACE .LE. NBATCH .OR. IPLACQ .GT. 0) THEN 507 & //' NBATCH =',NBATCH 511 DO 100 I = 1,NBATCH
|