Home
last modified time | relevance | path

Searched refs:my_blacs_ctxt (Results 1 – 25 of 73) sorted by relevance

123

/dports/math/elpa/elpa-2019.05.002/test/shared/
H A Dtest_blacs_infrastructure.F9051 my_blacs_ctxt, my_prow, my_pcol) bind(C, name="set_up_blacsgrid_f") argument
58 integer(kind=c_int), intent(out) :: my_blacs_ctxt, my_prow, my_pcol local
69 my_blacs_ctxt = mpi_comm_parent
71 call BLACS_Gridinit(my_blacs_ctxt, layout, np_rows, np_cols)
72 call BLACS_Gridinfo(my_blacs_ctxt, np_rows_, np_cols_, my_prow, my_pcol)
89 na_cols, sc_desc, my_blacs_ctxt, info) argument
97 my_blacs_ctxt, info local
117 call descinit(sc_desc, na, na, nblk, nblk, 0, 0, my_blacs_ctxt, na_rows, info)
144 my_blacs_ctxt, info) & argument
152 np_cols, my_blacs_ctxt
[all …]
/dports/math/elpa/elpa-2019.05.002/test_project_C/src/
H A Dtest_blacs_infrastructure.F9055 my_blacs_ctxt, my_prow, my_pcol) bind(C, name="set_up_blacsgrid_f") argument
62 integer(kind=c_int), intent(out) :: my_blacs_ctxt, my_prow, my_pcol local
73 my_blacs_ctxt = mpi_comm_parent
75 call BLACS_Gridinit(my_blacs_ctxt, layout, np_rows, np_cols)
76 call BLACS_Gridinfo(my_blacs_ctxt, np_rows_, np_cols_, my_prow, my_pcol)
93 na_cols, sc_desc, my_blacs_ctxt, info) argument
101 my_blacs_ctxt, info local
122 call descinit(sc_desc, na, na, nblk, nblk, 0, 0, my_blacs_ctxt, na_rows, info)
149 my_blacs_ctxt, info) & argument
157 np_cols, my_blacs_ctxt
[all …]
/dports/math/elpa/elpa-2019.05.002/test_project_2stage_legacy_api/src/
H A Dtest_real2.F90101 integer :: i, mpierr, my_blacs_ctxt, sc_desc(9), info, nprow, npcol variable
146 my_blacs_ctxt = mpi_comm_world
147 call BLACS_Gridinit(my_blacs_ctxt, 'C', np_rows, np_cols)
148 call BLACS_Gridinfo(my_blacs_ctxt, nprow, npcol, my_prow, my_pcol)
171 call descinit(sc_desc, na, na, nblk, nblk, 0, 0, my_blacs_ctxt, na_rows, info)
233 call blacs_gridexit(my_blacs_ctxt)
/dports/math/elpa/elpa-2019.05.002/test_project_1stage_legacy_api/src/
H A Dtest_real.F90100 integer :: i, mpierr, my_blacs_ctxt, sc_desc(9), info, nprow, npcol variable
145 my_blacs_ctxt = mpi_comm_world
146 call BLACS_Gridinit(my_blacs_ctxt, 'C', np_rows, np_cols)
147 call BLACS_Gridinfo(my_blacs_ctxt, nprow, npcol, my_prow, my_pcol)
170 call descinit(sc_desc, na, na, nblk, nblk, 0, 0, my_blacs_ctxt, na_rows, info)
232 call blacs_gridexit(my_blacs_ctxt)
/dports/math/elpa/elpa-2019.05.002/test_project_1stage/src/
H A Dtest_real.F90101 integer :: i, mpierr, my_blacs_ctxt, sc_desc(9), info, nprow, npcol variable
137 my_blacs_ctxt = mpi_comm_world
138 call BLACS_Gridinit(my_blacs_ctxt, 'C', np_rows, np_cols)
139 call BLACS_Gridinfo(my_blacs_ctxt, nprow, npcol, my_prow, my_pcol)
157 call descinit(sc_desc, na, na, nblk, nblk, 0, 0, my_blacs_ctxt, na_rows, info)
233 call blacs_gridexit(my_blacs_ctxt)
/dports/math/elpa/elpa-2019.05.002/test_project_2stage/src/
H A Dtest_real2.F90101 integer :: i, mpierr, my_blacs_ctxt, sc_desc(9), info, nprow, npcol variable
137 my_blacs_ctxt = mpi_comm_world
138 call BLACS_Gridinit(my_blacs_ctxt, 'C', np_rows, np_cols)
139 call BLACS_Gridinfo(my_blacs_ctxt, nprow, npcol, my_prow, my_pcol)
157 call descinit(sc_desc, na, na, nblk, nblk, 0, 0, my_blacs_ctxt, na_rows, info)
233 call blacs_gridexit(my_blacs_ctxt)
/dports/math/elpa/elpa-2019.05.002/test/Fortran/elpa1/legacy_interface/
H A Dlegacy_single_real.F90105 integer(kind=ik) :: i, mpierr, my_blacs_ctxt, sc_desc(9), info, nprow, npcol variable
174 my_blacs_ctxt, my_prow, my_pcol)
191 na_rows, na_cols, sc_desc, my_blacs_ctxt, info)
274 call blacs_gridexit(my_blacs_ctxt)
H A Dlegacy_real.F90105 integer(kind=ik) :: i, mpierr, my_blacs_ctxt, sc_desc(9), info, nprow, npcol variable
174 my_blacs_ctxt, my_prow, my_pcol)
191 na_rows, na_cols, sc_desc, my_blacs_ctxt, info)
276 call blacs_gridexit(my_blacs_ctxt)
H A Dlegacy_complex_gpu.F90104 integer(kind=ik) :: i, mpierr, my_blacs_ctxt, sc_desc(9), info, nprow, npcol variable
177 my_blacs_ctxt, my_prow, my_pcol)
197 na_rows, na_cols, sc_desc, my_blacs_ctxt, info)
281 call blacs_gridexit(my_blacs_ctxt)
H A Dlegacy_real_gpu.F90105 integer(kind=ik) :: i, mpierr, my_blacs_ctxt, sc_desc(9), info, nprow, npcol variable
174 my_blacs_ctxt, my_prow, my_pcol)
191 na_rows, na_cols, sc_desc, my_blacs_ctxt, info)
275 call blacs_gridexit(my_blacs_ctxt)
H A Dlegacy_single_complex.F90104 integer(kind=ik) :: i, mpierr, my_blacs_ctxt, sc_desc(9), info, nprow, npcol variable
178 my_blacs_ctxt, my_prow, my_pcol)
198 na_rows, na_cols, sc_desc, my_blacs_ctxt, info)
281 call blacs_gridexit(my_blacs_ctxt)
H A Dlegacy_single_real_gpu.F90105 integer(kind=ik) :: i, mpierr, my_blacs_ctxt, sc_desc(9), info, nprow, npcol variable
174 my_blacs_ctxt, my_prow, my_pcol)
191 na_rows, na_cols, sc_desc, my_blacs_ctxt, info)
275 call blacs_gridexit(my_blacs_ctxt)
H A Dlegacy_complex.F90104 integer(kind=ik) :: i, mpierr, my_blacs_ctxt, sc_desc(9), info, nprow, npcol variable
178 my_blacs_ctxt, my_prow, my_pcol)
198 na_rows, na_cols, sc_desc, my_blacs_ctxt, info)
283 call blacs_gridexit(my_blacs_ctxt)
H A Dlegacy_single_complex_gpu.F90104 integer(kind=ik) :: i, mpierr, my_blacs_ctxt, sc_desc(9), info, nprow, npcol variable
177 my_blacs_ctxt, my_prow, my_pcol)
197 na_rows, na_cols, sc_desc, my_blacs_ctxt, info)
282 call blacs_gridexit(my_blacs_ctxt)
/dports/math/elpa/elpa-2019.05.002/test/Fortran/elpa2/legacy_interface/
H A Dlegacy_complex_default_kernel.F90113 integer(kind=ik) :: i, mpierr, my_blacs_ctxt, sc_desc(9), info, nprow, npcol variable
199 my_blacs_ctxt, my_prow, my_pcol)
219 na_rows, na_cols, sc_desc, my_blacs_ctxt, info)
305 call blacs_gridexit(my_blacs_ctxt)
H A Dlegacy_real_gpu.F90114 integer(kind=ik) :: i, mpierr, my_blacs_ctxt, sc_desc(9), info, nprow, npcol variable
195 my_blacs_ctxt, my_prow, my_pcol)
212 na_rows, na_cols, sc_desc, my_blacs_ctxt, info)
302 call blacs_gridexit(my_blacs_ctxt)
H A Dlegacy_real_qr.F90114 integer(kind=ik) :: i, mpierr, my_blacs_ctxt, sc_desc(9), info, nprow, npcol variable
235 my_blacs_ctxt, my_prow, my_pcol)
252 na_rows, na_cols, sc_desc, my_blacs_ctxt, info)
346 call blacs_gridexit(my_blacs_ctxt)
H A Dlegacy_complex.F90111 integer(kind=ik) :: i, mpierr, my_blacs_ctxt, sc_desc(9), info, nprow, npcol variable
182 my_blacs_ctxt, my_prow, my_pcol)
202 na_rows, na_cols, sc_desc, my_blacs_ctxt, info)
277 call blacs_gridexit(my_blacs_ctxt)
H A Dlegacy_real.F90111 integer(kind=ik) :: i, mpierr, my_blacs_ctxt, sc_desc(9), info, nprow, npcol variable
177 my_blacs_ctxt, my_prow, my_pcol)
194 na_rows, na_cols, sc_desc, my_blacs_ctxt, info)
282 call blacs_gridexit(my_blacs_ctxt)
H A Dlegacy_real_default_kernel.F90113 integer(kind=ik) :: i, mpierr, my_blacs_ctxt, sc_desc(9), info, nprow, npcol variable
193 my_blacs_ctxt, my_prow, my_pcol)
210 na_rows, na_cols, sc_desc, my_blacs_ctxt, info)
302 call blacs_gridexit(my_blacs_ctxt)
H A Dlegacy_single_complex.F90111 integer(kind=ik) :: i, mpierr, my_blacs_ctxt, sc_desc(9), info, nprow, npcol variable
182 my_blacs_ctxt, my_prow, my_pcol)
202 na_rows, na_cols, sc_desc, my_blacs_ctxt, info)
276 call blacs_gridexit(my_blacs_ctxt)
H A Dlegacy_single_real_default_kernel.F90113 integer(kind=ik) :: i, mpierr, my_blacs_ctxt, sc_desc(9), info, nprow, npcol variable
193 my_blacs_ctxt, my_prow, my_pcol)
210 na_rows, na_cols, sc_desc, my_blacs_ctxt, info)
301 call blacs_gridexit(my_blacs_ctxt)
H A Dlegacy_single_real_qr.F90114 integer(kind=ik) :: i, mpierr, my_blacs_ctxt, sc_desc(9), info, nprow, npcol variable
239 my_blacs_ctxt, my_prow, my_pcol)
256 na_rows, na_cols, sc_desc, my_blacs_ctxt, info)
349 call blacs_gridexit(my_blacs_ctxt)
H A Dlegacy_single_complex_default_kernel.F90111 integer(kind=ik) :: i, mpierr, my_blacs_ctxt, sc_desc(9), info, nprow, npcol variable
197 my_blacs_ctxt, my_prow, my_pcol)
217 na_rows, na_cols, sc_desc, my_blacs_ctxt, info)
301 call blacs_gridexit(my_blacs_ctxt)
H A Dlegacy_single_real_gpu.F90114 integer(kind=ik) :: i, mpierr, my_blacs_ctxt, sc_desc(9), info, nprow, npcol variable
195 my_blacs_ctxt, my_prow, my_pcol)
212 na_rows, na_cols, sc_desc, my_blacs_ctxt, info)
303 call blacs_gridexit(my_blacs_ctxt)

123