Home
last modified time | relevance | path

Searched refs:g_a (Results 1 – 25 of 619) sorted by relevance

12345678910>>...25

/dports/devel/ga/ga-5.8/global/src/
H A Dga.h18 extern void GA_Abs_value(int g_a);
24 extern int GA_Allocate(int g_a);
27 extern SingleComplex GA_Cdot(int g_a, int g_b);
41 extern void GA_Destroy(int g_a);
70 extern int GA_Get_pgroup(int g_a);
102 extern int GA_Ndim(int g_a);
132 extern void GA_Print(int g_a);
136 extern void GA_Recip(int g_a);
190 extern void GA_Zero(int g_a);
274 extern int NGA_Ndim(int g_a);
[all …]
H A Dfapi.c38 return wnga_allocate(*g_a); in ga_allocate_()
83 Integer *g_a, int slen in nga_create_() argument
107 Integer *g_a in nga_create_config_()
141 Integer *g_a, in nga_create_ghosts_config_() argument
149 Integer *g_a in nga_create_ghosts_config_()
349 wnga_fill(*g_a, val); in ga_fill_()
354 wnga_fill(*g_a, val); in nga_fill_()
1872 wnga_recip(*g_a); in ga_recip_()
2034 wnga_print(*g_a); in ga_print_()
2268 wnga_zero(*g_a); in ga_zero_()
[all …]
H A Dga-papi.h13 extern logical pnga_allocate(Integer g_a);
21 Integer *g_a);
50 extern logical pnga_destroy(Integer g_a);
62 extern logical pnga_has_ghosts(Integer g_a);
78 extern Integer pnga_ndim(Integer g_a);
105 extern Integer pnga_get_pgroup(Integer g_a);
219 extern void pnga_abs_value(Integer g_a);
221 extern void pnga_recip(Integer g_a);
250 extern void pnga_print(Integer g_a);
288 extern void pnga_zero(Integer g_a);
[all …]
H A Dcomplex.F31 complex function ga_cdot(g_a,g_b)
33 integer g_a, g_b local
36 call gai_cdot(g_a,g_b,ga_cdot)
41 integer g_a, g_b local
44 call ngai_cdot(g_a,g_b,nga_cdot)
49 integer g_a, g_b local
52 call gai_zdot(g_a,g_b,ga_zdot)
57 integer g_a, g_b local
78 $ g_a, t_a, alo, ahi,
81 integer g_a, alo, ahi local
[all …]
H A Dcapi.c234 Integer g_a; in NGA_Create_irreg() local
257 Integer g_a; in NGA_Create_irreg64() local
281 Integer g_a; in NGA_Create_irreg_config() local
304 Integer g_a; in NGA_Create_irreg_config64() local
327 Integer g_a; in NGA_Create_ghosts_irreg() local
352 Integer g_a; in NGA_Create_ghosts_irreg64() local
377 Integer g_a; in NGA_Create_ghosts_irreg_config() local
403 Integer g_a; in NGA_Create_ghosts_irreg_config64() local
523 Integer g_a; in GA_Create_handle() local
525 return (int)g_a; in GA_Create_handle()
[all …]
H A Dglobal.nalg.c56 void pnga_zero(Integer g_a) in pnga_zero() argument
70 p_handle = pnga_get_pgroup(g_a); in pnga_zero()
76 pnga_check_handle(g_a, "ga_zero"); in pnga_zero()
86 if (pnga_has_ghosts(g_a)) { in pnga_zero()
196 a_grp = pnga_get_pgroup(g_a); in pnga_copy()
413 a_grp = pnga_get_pgroup(g_a); in pnga_dot()
455 if(g_a == g_b){ in pnga_dot()
607 grp_id = pnga_get_pgroup(g_a); in pnga_scale()
618 if (pnga_has_ghosts(g_a)) { in pnga_scale()
792 if(g_a == g_c){ in pnga_add()
[all …]
/dports/devel/ga/ga-5.8/global/testing/unit-tests/
H A Dmock.c16 ITER_DECLARE_VARS(g_a) in Mock_Abs_value()
318 g_a->strides[i] = (i == nd_m1) ? 1 : g_a->strides[i+1]*g_a->dims[i+1]; in Mock_Create()
319 g_a->backstrides[i] = g_a->dims_m1[i]*g_a->strides[i]; in Mock_Create()
324 g_a->strides[i] *= g_a->itemsize; in Mock_Create()
325 g_a->backstrides[i] *= g_a->itemsize; in Mock_Create()
328 g_a->buf = malloc(g_a->size * g_a->itemsize); in Mock_Create()
331 aprint("dims", g_a->dims, g_a->ndim); in Mock_Create()
332 aprint("dims_m1", g_a->dims_m1, g_a->ndim); in Mock_Create()
333 aprint("strides", g_a->strides, g_a->ndim); in Mock_Create()
334 aprint("backstrides", g_a->backstrides, g_a->ndim); in Mock_Create()
[all …]
H A Dmock.h175 NGA_Put(g_a, lo, hi, mock_a->buf, ld); in mock_to_global()
194 NGA_Get(g_a, lo, hi, mock_a->buf, ld); in global_to_mock()
242 void Mock_Abs_value(mock_ga_t *g_a);
256 int Mock_Allocate(mock_ga_t *g_a);
285 void Mock_Destroy(mock_ga_t *g_a);
322 int Mock_Get_pgroup(mock_ga_t *g_a);
327 int Mock_Has_ghosts(mock_ga_t *g_a);
371 int Mock_Ndim(mock_ga_t *g_a);
401 void Mock_Print(mock_ga_t *g_a);
410 void Mock_Recip(mock_ga_t *g_a);
[all …]
/dports/devel/ga/ga-5.8/global/testing/
H A Dnormc.c25 int g_a; in do_work() local
49 NGA_Allocate(g_a); in do_work()
74 NGA_Destroy(g_a); in do_work()
80 NGA_Allocate(g_a); in do_work()
105 NGA_Destroy(g_a); in do_work()
111 NGA_Allocate(g_a); in do_work()
140 NGA_Destroy(g_a); in do_work()
146 NGA_Allocate(g_a); in do_work()
174 NGA_Destroy(g_a); in do_work()
209 NGA_Destroy(g_a); in do_work()
[all …]
H A Dmir_perf2.F57 integer g_a
68 if (.not. ga_create(MT_DBL, n, 1, 'a', 0, 0, g_a))
74 call ga_zero(g_a)
90 call ga_distribution(g_a, me, ilo, ihi, jlo, jhi)
110 integer n, ilo, ihi, jlo,jhi,g_a
186 integer g_a, chunk, jump, count, is, js, ie, je
226 integer g_a, chunk, jump, count, is, js, ie, je
267 integer g_a, chunk, jump, count, is, js, ie, je
313 integer g_a
329 call ga_zero(g_a)
[all …]
H A Dpatch_enumf.F53 integer g_a local
70 call nga_get(g_a, lo, dims, get, ld)
80 rc = ga_destroy(g_a)
89 integer g_a local
116 rc = ga_destroy(g_a)
125 integer g_a local
152 rc = ga_destroy(g_a)
161 integer g_a local
188 rc = ga_destroy(g_a)
197 integer g_a local
[all …]
H A Dperf.F60 integer g_a
72 if (.not. ga_create(MT_DBL, n, 1, 'a', 0, 0, g_a))
86 call ga_zero(g_a)
102 call ga_distribution(g_a, me, ilo, ihi, jlo, jhi)
125 integer n, ilo, ihi, jlo,jhi,g_a
203 integer g_a, chunk, jump, count, is, js, ie, je
246 integer g_a, chunk, jump, count, is, js, ie, je
290 integer g_a, chunk, jump, count, is, js, ie, je
339 integer g_a
364 call ga_zero(g_a)
[all …]
H A Dmir_perf1.F54 integer g_a
73 + p_handle, g_a))
79 call ga_zero(g_a)
95 call ga_distribution(g_a, me, ilo, ihi, jlo, jhi)
115 integer n, ilo, ihi, jlo,jhi,g_a
197 integer g_a, chunk, jump, count, is, js, ie, je
237 integer g_a, chunk, jump, count, is, js, ie, je
278 integer g_a, chunk, jump, count, is, js, ie, je
324 integer g_a
340 call ga_zero(g_a)
[all …]
H A Dprint.c16 int g_a = 0; in main() local
33 g_a = NGA_Create(C_INT, 1, &size_dst, "dst", NULL); in main()
34 GA_Fill(g_a, &I_NEG_ONE); in main()
37 GA_Fill(g_a, &L_NEG_ONE); in main()
40 GA_Fill(g_a, &LL_NEG_ONE); in main()
43 GA_Print(g_a); in main()
44 NGA_Print_patch(g_a, &FIVE, &TEN, 0); in main()
45 NGA_Print_patch(g_a, &FIVE, &TEN, 1); in main()
46 NGA_Distribution(g_a, GA_Nodeid(), &lo, &hi); in main()
47 NGA_Access(g_a, &lo, &hi, &ptr, NULL); in main()
[all …]
/dports/devel/ga/ga-5.8/tools/
H A Dga-wapi.c14 void wnga_abs_value(Integer g_a) in wnga_abs_value() argument
18 pnga_abs_value(g_a); in wnga_abs_value()
37 GET_SIZE(g_a, lo, hi, sz); in wnga_acc()
352 pnga_copy(g_a, g_b); in wnga_copy()
792 pnga_fill(g_a, val); in wnga_fill()
826 OBTAIN_ESIZE(tp, g_a); in wnga_gather2d()
1441 pnga_norm1(g_a, nm); in wnga_norm1()
1675 pnga_print(g_a); in wnga_print()
1810 pnga_recip(g_a); in wnga_recip()
2393 pnga_symmetrize(g_a); in wnga_symmetrize()
[all …]
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/util/
H A Dga_extra.F1 subroutine ga_scale_lh(g_a,vector) argument
7 integer g_a
26 call ga_inquire(g_a, ma_type, dim1, dim2)
64 subroutine ga_scale_rh(g_a,vector)
69 integer g_a
115 integer g_a
162 integer g_a
204 subroutine ga_copy_todiag(g_a,vector)
209 integer g_a
245 subroutine ga_add_todiag(g_a,value)
[all …]
H A Dutil_perf_test.F61 integer g_a
78 call ga_zero(g_a)
94 call ga_distribution(g_a, me, ilo, ihi, jlo, jhi)
104 if (.not. ga_destroy(g_a))
116 integer n, ilo, ihi, jlo,jhi,g_a
192 integer g_a, chunk, jump, count, is, js, ie, je
235 integer g_a, chunk, jump, count, is, js, ie, je
328 integer g_a
344 call ga_zero(g_a)
368 if (.not. ga_destroy(g_a))
[all …]
/dports/science/nwchem-data/nwchem-7.0.2-release/src/util/
H A Dga_extra.F1 subroutine ga_scale_lh(g_a,vector) argument
7 integer g_a
26 call ga_inquire(g_a, ma_type, dim1, dim2)
64 subroutine ga_scale_rh(g_a,vector)
69 integer g_a
115 integer g_a
162 integer g_a
204 subroutine ga_copy_todiag(g_a,vector)
209 integer g_a
245 subroutine ga_add_todiag(g_a,value)
[all …]
H A Dutil_perf_test.F61 integer g_a
78 call ga_zero(g_a)
94 call ga_distribution(g_a, me, ilo, ihi, jlo, jhi)
104 if (.not. ga_destroy(g_a))
116 integer n, ilo, ihi, jlo,jhi,g_a
192 integer g_a, chunk, jump, count, is, js, ie, je
235 integer g_a, chunk, jump, count, is, js, ie, je
328 integer g_a
344 call ga_zero(g_a)
368 if (.not. ga_destroy(g_a))
[all …]
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/nwdft/rt_tddft/matutils/
H A Dmatutils.F57 call ga_check_handle (g_a,
126 call ga_check_handle (g_a,
148 call ga_dgemm ("n","n",n1,n1,n1, 1d0, g_a, g_a, 0d0, g_tmp)
152 call ga_zgemm ("n","n",n1,n1,n1, zone, g_a, g_a, zzero, g_tmp)
254 call ga_check_handle (g_a,
271 call ga_copy (g_a, g_tmp)
330 call ga_check_handle (g_a,
470 call ga_zero (g_a)
478 call ga_zero (g_a)
486 call ga_zero (g_a)
[all …]
/dports/science/nwchem-data/nwchem-7.0.2-release/src/nwdft/rt_tddft/matutils/
H A Dmatutils.F57 call ga_check_handle (g_a,
126 call ga_check_handle (g_a,
148 call ga_dgemm ("n","n",n1,n1,n1, 1d0, g_a, g_a, 0d0, g_tmp)
152 call ga_zgemm ("n","n",n1,n1,n1, zone, g_a, g_a, zzero, g_tmp)
254 call ga_check_handle (g_a,
271 call ga_copy (g_a, g_tmp)
330 call ga_check_handle (g_a,
470 call ga_zero (g_a)
478 call ga_zero (g_a)
486 call ga_zero (g_a)
[all …]
/dports/devel/ga/ga-5.8/cca/ga_cca_classic/
H A DGlobalArray.h269 void add(void *alpha, const GlobalArray * g_a,
304 int compareDistr(const GlobalArray *g_a) const;
313 void copy(const GlobalArray *g_a) const;
340 double ddot(const GlobalArray * g_a) const;
445 float fdot(const GlobalArray * g_a) const;
519 Integer idot(const GlobalArray * g_a) const;
556 long ldot(const GlobalArray * g_a) const;
576 int lltSolve(const GlobalArray * g_a) const;
651 const GlobalArray *g_a,
680 const GlobalArray *g_a, int *alo, int *ahi,
[all …]
H A DGlobalArray.cxx50 GA_Copy(g_a.mHandle, mHandle); in GlobalArray()
125 GA_Copy(g_a->mHandle, mHandle); in copy()
136 return GA_Ddot(mHandle, g_a->mHandle); in ddot()
194 return GA_Fdot(mHandle, g_a->mHandle); in fdot()
232 return GA_Idot(mHandle, g_a->mHandle); in idot()
254 return GA_Ldot(mHandle, g_a->mHandle); in ldot()
285 g_a->mHandle, ailo, aihi, ajlo, ajhi, in matmulPatch()
387 return GA_Solve(g_a->mHandle, mHandle); in solve()
415 GA_Transpose(mHandle, g_a->mHandle); in transpose()
430 return GA_Zdot(mHandle, g_a->mHandle); in zdot()
[all …]
/dports/devel/ga/ga-5.8/ga++/testing/
H A Dmtest.cc1336 iresult = g_a->idot (g_a); in test_add_diagonal()
1350 lresult = g_a->ldot (g_a); in test_add_diagonal()
1364 fresult = g_a->fdot (g_a); in test_add_diagonal()
1378 dresult = g_a->ddot (g_a); in test_add_diagonal()
1393 zresult = g_a->zdot (g_a); in test_add_diagonal()
1469 iresult = g_a->idot (g_a); in test_set_diagonal()
1483 lresult = g_a->ldot (g_a); in test_set_diagonal()
1497 fresult = g_a->fdot (g_a); in test_set_diagonal()
1511 dresult = g_a->ddot (g_a); in test_set_diagonal()
1528 zresult = g_a->zdot (g_a); in test_set_diagonal()
[all …]
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/uccsdt/
H A Dga_long1d.F1 logical function ga_long1d_create(name, n, g_a)
7 integer g_a local
25 subroutine ga_long1d_put(g_a, start, finish, buf) argument
28 integer g_a local
80 subroutine ga_long1d_get(g_a, start, finish, buf) argument
83 integer g_a local
137 integer g_a local
195 integer g_a
203 if (.not. ga_long1d_create('test', rn, g_a))
213 call ga_long1d_put(g_a, start, finish, mirror)
[all …]

12345678910>>...25