| /dports/comms/wsjtz/wsjtx/lib/ |
| H A D | fftw3.f03 | 54 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
55 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
63 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
64 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
73 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
74 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
84 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
85 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
96 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
115 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
[all …]
|
| /dports/math/elpa/elpa-2019.05.002/src/helpers/ |
| H A D | mod_precision.F90 | 46 …use iso_c_binding, only : C_FLOAT, C_DOUBLE, C_FLOAT_COMPLEX, C_DOUBLE_COMPLEX, C_INT32_T, C_INT64…
51 integer, parameter :: ck8 = C_DOUBLE_COMPLEX
|
| /dports/math/elpa/elpa-2019.05.002/src/general/ |
| H A D | precision_kinds.F90 | 16 integer, parameter :: ck = C_DOUBLE_COMPLEX
17 integer, parameter :: rck = C_DOUBLE_COMPLEX
|
| /dports/math/fftw3-float/fftw-3.3.9/mpi/ |
| H A D | fftw3-mpi.f03.in | 178 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
179 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
189 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
190 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
199 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
200 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
210 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
222 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
334 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
344 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
[all …]
|
| /dports/math/fftw3/fftw-3.3.9/mpi/ |
| H A D | fftw3-mpi.f03.in | 178 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
179 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
189 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
190 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
199 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
200 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
210 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
222 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
334 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
344 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
[all …]
|
| /dports/math/fftw3-long/fftw-3.3.9/mpi/ |
| H A D | fftw3-mpi.f03.in | 178 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
179 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
189 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
190 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
199 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
200 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
210 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
222 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
334 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
344 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
[all …]
|
| /dports/math/fftw3-quad/fftw-3.3.9/mpi/ |
| H A D | fftw3-mpi.f03.in | 178 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
179 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
189 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
190 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
199 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
200 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
210 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
222 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
334 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
344 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
[all …]
|
| /dports/math/fftw3-long/fftw-3.3.9/api/ |
| H A D | fftw3.f03.in | 52 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
53 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
61 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
62 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
71 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
72 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
82 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
83 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
94 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
113 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
[all …]
|
| /dports/math/fftw3-float/fftw-3.3.9/api/ |
| H A D | fftw3.f03.in | 52 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
53 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
61 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
62 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
71 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
72 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
82 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
83 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
94 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
113 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
[all …]
|
| /dports/math/fftw3-quad/fftw-3.3.9/api/ |
| H A D | fftw3.f03.in | 52 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
53 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
61 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
62 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
71 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
72 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
82 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
83 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
94 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
113 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
[all …]
|
| /dports/math/fftw3/fftw-3.3.9/api/ |
| H A D | fftw3.f03.in | 52 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
53 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
61 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
62 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
71 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
72 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
82 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
83 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: out
94 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
113 complex(C_DOUBLE_COMPLEX), dimension(*), intent(out) :: in
[all …]
|
| /dports/science/py-pyscf/pyscf-2.0.1/pyscf/lib/sparsetools/ |
| H A D | m_sparse_blas.F90 | 121 real(C_DOUBLE_COMPLEX), intent(in) :: a(size_a), x(m)
122 real(C_DOUBLE_COMPLEX), intent(out) :: y(m)
|
| /dports/math/libpgmath/flang-d07daf3/runtime/flang/ |
| H A D | iso_c_bind.F95 | 104 integer C_DOUBLE_COMPLEX variable
105 parameter ( C_DOUBLE_COMPLEX = 8 )
|
| /dports/lang/gcc12-devel/gcc-12-20211205/gcc/testsuite/gfortran.dg/c-interop/ |
| H A D | typecodes-array-basic.f90 | 85 complex(C_DOUBLE_COMPLEX) :: arg_double_complex(:)
124 complex(C_DOUBLE_COMPLEX) :: var_double_complex(4)
|
| H A D | typecodes-scalar-basic.f90 | 86 complex(C_DOUBLE_COMPLEX), pointer :: arg_double_complex
125 complex(C_DOUBLE_COMPLEX), pointer :: var_double_complex
|
| /dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/pw/ |
| H A D | pw_fpga.F | 17 C_DOUBLE_COMPLEX,&
100 COMPLEX(KIND=C_DOUBLE_COMPLEX) :: c_in_dp(n(1), n(2), n(3))
|
| /dports/science/cp2k-data/cp2k-7.1.0/src/pw/ |
| H A D | pw_fpga.F | 17 C_DOUBLE_COMPLEX,&
100 COMPLEX(KIND=C_DOUBLE_COMPLEX) :: c_in_dp(n(1), n(2), n(3))
|
| /dports/math/elpa/elpa-2019.05.002/test/Fortran/elpa2/ |
| H A D | double_instance.F90 | 78 complex(kind=C_DOUBLE_COMPLEX), allocatable :: a2(:,:), as2(:,:)
80 complex(kind=C_DOUBLE_COMPLEX), allocatable :: z2(:,:)
|
| /dports/math/elpa/elpa-2019.05.002/src/GPU/ |
| H A D | mod_cuda.F90 | 341 complex(kind=C_DOUBLE_COMPLEX),value :: alpha,beta
375 complex(kind=C_DOUBLE_COMPLEX), value :: alpha
443 complex(kind=C_DOUBLE_COMPLEX),value :: alpha,beta
770 complex(kind=C_DOUBLE_COMPLEX) :: alpha,beta
800 complex(kind=C_DOUBLE_COMPLEX) :: alpha
857 complex(kind=C_DOUBLE_COMPLEX) :: alpha,beta
|
| /dports/science/octopus/octopus-10.5/m4/ |
| H A D | pfft.m4 | 79 complex(C_DOUBLE_COMPLEX), allocatable :: data_in(:)
80 complex(C_DOUBLE_COMPLEX), allocatable :: data_out(:)
|
| /dports/math/elpa/elpa-2019.05.002/test/shared/ |
| H A D | test_util.F90 | 60 integer, parameter :: ck8 = C_DOUBLE_COMPLEX
|
| /dports/science/octopus/octopus-10.5/src/math/ |
| H A D | pnfft.F90 | 90 complex(C_DOUBLE_COMPLEX), pointer :: f_lin(:) => NULL()
91 complex(C_DOUBLE_COMPLEX), pointer :: f(:,:,:) => NULL()
92 complex(C_DOUBLE_COMPLEX), pointer :: f_hat(:,:,:) => NULL()
|
| /dports/math/libpgmath/flang-d07daf3/test/f90_correct/src/ |
| H A D | in34.f90 | 43 complex(C_DOUBLE_COMPLEX) :: d_cplx
|
| /dports/math/fftw3-float/fftw-3.3.9/doc/ |
| H A D | modern-fortran.texi | 62 complex(C_DOUBLE_COMPLEX), dimension(1024,1000) :: in, out
79 @ctindex C_DOUBLE_COMPLEX
83 @code{complex(C_DOUBLE_COMPLEX)}, @code{double} turns into
180 complex(C_DOUBLE_COMPLEX), dimension(L,M,N) :: in, out
220 complex(C_DOUBLE_COMPLEX), dimension(L/2+1,M,N) :: out
243 complex(C_DOUBLE_COMPLEX), pointer :: out(:,:,:)
276 @ctindex C_DOUBLE_COMPLEX
283 correspond in Fortran to @code{complex(C_DOUBLE_COMPLEX)},
462 for a 2d real array, or @code{complex(C_DOUBLE_COMPLEX), pointer ::
509 complex(C_DOUBLE_COMPLEX), pointer :: arr(:,:,:)
|
| /dports/math/fftw3/fftw-3.3.9/doc/ |
| H A D | modern-fortran.texi | 62 complex(C_DOUBLE_COMPLEX), dimension(1024,1000) :: in, out
79 @ctindex C_DOUBLE_COMPLEX
83 @code{complex(C_DOUBLE_COMPLEX)}, @code{double} turns into
180 complex(C_DOUBLE_COMPLEX), dimension(L,M,N) :: in, out
220 complex(C_DOUBLE_COMPLEX), dimension(L/2+1,M,N) :: out
243 complex(C_DOUBLE_COMPLEX), pointer :: out(:,:,:)
276 @ctindex C_DOUBLE_COMPLEX
283 correspond in Fortran to @code{complex(C_DOUBLE_COMPLEX)},
462 for a 2d real array, or @code{complex(C_DOUBLE_COMPLEX), pointer ::
509 complex(C_DOUBLE_COMPLEX), pointer :: arr(:,:,:)
|