/dports/science/dcl/dcl-5.4.8/src/misc1/bitlib/ |
H A D | gbyte.f | 6 SUBROUTINE GBYTE(NPACK,IOUT,IBIT,NBITS) argument 11 CALL GBYTES(NPACK,IOUT,IBIT,NBITS,0,1)
|
/dports/science/elmerfem/elmerfem-release-9.0/elmerice/Solvers/ |
H A D | PlumeSolver.F90 | 1759 DO IOUT=K,1,-1 1760 Counter = IOUT+1 1765 RProf(IOUT) = 0.0 1766 WProf(IOUT) = 0.0 1805 TAmbient = 0.5*(Temp(IOUT-1)+Temp(IOUT)) 1806 SAmbient = 0.5*(Sal(IOUT-1)+Sal(IOUT)) 1841 RProf(IOUT) = Y(1) 1842 WProf(IOUT) = Y(2) 1843 TProf(IOUT) = Y(3) 1844 SProf(IOUT) = Y(4) [all …]
|
/dports/science/siconos/siconos-4.4.0/externals/hairer/ |
H A D | seulex.f | 5 & SOLOUT,IOUT, 648 IF (IOUT.EQ.2) THEN 700 IF (IOUT.NE.0) THEN 830 & ATOV,FSAFE,KM2,NRD,IOUT,IPT,M1,M2,NM1,IJOB,CALHES, 844 & ATOV,FSAFE,KM2,NRD,IOUT,IPT,M1,M2,NM1,IJOB,CALHES, 856 & ATOV,FSAFE,KM2,NRD,IOUT,IPT,M1,M2,NM1,IJOB,CALHES, 865 IF (IOUT.EQ.2) THEN 882 IF (IOUT.EQ.2) THEN 931 IF (IOUT.NE.0) THEN 1046 IF (IOUT.EQ.2.AND.M.EQ.JJ) THEN [all …]
|
/dports/science/libccp4/libccp4-6.5.1/fortran/ |
H A D | rwbrook.f | 670 SUBROUTINE XYZADVANCE(IUNIT,IOUT,ITER,*,*) argument 705 INTEGER IOUT,ITER,IUNIT 747 IF (IOUT.NE.0) THEN 751 CALL MMDB_F_COPY(IOUT,IUNIT,2,IRE) 755 CALL MMDB_F_COPY(IOUT,IUNIT,3,IRE) 766 CALL MMDB_F_WBSPGRP(IOUT,BRKSPGRP,IRE) 1131 *X,Y,Z,OCC,B,IZ,IOUT,MSG1,MSG2,ITER,*,*) 2896 SUBROUTINE RWBFIN(IUN,IOUT) argument 2907 INTEGER IUN,IOUT 2912 10 CALL XYZADVANCE(IUN,IOUT,0,*1000,*1000) [all …]
|
/dports/math/ipopt/Ipopt-3.12.13/Ipopt/src/Apps/CUTErInterface/ |
H A D | CUTErInterface.f | 13 INTEGER IOUT 14 PARAMETER( IOUT = 6 ) 79 call CSETUP(cnr_input, IOUT, N, M, X, X_L, X_U, CUTE_NMAX, 135 WRITE ( IOUT, 2000 ) PNAME, N, M, CALLS(1), CALLS(2),
|
/dports/math/libflame/libflame-5.2.0/old/lapack-test/lapack-timing/EIG/EIGSRC/ |
H A D | dstebz.f | 191 $ IM, IN, IOFF, IORDER, IOUT, IRANGE, ITMAX, 380 $ WORK, IWORK( 5 ), WORK( N+1 ), WORK( N+5 ), IOUT, 527 $ IDUMMA, WORK( N+1 ), WORK( N+2*IN+1 ), IOUT, 533 OPS = OPS + 2*IOUT 534 DO 60 J = 1, IOUT 539 IF( J.GT.IOUT-IINFO ) THEN
|
H A D | sstebz.f | 191 $ IM, IN, IOFF, IORDER, IOUT, IRANGE, ITMAX, 379 $ WORK, IWORK( 5 ), WORK( N+1 ), WORK( N+5 ), IOUT, 526 $ IDUMMA, WORK( N+1 ), WORK( N+2*IN+1 ), IOUT, 532 OPS = OPS + 2*IOUT 533 DO 60 J = 1, IOUT 538 IF( J.GT.IOUT-IINFO ) THEN
|
/dports/math/openblas/TIMING/EIG/EIGSRC/ |
H A D | sstebz.f | 191 $ IM, IN, IOFF, IORDER, IOUT, IRANGE, ITMAX, 379 $ WORK, IWORK( 5 ), WORK( N+1 ), WORK( N+5 ), IOUT, 526 $ IDUMMA, WORK( N+1 ), WORK( N+2*IN+1 ), IOUT, 532 OPS = OPS + 2*IOUT 533 DO 60 J = 1, IOUT 538 IF( J.GT.IOUT-IINFO ) THEN
|
H A D | dstebz.f | 191 $ IM, IN, IOFF, IORDER, IOUT, IRANGE, ITMAX, 380 $ WORK, IWORK( 5 ), WORK( N+1 ), WORK( N+5 ), IOUT, 527 $ IDUMMA, WORK( N+1 ), WORK( N+2*IN+1 ), IOUT, 533 OPS = OPS + 2*IOUT 534 DO 60 J = 1, IOUT 539 IF( J.GT.IOUT-IINFO ) THEN
|
/dports/math/cmlib/cmlib-3.0_8/src/cluster/ |
H A D | slink.f | 2 * TLAB, IOUT, IERR, OUNIT) 235 IA = IOUT / 10 236 IB = MOD(IOUT,10)
|
/dports/science/py-scipy/scipy-1.7.1/scipy/integrate/dop/ |
H A D | dopri5.f | 3 & SOLOUT,IOUT, argument 243 IF(NRDENS.GT.0.AND.IOUT.LT.2)THEN 339 & SOLOUT,IOUT,IDID,NMAX,UROUND,METH,NSTIFF,SAFE,BETA,FAC1,FAC2, 357 & SOLOUT,IOUT,IDID,NMAX,UROUND,METH,NSTIFF,SAFE,BETA,FAC1,FAC2, argument 399 IF (IOUT.NE.0) THEN 440 IF (IOUT.GE.2) THEN 495 IF (IOUT.GE.2) THEN 512 IF (IOUT.NE.0) THEN
|
/dports/science/isaac-cfd/isaac-4.2_16/march/ |
H A D | march.F | 675 WRITE (IOUT,1000) NRANK 868 WRITE (IOUT,1900) ISIZE 906 WRITE (IOUT,1020) I 925 WRITE (IOUT,1000) I 936 WRITE (IOUT,1490) 979 WRITE (IOUT,1450) CFLCUR, 1032 WRITE (IOUT,2400) NPRNEG 1038 WRITE (IOUT,2401) PRDLIM, NPRLIM 1105 WRITE (IOUT,1010) 1197 WRITE (IOUT,1100) I [all …]
|
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/sirius/ |
H A D | sirtra.F | 946 IOUT = 0 1198 IOUT = IOUT + 1 1201 IOUT = 1 1225 IOUTB(LOUT21)=IOUT 1230 LPRI = MIN(10,IOUT) 1343 IOUT =0 1638 IOUT =IOUT+1 1644 IOUT=1 1658 OUTB(IOUT) = P 1663 IOUTB(LOUT21) = IOUT [all …]
|
/dports/science/isaac-cfd/isaac-4.2_16/rhs/ |
H A D | misc.F | 69 1 IOUT /6/, 326 WRITE (IOUT,1000) 388 WRITE (IOUT,1120) IBLK, DIR(IDIR), 508 WRITE (IOUT,1220) (IORD (L0),L0=1,3), 599 WRITE (IOUT,1900) 709 WRITE (IOUT,1000) 864 WRITE (IOUT,1900) 1479 WRITE (IOUT,1010) 1779 WRITE (IOUT,1005) ITURBX 1787 WRITE (IOUT,1000) ITURBX, ITURB [all …]
|
/dports/cad/lepton-eda/lepton-eda-1.9.17/symbols/sym/misc/ |
H A D | dac08sm-1.sym | 144 pinlabel=IOUT 153 pinlabel=/IOUT
|
/dports/cad/geda/geda-gaf-1.8.2/symbols/misc/ |
H A D | dac08sm-1.sym | 144 pinlabel=IOUT 153 pinlabel=/IOUT
|
/dports/math/slatec/ |
H A D | ddasqc.f | 45 INTEGER I, IDID, INFO(15), IOUT, IPAR(1), IRES, IWORK(45), 90 DO 170 IOUT = 1,NOUT 171 DO 270 IOUT = 1,NOUT
|
H A D | sdasqc.f | 44 INTEGER I, IDID, INFO(15), IOUT, IPAR(1), IRES, IWORK(45), 88 DO 170 IOUT = 1,NOUT 169 DO 270 IOUT = 1,NOUT
|
/dports/science/siconos/siconos-4.4.0/externals/hairer/test/ |
H A D | dr1_radau5.f | 22 IOUT=1 45 & SOLOUT,IOUT,
|
/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/SRC/ |
H A D | dlarrd.f | 354 $ IM, IN, IOFF, IOUT, IRANGE, ITMAX, ITMP1, 499 $ D, E, E2, IWORK( 5 ), WORK( N+1 ), WORK( N+5 ), IOUT, 674 $ IDUMMA, WORK( N+1 ), WORK( N+2*IN+1 ), IOUT, 684 DO 60 J = 1, IOUT 689 IF( J.GT.IOUT-IINFO ) THEN
|
H A D | sstebz.f | 293 $ IM, IN, IOFF, IORDER, IOUT, IRANGE, ITMAX, 477 $ WORK, IWORK( 5 ), WORK( N+1 ), WORK( N+5 ), IOUT, 620 $ IDUMMA, WORK( N+1 ), WORK( N+2*IN+1 ), IOUT, 626 DO 60 J = 1, IOUT 631 IF( J.GT.IOUT-IINFO ) THEN
|
H A D | slarrd.f | 354 $ IM, IN, IOFF, IOUT, IRANGE, ITMAX, ITMP1, 499 $ D, E, E2, IWORK( 5 ), WORK( N+1 ), WORK( N+5 ), IOUT, 674 $ IDUMMA, WORK( N+1 ), WORK( N+2*IN+1 ), IOUT, 684 DO 60 J = 1, IOUT 689 IF( J.GT.IOUT-IINFO ) THEN
|
/dports/math/xlapack/lapack-3.10.0/SRC/ |
H A D | slarrd.f | 359 $ IM, IN, IOFF, IOUT, IRANGE, ITMAX, ITMP1, 510 $ D, E, E2, IWORK( 5 ), WORK( N+1 ), WORK( N+5 ), IOUT, 685 $ IDUMMA, WORK( N+1 ), WORK( N+2*IN+1 ), IOUT, 695 DO 60 J = 1, IOUT 700 IF( J.GT.IOUT-IINFO ) THEN
|
H A D | dlarrd.f | 359 $ IM, IN, IOFF, IOUT, IRANGE, ITMAX, ITMP1, 510 $ D, E, E2, IWORK( 5 ), WORK( N+1 ), WORK( N+5 ), IOUT, 685 $ IDUMMA, WORK( N+1 ), WORK( N+2*IN+1 ), IOUT, 695 DO 60 J = 1, IOUT 700 IF( J.GT.IOUT-IINFO ) THEN
|
H A D | dstebz.f | 300 $ IM, IN, IOFF, IORDER, IOUT, IRANGE, ITMAX, 485 $ WORK, IWORK( 5 ), WORK( N+1 ), WORK( N+5 ), IOUT, 628 $ IDUMMA, WORK( N+1 ), WORK( N+2*IN+1 ), IOUT, 634 DO 60 J = 1, IOUT 639 IF( J.GT.IOUT-IINFO ) THEN
|