/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/pw/fft/ |
H A D | fftsg_lib.F | 76 SUBROUTINE fftsg3d(fft_in_place, fsign, scale, n, zin, zout) argument 79 INTEGER, INTENT(INOUT) :: fsign local 98 ny*nz, fsign, 1.0_dp) 100 nx*nz, fsign, 1.0_dp) 102 ny*nx, fsign, scale) 111 ny*nz, fsign, 1.0_dp) 113 nx*nz, fsign, 1.0_dp) 115 ny*nx, fsign, scale) 133 SUBROUTINE fftsg1dm(fsign, trans, n, m, zin, zout, scale) argument 135 INTEGER, INTENT(INOUT) :: fsign local [all …]
|
H A D | fft_lib.F | 136 SUBROUTINE fft_create_plan_3d(plan, fft_type, fft_in_place, fsign, n, zin, zout, plan_style) argument 141 INTEGER, INTENT(IN) :: fsign local 147 plan%fsign = fsign 178 stat = plan%fsign 212 SUBROUTINE fft_create_plan_1dm(plan, fft_type, fsign, trans, n, m, zin, zout, plan_style) argument 214 INTEGER, INTENT(IN) :: fft_type, fsign local 221 plan%fsign = fsign 267 stat = plan%fsign
|
/dports/science/cp2k-data/cp2k-7.1.0/src/pw/fft/ |
H A D | fftsg_lib.F | 76 SUBROUTINE fftsg3d(fft_in_place, fsign, scale, n, zin, zout) argument 79 INTEGER, INTENT(INOUT) :: fsign local 98 ny*nz, fsign, 1.0_dp) 100 nx*nz, fsign, 1.0_dp) 102 ny*nx, fsign, scale) 111 ny*nz, fsign, 1.0_dp) 113 nx*nz, fsign, 1.0_dp) 115 ny*nx, fsign, scale) 133 SUBROUTINE fftsg1dm(fsign, trans, n, m, zin, zout, scale) argument 135 INTEGER, INTENT(INOUT) :: fsign local [all …]
|
H A D | fft_lib.F | 136 SUBROUTINE fft_create_plan_3d(plan, fft_type, fft_in_place, fsign, n, zin, zout, plan_style) argument 141 INTEGER, INTENT(IN) :: fsign local 147 plan%fsign = fsign 178 stat = plan%fsign 212 SUBROUTINE fft_create_plan_1dm(plan, fft_type, fsign, trans, n, m, zin, zout, plan_style) argument 214 INTEGER, INTENT(IN) :: fft_type, fsign local 221 plan%fsign = fsign 267 stat = plan%fsign
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/pw/cuda/ |
H A D | fft_cuda_z.cu | 101 const int fsign, in fftcu_plan2dm_z() argument 114 iplandims[i][4] == fsign ) { in fftcu_plan2dm_z() 127 if ( fsign == +1 ) { in fftcu_plan2dm_z() 155 iplandims[n_plans][4] = fsign; in fftcu_plan2dm_z() 174 const int fsign, in fftcu_plan1dm_z() argument 187 iplandims[i][4] == fsign ) { in fftcu_plan1dm_z() 197 if ( fsign == +1 ) { in fftcu_plan1dm_z() 225 iplandims[n_plans][4] = fsign; in fftcu_plan1dm_z() 254 if ( fsign < 0 ) { in fftcu_run_3d_z_() 300 if ( fsign < 0 ) { in fftcu_run_2dm_z_() [all …]
|
H A D | fft_cuda.h | 20 extern "C" void fftcu_run_3d_z_ (const int fsign, 27 extern "C" void fftcu_run_2dm_z_ (const int fsign, 35 extern "C" void fftcu_run_1dm_z_ (const int fsign,
|
/dports/science/cp2k-data/cp2k-7.1.0/src/pw/cuda/ |
H A D | fft_cuda_z.cu | 101 const int fsign, in fftcu_plan2dm_z() argument 114 iplandims[i][4] == fsign ) { in fftcu_plan2dm_z() 127 if ( fsign == +1 ) { in fftcu_plan2dm_z() 155 iplandims[n_plans][4] = fsign; in fftcu_plan2dm_z() 174 const int fsign, in fftcu_plan1dm_z() argument 187 iplandims[i][4] == fsign ) { in fftcu_plan1dm_z() 197 if ( fsign == +1 ) { in fftcu_plan1dm_z() 225 iplandims[n_plans][4] = fsign; in fftcu_plan1dm_z() 254 if ( fsign < 0 ) { in fftcu_run_3d_z_() 300 if ( fsign < 0 ) { in fftcu_run_2dm_z_() [all …]
|
H A D | fft_cuda.h | 20 extern "C" void fftcu_run_3d_z_ (const int fsign, 27 extern "C" void fftcu_run_2dm_z_ (const int fsign, 35 extern "C" void fftcu_run_1dm_z_ (const int fsign,
|
/dports/lang/intel-compute-runtime/compute-runtime-21.52.22081/shared/source/helpers/ |
H A D | basic_math.h | 108 uint32_t fsign = (u.u >> 16) & 0x8000; in float2Half() local 116 return u.u | fsign; in float2Half() 122 return 0x7c00 | fsign; in float2Half() 124 return 0x7bff | fsign; in float2Half() 129 return fsign; // The halfway case can return 0x0001 or 0. 0 is even. in float2Half() 134 return (uint16_t)((int)x | fsign); in float2Half() 140 return (u.u >> (24 - 11)) | fsign; in float2Half()
|
/dports/math/math77/MATH77/ |
H A D | derfi.f | 109 fsign = x 133 DERFI = sign(arg*DERFIX(s, j), fsign) 166 fsign = 1.0d0 - x 167 arg = abs(fsign) 191 DERFCI = sign(arg*DERFIX(s, j), fsign)
|
H A D | serfi.f | 109 fsign = x 133 SERFI = sign(arg*SERFIX(s, j), fsign) 166 fsign = 1.0e0 - x 167 arg = abs(fsign) 191 SERFCI = sign(arg*SERFIX(s, j), fsign)
|
/dports/science/lammps/lammps-stable_29Sep2021/src/EXTRA-FIX/ |
H A D | fix_smd.cpp | 352 double fsign; in smd_couple() local 353 fsign = (v_smd<0.0) ? -1.0 : 1.0; in smd_couple() 358 pmf += (fx*xn + fy*yn + fz*zn) * fsign * v_smd * dt; in smd_couple() 434 double buf[RESTART_ITEMS], fsign; in write_restart() local 438 fsign = (v_smd<0.0) ? -1.0 : 1.0; in write_restart() 440 buf[1] = xn*fsign; in write_restart() 441 buf[2] = yn*fsign; in write_restart() 442 buf[3] = zn*fsign; in write_restart()
|
/dports/emulators/dolphin-emu/dolphin-3152428/Source/Core/Core/PowerPC/Jit64/ |
H A D | Jit64_Tables.cpp | 92 {40, &Jit64::fsign}, // ps_neg 93 {136, &Jit64::fsign}, // ps_nabs 94 {264, &Jit64::fsign}, // ps_abs 306 {264, &Jit64::fsign}, // fabsx 312 {136, &Jit64::fsign}, // fnabsx 313 {40, &Jit64::fsign}, // fnegx
|
/dports/graphics/panomatic/panomatic-0.9.4/panomatic/ |
H A D | Homography.cpp | 33 inline int fsign(double x) in fsign() function 252 w = fsign(C[j][j]) * sqrt(C[j][j] * C[j][j] + C[i][j] * C[i][j]); in Givens() 257 rho = (fabs(sigma) < gamma) ? sigma : fsign(sigma) / gamma; in Givens() 309 sigma = fsign(rho) * sqrt(1 - gamma * gamma); in Givens()
|
/dports/graphics/hugin/hugin-2020.0.0/src/hugin_cpfind/localfeatures/ |
H A D | Homography.cpp | 33 inline int fsign(double x) in fsign() function 282 w = fsign(C[j][j]) * sqrt(C[j][j] * C[j][j] + C[i][j] * C[i][j]); in Givens() 289 rho = (fabs(sigma) < gamma) ? sigma : fsign(sigma) / gamma; in Givens() 361 sigma = fsign(rho) * sqrt(1 - gamma * gamma); in Givens()
|
/dports/math/gnuplot/gnuplot-5.4.1/src/ |
H A D | matrix.c | 42 static GP_INLINE int fsign(double x); 104 fsign(double x) in fsign() function 148 w = fsign(C[j][j]) * sqrt(C[j][j] * C[j][j] + C[i][j] * C[i][j]); in Givens() 153 rho = (fabs(sigma) < gamma) ? sigma : fsign(sigma) / gamma; in Givens()
|
/dports/math/gnuplot-lite/gnuplot-5.4.1/src/ |
H A D | matrix.c | 42 static GP_INLINE int fsign(double x); 104 fsign(double x) in fsign() function 148 w = fsign(C[j][j]) * sqrt(C[j][j] * C[j][j] + C[i][j] * C[i][j]); in Givens() 153 rho = (fabs(sigma) < gamma) ? sigma : fsign(sigma) / gamma; in Givens()
|
/dports/math/gnuplot-tex-extras/gnuplot-5.2.8/src/ |
H A D | matrix.c | 46 static GP_INLINE int fsign __PROTO((double x)); 108 fsign(double x) in fsign() function 152 w = fsign(C[j][j]) * sqrt(C[j][j] * C[j][j] + C[i][j] * C[i][j]); in Givens() 157 rho = (fabs(sigma) < gamma) ? sigma : fsign(sigma) / gamma; in Givens()
|
/dports/math/scilab/scilab-6.1.1/scilab/modules/umfpack/macros/ |
H A D | test_on_columns.sci | 31 X(:,j) = fsign(rand(n,1)-0.5) 42 X(:,j) = fsign(rand(n,1)-0.5)
|
/dports/science/cp2k-data/cp2k-7.1.0/src/ |
H A D | xray_diffraction.F | 498 rho_soft, fsign) argument 505 REAL(KIND=dp), INTENT(IN), OPTIONAL :: fsign local 585 IF (PRESENT(fsign) .AND. (ispin == 2)) THEN 586 alpha = fsign 657 IF (PRESENT(fsign) .AND. (ispin == 2)) THEN 658 alpha = fsign
|
/dports/math/R/R-4.1.2/src/nmath/ |
H A D | fsign.c | 33 double fsign(double x, double y) in fsign() function
|
/dports/math/libRmath/R-4.1.1/src/nmath/ |
H A D | fsign.c | 33 double fsign(double x, double y) in fsign() function
|
/dports/math/jags/JAGS-4.3.0/src/jrmath/ |
H A D | fsign.c | 33 double fsign(double x, double y) in fsign() function
|
/dports/biology/vt/vt-0.57721/lib/Rmath/ |
H A D | fsign.c | 33 double fsign(double x, double y) in fsign() function
|
/dports/math/py-rvlib/rvlib-0.0.6/src/ |
H A D | fsign.c | 33 double fsign(double x, double y) in fsign() function
|