Home
last modified time | relevance | path

Searched refs:NBATCH (Results 1 – 25 of 94) sorted by relevance

1234

/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/cc/
H A Dcrayio2.F92 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 Dcc_fbta.F60 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 Dcc_jmat.F59 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 Dcc_kmat.F59 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 Dcceom_xieta.F76 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 Dcc_cia.F680 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 Dcc_cholrim.F481 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 Dcc_chomp2.F894 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 Dcc_chocc2.F1124 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 Dcc_chodbg.F853 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 Dintsort.F327 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 Dsirtra.F354 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 Dgplupar.F95 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 Dgplucia_io.F609 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 Dgplucia.F3070 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 Derd__csgto.f29 + 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 Derd__gener_eri_batch.f28 + NBATCH,
111 INTEGER NBATCH,NFIRST
150 + NBATCH,
171 + NBATCH,
H A Derd__derv_csgto.f33 + 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 Derd__derv_def_blocks.f36 + 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 Derd__gener_eri_derv_batch.f32 + NBATCH,
120 INTEGER NBATCH,NFIRST
160 + NBATCH,
H A Derd__ssss_pcgto_block.f17 + ( NBATCH,
163 INTEGER NBATCH
201 DOUBLE PRECISION BATCH (1:NBATCH)
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/lucita/
H A Dpar_lucia.F84 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 Dtransform.F23 & 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 Dslidingm.cu49 #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 Deri2par.F293 & 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

1234