File: debug.c

package info (click to toggle)
gpaw 25.7.0-1
  • links: PTS, VCS
  • area: main
  • in suites: sid
  • size: 18,888 kB
  • sloc: python: 174,804; ansic: 17,564; cpp: 5,668; sh: 972; csh: 139; makefile: 45
file content (41 lines) | stat: -rw-r--r-- 1,346 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
#include "../bmgs/bmgs.h"

void bmgs_paste_cpu(const double *a_cpu, const int sizea[3],
                    double *b_cpu, const int sizeb[3],
                    const int startb[3])
{
    bmgs_paste(a_cpu, sizea, b_cpu, sizeb, startb);
}

void bmgs_pastez_cpu(const double *a_cpu, const int sizea[3],
                     double *b_cpu, const int sizeb[3],
                     const int startb[3])
{
    bmgs_pastez((const double_complex*) a_cpu, sizea,
                (double_complex*) b_cpu, sizeb, startb);
}

void bmgs_cut_cpu(const double *a_cpu, const int sizea[3],
                  const int starta[3],
                  double *b_cpu, const int sizeb[3])
{
    bmgs_cut(a_cpu, sizea, starta, b_cpu, sizeb);
}

void bmgs_cutz_cpu(const double *a_cpu, const int sizea[3],
                   const int starta[3],
                   double *b_cpu, const int sizeb[3])
{
    bmgs_cutz((const double_complex*) a_cpu, sizea, starta,
              (double_complex*) b_cpu, sizeb);
}

void bmgs_cutmz_cpu(const void *a_cpu, const int sizea[3],
                    const int starta[3],
                    void *b_cpu, const int sizeb[3],
                    void *phase)
{
    double_complex *ph = (double_complex *) phase;
    bmgs_cutmz((const double_complex *) a_cpu, sizea, starta,
               (double_complex *) b_cpu, sizeb, *ph);
}