/dports/math/e-antic/flint2-ae7ec89/fmpz_factor/ |
H A D | factor_no_trial.c | 49 fmpz_factor_t fac, fac2, fac3; in fmpz_factor_no_trial() local 53 fmpz_factor_init(fac3); in fmpz_factor_no_trial() 55 done = fmpz_factor_smooth(fac3, n, FLINT_MAX(bits/3 - 17, 2), 1); in fmpz_factor_no_trial() 65 fmpz_set(n2, fac3->p + fac3->num - 1); in fmpz_factor_no_trial() 66 exp = fac3->exp[fac3->num - 1]; in fmpz_factor_no_trial() 67 fac3->exp[fac3->num - 1] = 0; in fmpz_factor_no_trial() 68 fac3->num--; in fmpz_factor_no_trial() 86 _fmpz_factor_concat(fac3, fac2, exp*fac->exp[i]); in fmpz_factor_no_trial() 96 _fmpz_factor_concat(factor, fac3, 1); in fmpz_factor_no_trial() 98 fmpz_factor_clear(fac3); in fmpz_factor_no_trial()
|
/dports/math/flint2/flint-2.8.4/fmpz_factor/ |
H A D | factor_no_trial.c | 49 fmpz_factor_t fac, fac2, fac3; in fmpz_factor_no_trial() local 53 fmpz_factor_init(fac3); in fmpz_factor_no_trial() 55 done = fmpz_factor_smooth(fac3, n, FLINT_MAX(bits/3 - 17, 2), 1); in fmpz_factor_no_trial() 65 fmpz_set(n2, fac3->p + fac3->num - 1); in fmpz_factor_no_trial() 66 exp = fac3->exp[fac3->num - 1]; in fmpz_factor_no_trial() 67 fac3->exp[fac3->num - 1] = 0; in fmpz_factor_no_trial() 68 fac3->num--; in fmpz_factor_no_trial() 86 _fmpz_factor_concat(fac3, fac2, exp*fac->exp[i]); in fmpz_factor_no_trial() 96 _fmpz_factor_concat(factor, fac3, 1); in fmpz_factor_no_trial() 98 fmpz_factor_clear(fac3); in fmpz_factor_no_trial()
|
/dports/math/e-antic/e-antic-1.0.0-rc.13/libeantic/upstream/antic/fmpz_factor/ |
H A D | factor_no_trial.c | 49 fmpz_factor_t fac, fac2, fac3; in fmpz_factor_no_trial() local 53 fmpz_factor_init(fac3); in fmpz_factor_no_trial() 55 done = fmpz_factor_smooth(fac3, n, FLINT_MAX(bits/3 - 17, 2), 1); in fmpz_factor_no_trial() 65 fmpz_set(n2, fac3->p + fac3->num - 1); in fmpz_factor_no_trial() 66 exp = fac3->exp[fac3->num - 1]; in fmpz_factor_no_trial() 67 fac3->exp[fac3->num - 1] = 0; in fmpz_factor_no_trial() 68 fac3->num--; in fmpz_factor_no_trial() 86 _fmpz_factor_concat(fac3, fac2, exp*fac->exp[i]); in fmpz_factor_no_trial() 96 _fmpz_factor_concat(factor, fac3, 1); in fmpz_factor_no_trial() 98 fmpz_factor_clear(fac3); in fmpz_factor_no_trial()
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/NWints/ecp/ |
H A D | ecp_t1_Q3pow.F | 28 & tol,fac0,fac1,fac2,fac3 32 fac3 = half 38 fac3 = fac3*fac1/fac2 40 fac3 = fac3*(m+1) 43 Q(i) = fac3*(gamma(i)**4) 47 Q(i) = fac3*(gamma(i)**4)*(x(i)*gamma(i))**m 58 fac3 = 1 63 fac3 = fac3+one 64 fac0 = fac1/(fac2*fac3)
|
H A D | ecp_t1_Q1pow.F | 28 & tol,fac0,fac1,fac2,fac3 32 fac3 = half 38 fac3 = fac3*fac1/fac2 45 Q(i) = fac3*(gamma(i)**2) 49 Q(i) = fac3*(gamma(i)**2)*(x(i)*gamma(i))**m 57 fac3 = 1 62 fac3 = fac3+one 63 fac0 = fac1/(fac2*fac3)
|
H A D | ecp_t1_Q3asy.F | 25 double precision x(n),xt(n),gamma(n),Q(n),tol,fac0,fac1,fac2,fac3 34 fac3 = m+1 36 fac0 = fac1*fac2/fac3 42 fac3 = fac3 - one
|
H A D | ecp_t2_p1pow.F | 32 & temp(n,9),tol,fac0,fac1,fac2,fac3,fac4,fac5,fac0i,fac1i,fac2i 42 fac3 = half 114 & - fac3*fac4*fac0i*temp(i,j1))*fac2i 121 fac3 = fac3+one 126 i = fac3+one
|
H A D | ecp_t2_p0pow.F | 33 & temp(n,9),tol,fac0,fac1,fac2,fac3,fac4,fac5,fac0i,fac1i,fac2i 43 fac3 = zero 125 & - fac3*fac4*fac0i*temp(i,j1))*fac2i 130 fac3 = fac3+one 135 i = fac3+0.1d0
|
H A D | ecp_t2_p3pow.F | 32 & temp(n,9),tol,fac0,fac1,fac2,fac3,fac4,fac5,fac0i,fac1i,fac2i 42 fac3 = one+half 106 & - fac3*fac4*fac0i*temp(i,j1))*fac2i 111 fac3 = fac3+one 116 i = fac3+one
|
H A D | ecp_t2_p4pow.F | 32 & temp(n,9),tol,fac0,fac1,fac2,fac3,fac4,fac5,fac0i,fac1i,fac2i 42 fac3 = two 106 & - fac3*fac4*fac0i*temp(i,j1))*fac2i 111 fac3 = fac3+one 116 i = fac3+one
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/NWints/ecp/ |
H A D | ecp_t1_Q3pow.F | 28 & tol,fac0,fac1,fac2,fac3 local 32 fac3 = half 38 fac3 = fac3*fac1/fac2 40 fac3 = fac3*(m+1) 43 Q(i) = fac3*(gamma(i)**4) 47 Q(i) = fac3*(gamma(i)**4)*(x(i)*gamma(i))**m 58 fac3 = 1 63 fac3 = fac3+one 64 fac0 = fac1/(fac2*fac3)
|
H A D | ecp_t1_Q1pow.F | 28 & tol,fac0,fac1,fac2,fac3 local 32 fac3 = half 38 fac3 = fac3*fac1/fac2 45 Q(i) = fac3*(gamma(i)**2) 49 Q(i) = fac3*(gamma(i)**2)*(x(i)*gamma(i))**m 57 fac3 = 1 62 fac3 = fac3+one 63 fac0 = fac1/(fac2*fac3)
|
H A D | ecp_t1_Q3asy.F | 25 double precision x(n),xt(n),gamma(n),Q(n),tol,fac0,fac1,fac2,fac3 local 34 fac3 = m+1 36 fac0 = fac1*fac2/fac3 42 fac3 = fac3 - one
|
H A D | ecp_t2_p3pow.F | 32 & temp(n,9),tol,fac0,fac1,fac2,fac3,fac4,fac5,fac0i,fac1i,fac2i local 42 fac3 = one+half 106 & - fac3*fac4*fac0i*temp(i,j1))*fac2i 111 fac3 = fac3+one 116 i = fac3+one
|
H A D | ecp_t2_p0pow.F | 33 & temp(n,9),tol,fac0,fac1,fac2,fac3,fac4,fac5,fac0i,fac1i,fac2i 43 fac3 = zero 125 & - fac3*fac4*fac0i*temp(i,j1))*fac2i 130 fac3 = fac3+one 135 i = fac3+0.1d0
|
H A D | ecp_t2_p1pow.F | 32 & temp(n,9),tol,fac0,fac1,fac2,fac3,fac4,fac5,fac0i,fac1i,fac2i local 42 fac3 = half 114 & - fac3*fac4*fac0i*temp(i,j1))*fac2i 121 fac3 = fac3+one 126 i = fac3+one
|
H A D | ecp_t2_p4pow.F | 32 & temp(n,9),tol,fac0,fac1,fac2,fac3,fac4,fac5,fac0i,fac1i,fac2i local 42 fac3 = two 106 & - fac3*fac4*fac0i*temp(i,j1))*fac2i 111 fac3 = fac3+one 116 i = fac3+one
|
/dports/cad/feappv/feappv-4.1i/plot/ |
H A D | pltaxs.f | 24 real*8 ct,fac1,fac2,fac3 local 48 fac3 = dd(3,m)*0.1d0 49 xx(1,3) = xx(1,2) - 3.d0*fac1 - fac2 - fac3 50 xx(2,3) = xx(2,2) - 3.d0*fac2 + fac1 + fac3 51 xx(3,3) = xx(3,2) - 3.d0*fac3 + fac1 + fac2 52 xx(1,4) = xx(1,2) - 3.d0*fac1 + fac2 + fac3 53 xx(2,4) = xx(2,2) - 3.d0*fac2 - fac1 - fac3 54 xx(3,4) = xx(3,2) - 3.d0*fac3 - fac1 - fac2
|
/dports/math/viennacl/ViennaCL-1.7.1/viennacl/linalg/cuda/ |
H A D | scalar_operations.hpp | 101 const NumericT * fac3, unsigned int options3, const NumericT * s3) in asbs_kernel() argument 109 NumericT beta = *fac3; in asbs_kernel() 130 NumericT beta = *fac3; in asbs_kernel() 151 NumericT beta = fac3; in asbs_kernel() 164 NumericT fac3, unsigned int options3, const NumericT * s3) in asbs_kernel() argument 172 NumericT beta = fac3; in asbs_kernel() 232 NumericT beta = *fac3; in asbs_s_kernel() 253 NumericT beta = *fac3; in asbs_s_kernel() 274 NumericT beta = fac3; in asbs_s_kernel() 287 NumericT fac3, unsigned int options3, const NumericT * s3) in asbs_s_kernel() argument [all …]
|
/dports/science/berkeleygw/BGW-2.0.0/NonLinearOptics/ |
H A D | absp3D.f90 | 34 real(DP) :: emin,emax,eps1,eps2,dos,fac3,fac4 local 100 fac3 = (k(1,ikmax(ii)) - kr(1))**2 + & 106 fac4 = exp(-fac3**2 / (2.d0 * keta**2)) 110 fac4 = (keta / PI_D) / (fac3**2 + keta**2) 127 fac3 = (k(1,ikmax(ii)) - kr(1))**2 + & 133 fac4 = exp(-fac3**2 /(2.d0 * keta**2)) 137 fac4 = (keta / PI_D) / (fac3**2 + keta**2)
|
/dports/math/R-cran-qualityTools/qualityTools/R/ |
H A D | mvPlot.R | 2 function(response,fac1,fac2,fac3=NA,fac4=NA,sort=TRUE,col,pch,cex.txt=1,las=1,labels=FALSE,quantile… argument 6 if(is.na(fac3) || is.na(fac4)) 8 if(is.na(fac3) && is.na(fac4)) 11 if(is.na(fac3[1])) 12 fac3=0 15 entire_data=data.frame(fac1,fac2,fac3,fac4,response) #entire data.frame 17 deparse(substitute(fac3)),deparse(substitute(fac4)), 25 length(unique(fac3)),length(unique(fac4)))
|
/dports/devel/llvm-devel/llvm-project-f05c95f10fc1d8171071735af8ad3a9e87633120/mlir/unittests/Analysis/ |
H A D | AffineStructuresTest.cpp | 469 FlatAffineConstraints fac3 = in TEST() local 474 fac3.removeRedundantConstraints(); in TEST() 477 EXPECT_EQ(fac3.getNumInequalities(), 0u); in TEST() 478 EXPECT_EQ(fac3.getNumEqualities(), 2u); in TEST() 790 FlatAffineConstraints fac3(1, 0, 1); in TEST() local 791 fac3.addInequality({1, -1, -1}); in TEST() 792 fac3.addInequality({0, 1, 1}); in TEST() 793 fac3.addEquality({2, 1, 0}); in TEST() 795 EXPECT_TRUE(fac3.isEmpty()); in TEST()
|
/dports/math/dune-grid/dune-grid-de36e4b4e99da4cd7a120a39779345e701821115/dune/grid/utility/test/ |
H A D | tensorgridfactorytest.cc | 52 TensorGridFactory<UGGrid<2> > fac3; in main() local 53 fillFactory(fac3); in main() 55 auto grid = fac3.createGrid(); in main()
|
/dports/math/fricas/fricas-1.3.7/src/input/ |
H A D | arith.input | 36 -- WRONG: fac3 n == reduce(*, [1..n]) 37 fac3 n == reduce(*, [i for i in 1..n]) 40 fac3 10
|
/dports/science/afni/afni-AFNI_21.3.16/src/ |
H A D | 3dThreetoRGB.c | 7 float fac1, fac2, fac3 ; in main() local 136 dbr3 = DSET_BRICK(dset1,2) ; fac3 = DSET_BRICK_FACTOR(dset1,2) ; in main() 157 dbr3 = DSET_BRICK(dset3,0) ; fac3 = DSET_BRICK_FACTOR(dset3,0) ; in main() 216 if( fac3 == 0.0 ) fac3 = 1.0 ; in main() 217 EDIT_coerce_scale_type( nvox , fac*fac3 , in main()
|