/dports/math/py-pyipopt/pyipopt-36bcb7f/examples/ |
H A D | hs071.py | 56 def eval_h(x, lagrange, obj_factor, flag, user_data = None): argument 73 values[1] += lagrange[0] * (x[2] * x[3]) 75 values[3] += lagrange[0] * (x[1] * x[3]) 76 values[4] += lagrange[0] * (x[0] * x[3]) 78 values[6] += lagrange[0] * (x[1] * x[2]) 79 values[7] += lagrange[0] * (x[0] * x[2]) 80 values[8] += lagrange[0] * (x[0] * x[1]) 81 values[0] += lagrange[1] * 2 82 values[2] += lagrange[1] * 2 83 values[5] += lagrange[1] * 2 [all …]
|
H A D | hs071_PY3.py | 56 def eval_h(x, lagrange, obj_factor, flag, user_data = None): argument 73 values[1] += lagrange[0] * (x[2] * x[3]) 75 values[3] += lagrange[0] * (x[1] * x[3]) 76 values[4] += lagrange[0] * (x[0] * x[3]) 78 values[6] += lagrange[0] * (x[1] * x[2]) 79 values[7] += lagrange[0] * (x[0] * x[2]) 80 values[8] += lagrange[0] * (x[0] * x[1]) 81 values[0] += lagrange[1] * 2 82 values[2] += lagrange[1] * 2 83 values[5] += lagrange[1] * 2 [all …]
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/KS_Solvers/CG/ |
H A D | rcgdiagg.f90 | 47 REAL(DP), ALLOCATABLE :: lagrange(:) local 82 ALLOCATE( lagrange( nbnd ) ) 110 lagrange = 0.d0 113 CALL mp_sum( lagrange( 1:m ), inter_bgrp_comm ) 114 IF ( gstart == 2 ) lagrange(1:m) = lagrange(1:m) - psi(1,1:m) * spsi(1) 116 CALL mp_sum( lagrange( 1:m ), intra_bgrp_comm ) 118 psi_norm = lagrange(m) 124 psi_norm = psi_norm - lagrange(j)**2 186 lagrange(1:m-1) = 0.d0 191 IF ( gstart == 2 ) lagrange(1:m-1) = lagrange(1:m-1) - psi(1,1:m-1) * scg(1) [all …]
|
H A D | ccgdiagg.f90 | 51 COMPLEX(DP), ALLOCATABLE :: lagrange(:) local 94 ALLOCATE( lagrange( nbnd ) ) 129 lagrange = ZERO 132 CALL mp_sum( lagrange( 1:m ), inter_bgrp_comm ) 134 CALL mp_sum( lagrange( 1:m ), intra_bgrp_comm ) 136 psi_norm = DBLE( lagrange(m) ) 142 psi_norm = psi_norm - ( DBLE( lagrange(j) )**2 + AIMAG( lagrange(j) )**2 ) 191 lagrange(1:m-1) = ZERO 201 g(:) = g(:) - lagrange(j) * psi(:,j) 202 scg(:) = scg(:) - lagrange(j) * psi(:,j) [all …]
|
/dports/science/frontistr/FrontISTR-c66bdc397de319ca59a0565b3f3b1a3b33f0c50c/fistr1/src/analysis/static/ |
H A D | fstr_AddContactStiff.f90 | 48 real(kind=kreal) :: lagrange local 66 lagrange = fstrMAT%Lagrange(id_lagrange) 99 real(kind=kreal) :: lagrange !< value of Lagrange multiplier local 122 if( lagrange>0.0d0 .or. iter==1 ) then 291 lagrange = fstrMAT%Lagrange(id_lagrange) 354 ctNForce(j) = lagrange*nTm(j) 359 if(fcoeff /= 0.0d0 .and. lagrange > 0.0d0)then 369 tf_final(1:3) = fcoeff*dabs(lagrange)*tangent(1:3) 412 tf_yield = fcoeff*dabs(lagrange) 444 if( lagrange < 0.d0 ) cycle [all …]
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/PHonon/Gamma/ |
H A D | cgsolve.f90 | 30 real(DP) :: lagrange(nbnd,nbnd) local 48 CALL calbec ( npw, evc, pu, lagrange ) 50 CALL calbec ( npw, evc, u, lagrange ) 53 CALL DPOTRS('U',nbnd,nbnd,overlap,nbndx,lagrange,nbnd,info) 57 2*npwx, lagrange, nbndx, 1.d0, u, 2*npwx) 105 CALL calbec ( npw, evc, pu, lagrange ) 107 CALL calbec ( npw, evc, u, lagrange ) 110 CALL DPOTRS('U',nbnd,nbnd,overlap,nbndx,lagrange,nbnd,info) 113 2*npwx, lagrange, nbndx, 1.d0, u, 2*npwx)
|
/dports/math/alberta/alberta3-920315ae1bbfd1b1fb6672d916619ac37a411e95/add_ons/albertasystems/AlbertaNum/Common/ |
H A D | est.cc | 81 const BAS_FCTS *lagrange= get_lagrange(mesh->dim,0); in init_err_dof_admin() local 82 est::const_fe_space = get_fe_space(mesh, lagrange->name, nil, lagrange, flag); in init_err_dof_admin() 92 const BAS_FCTS *lagrange= get_lagrange(0); 93 est::const_fe_space = get_fe_space(mesh, lagrange->name, nil, lagrange);
|
H A D | periodic.c | 310 const BAS_FCTS *lagrange; 359 lagrange = get_lagrange(mesh->dim, degree); 360 TEST_EXIT(lagrange, "no lagrange BAS_FCTS\n"); 361 fe_space = get_fe_space(mesh, lagrange->name, 362 NULL /* n_dof[] */, lagrange, ADM_PERIODIC); 406 lagrange->trace_bas_fcts->name, 408 lagrange->trace_bas_fcts, ADM_PERIODIC);
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/GWW/bse/ |
H A D | cgsolve.f90 | 35 real(DP) :: lagrange(nbnd,nbnd) local 81 CALL calbec ( npw, evc, pu, lagrange ) 83 CALL calbec ( npw, evc, u, lagrange ) 86 CALL DPOTRS('U',nbnd,nbnd,overlap,nbndx,lagrange,nbnd,info) 90 2*npwx, lagrange, nbnd, 1.d0, u, 2*npwx) 139 CALL calbec ( npw, evc, pu, lagrange ) 141 CALL calbec ( npw, evc, u, lagrange ) 144 CALL DPOTRS('U',nbnd,nbnd,overlap,nbndx,lagrange,nbnd,info) 147 2*npwx, lagrange, nbndx, 1.d0, u, 2*npwx)
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/GWW/pw4gww/ |
H A D | diago_cg.f90 | 48 REAL (DP), ALLOCATABLE :: lagrange(:) local 86 ALLOCATE( lagrange( max_state) ) 222 lagrange(:)=0.d0 225 call mp_sum(lagrange(1:m),world_comm) 229 psi_norm = lagrange(m) 235 psi_norm = psi_norm - lagrange(j)**2 306 lagrange(1:m-1)=0.d0 309 call mp_sum(lagrange(1:m-1),world_comm) 314 g(:) = g(:) - lagrange(j) * ovec(:,j) 315 scg(:) = scg(:) - lagrange(j) * ovec(:,j) [all …]
|
H A D | diago_cg_g.f90 | 49 REAL (DP), ALLOCATABLE :: lagrange(:) local 87 ALLOCATE( lagrange( max_state) ) 212 call mp_sum(lagrange(1:m),world_comm) 215 psi_norm = lagrange(m) 219 ovec(:,m) = ovec(:,m) - lagrange(j) * ovec(:,j) 221 psi_norm = psi_norm - lagrange(j)**2 279 ovec(nbegin:nend,1:m-1), nsize, scg(nbegin:nend), 1, 0.D0, lagrange, 1 ) 281 call mp_sum(lagrange(1:m-1),world_comm) 286 g(:) = g(:) - lagrange(j) * ovec(:,j) 287 scg(:) = scg(:) - lagrange(j) * ovec(:,j) [all …]
|
/dports/math/dune-functions/dune-functions-1882b3ec0a14b211dd077f0d5e6455495e28c35d/dune/functions/functionspacebases/test/ |
H A D | lagrangebasistest.cc | 53 auto basis = makeBasis(gridView, lagrange<3>()); in main() 75 auto basis = makeBasis(gridView, lagrange<3>()); in main() 80 auto basis = makeBasis(gridView, lagrange(2)); in main() 85 auto basis = makeBasis(gridView, lagrange<3,float>()); in main() 90 auto basis = makeBasis(gridView, lagrange<float>(2)); in main()
|
H A D | compositebasistest.cc | 46 lagrange<1>(), in main() 47 lagrange<1>(), in main() 48 lagrange<1>() in main()
|
/dports/math/adol-c/ADOL-C-2.7.2/ADOL-C/src/drivers/ |
H A D | driversf.c | 83 double* lagrange = myalloc1(m); in vec_jac_() local 85 spread1(m,flagrange,lagrange); in vec_jac_() 87 rc= vec_jac(tag,m,n,repeat,argument,lagrange, row); in vec_jac_() 90 myfree1(lagrange); in vec_jac_() 202 double *lagrange = myalloc1(m); in lagra_hess_vec_() local 206 spread1(m,flagrange,lagrange); in lagra_hess_vec_() 207 rc= lagra_hess_vec(tag,m,n,argument,tangent,lagrange,result); in lagra_hess_vec_() 211 myfree1(lagrange); in lagra_hess_vec_()
|
/dports/math/py-chaospy/chaospy-4.3.3/chaospy/expansion/ |
H A D | __init__.py | 13 from .lagrange import lagrange 38 expansion_deprecation_warning("lagrange_polynomial", lagrange)
|
/dports/www/lagrange/lagrange-1.7.3/res/ |
H A D | lagrange.rc.in | 3 IDI_ICON1 ICON DISCARDABLE "${CMAKE_SOURCE_DIR}/res/lagrange.ico" 21 VALUE "InternalName", "fi.skyjake.lagrange\0" 23 VALUE "OriginalFilename", "lagrange.exe\0"
|
/dports/math/dune-functions/dune-functions-1882b3ec0a14b211dd077f0d5e6455495e28c35d/dune/functions/gridfunctions/test/ |
H A D | discreteglobalbasisfunctiontest.cc | 93 auto feBasis = makeBasis(gridView,lagrange<1>()); in main() 102 auto feBasis = makeBasis(gridView,lagrange<1>()); in main() 117 auto feBasis = makeBasis(gridView,power<2>(lagrange<2>())); in main() 137 lagrange<2>(), in main() 139 lagrange<1>(), in main() 214 auto feBasis = makeBasis(gridView,lagrange<1>()); in main()
|
/dports/math/openturns/openturns-1.18/python/test/ |
H A D | t_P1LagrangeEvaluation_std.py | 29 lagrange = ot.P1LagrangeEvaluation(sample) variable 35 y = lagrange(point) 37 index = lagrange.getEnclosingSimplexAlgorithm().query(point)
|
/dports/www/lagrange/lagrange-1.7.3/debian/ |
H A D | control | 1 Source: lagrange 7 Homepage: https://gmi.skyjake.fi/lagrange/ 9 Package: lagrange
|
/dports/math/dune-functions/dune-functions-1882b3ec0a14b211dd077f0d5e6455495e28c35d/examples/ |
H A D | interpolation.cc | 71 lagrange<2>(), in main() 73 lagrange<1>(), in main() 130 lagrange<2>(), in main() 132 lagrange<1>() in main()
|
/dports/math/alberta/alberta3-920315ae1bbfd1b1fb6672d916619ac37a411e95/add_ons/albertasystems/Heat/Common/ |
H A D | nonlin.c | 69 const BAS_FCTS *lagrange; in init_dof_admin() local 75 lagrange = get_lagrange(degree); in init_dof_admin() 76 TEST_EXIT(lagrange)("no lagrange BAS_FCTS\n"); in init_dof_admin() 78 fe_space = get_fe_space(mesh, lagrange->name, nil, lagrange); in init_dof_admin()
|
/dports/math/alberta/alberta3-920315ae1bbfd1b1fb6672d916619ac37a411e95/demo/src/Common/ |
H A D | nonlin.c | 222 const BAS_FCTS *lagrange; in main() local 256 lagrange = get_lagrange(mesh->dim, degree); in main() 257 TEST_EXIT(lagrange, "no lagrange BAS_FCTS\n"); in main() 259 fe_space = get_fe_space(mesh, lagrange->name, lagrange, 1, ADM_FLAGS_DFLT); in main()
|
H A D | ellipt-periodic.c | 706 const BAS_FCTS *lagrange; in main() local 755 lagrange = get_lagrange(mesh->dim, degree); in main() 756 TEST_EXIT(lagrange, "no lagrange BAS_FCTS\n"); in main() 757 fe_space = get_fe_space(mesh, lagrange->name, in main() 758 lagrange, 1, ADM_PERIODIC); in main() 771 lagrange = get_lagrange(mesh->dim, degree); in main() 772 TEST_EXIT(lagrange, "no lagrange BAS_FCTS\n"); in main() 773 fe_space = get_fe_space(mesh, lagrange->name, in main() 774 lagrange, 1, ADM_PERIODIC); in main() 818 lagrange->trace_bas_fcts->name, in main() [all …]
|
/dports/math/dune-fem/dune-fem-d1c625e6d51167d0cce57de6adcef21f548a8f82/dune/fempy/test/ |
H A D | test-tupledf.py | 5 from dune.fem.space import lagrange, combined, product 11 spc1 = lagrange(grid, dimRange=1, order=1) 12 spc2 = lagrange(grid, dimRange=1, order=2)
|
/dports/math/dune-pdelab/dune-pdelab-20c7085389d3eb4f8ca99e1bc60f7fa6036536c8/dune/pdelab/finiteelementmap/ |
H A D | qkdg.hh | 18 enum class QkDGBasisPolynomial { lagrange, legendre, lobatto, l2orthonormal}; enumerator 22 template<class D, class R, int k, int d, QkDGBasisPolynomial p = QkDGBasisPolynomial::lagrange> 37 class QkDGLocalFiniteElementMap<D,R,k,d,QkDGBasisPolynomial::lagrange> 68 return QkDGBasisPolynomial::lagrange; in polynomial()
|