mult_Wilson_xyz_openacc-inc.h File Reference

Go to the source code of this file.

Functions
	if (ix==Nx-1) bc2
	if (iy==Ny-1) bc2
	if (iz==Nz-1) bc2

Variables
int	idir = 0
int	iyzt = site/Nx
int	ix = site % Nx
int	nn = (ix+1) % Nx
int	isn = nn + iyzt * Nx
int	isg = ix + iyzt * Nx + idir * Nst_pad
	vt1_0 = v1[IDX2_SP_R(0,0,isn)] - v1[IDX2_SP_I(0,3,isn)]
	vt1_1 = v1[IDX2_SP_I(0,0,isn)] + v1[IDX2_SP_R(0,3,isn)]
	vt1_2 = v1[IDX2_SP_R(1,0,isn)] - v1[IDX2_SP_I(1,3,isn)]
	vt1_3 = v1[IDX2_SP_I(1,0,isn)] + v1[IDX2_SP_R(1,3,isn)]
	vt1_4 = v1[IDX2_SP_R(2,0,isn)] - v1[IDX2_SP_I(2,3,isn)]
	vt1_5 = v1[IDX2_SP_I(2,0,isn)] + v1[IDX2_SP_R(2,3,isn)]
	vt2_0 = v1[IDX2_SP_R(0,1,isn)] - v1[IDX2_SP_I(0,2,isn)]
	vt2_1 = v1[IDX2_SP_I(0,1,isn)] + v1[IDX2_SP_R(0,2,isn)]
	vt2_2 = v1[IDX2_SP_R(1,1,isn)] - v1[IDX2_SP_I(1,2,isn)]
	vt2_3 = v1[IDX2_SP_I(1,1,isn)] + v1[IDX2_SP_R(1,2,isn)]
	vt2_4 = v1[IDX2_SP_R(2,1,isn)] - v1[IDX2_SP_I(2,2,isn)]
	vt2_5 = v1[IDX2_SP_I(2,1,isn)] + v1[IDX2_SP_R(2,2,isn)]
	u_0 = u_up[IDX2_G_R(0,0,isg)]
	u_1 = u_up[IDX2_G_I(0,0,isg)]
	u_2 = u_up[IDX2_G_R(1,0,isg)]
	u_3 = u_up[IDX2_G_I(1,0,isg)]
	u_4 = u_up[IDX2_G_R(2,0,isg)]
	u_5 = u_up[IDX2_G_I(2,0,isg)]
	wt1r
	wt1i
	wt2r
	wt2i
	v2_01 = bc2 * wt1r
	v2_11 = bc2 * wt1i
	v2_02 = bc2 * wt2r
	v2_12 = bc2 * wt2i
	v2_03 = bc2 * wt2i
	v2_13 = -bc2 * wt2r
	v2_04 = bc2 * wt1i
	v2_14 = -bc2 * wt1r
	u_6 = u_up[IDX2_G_R(0,1,isg)]
	u_7 = u_up[IDX2_G_I(0,1,isg)]
	u_8 = u_up[IDX2_G_R(1,1,isg)]
	u_9 = u_up[IDX2_G_I(1,1,isg)]
	u10 = u_up[IDX2_G_R(2,1,isg)]
	u11 = u_up[IDX2_G_I(2,1,isg)]
	v2_21 = bc2 * wt1r
	v2_31 = bc2 * wt1i
	v2_22 = bc2 * wt2r
	v2_32 = bc2 * wt2i
	v2_23 = bc2 * wt2i
	v2_33 = -bc2 * wt2r
	v2_24 = bc2 * wt1i
	v2_34 = -bc2 * wt1r
	u12 = u_up[IDX2_G_R(0,2,isg)]
	u13 = u_up[IDX2_G_I(0,2,isg)]
	u14 = u_up[IDX2_G_R(1,2,isg)]
	u15 = u_up[IDX2_G_I(1,2,isg)]
	u16 = u_up[IDX2_G_R(2,2,isg)]
	u17 = u_up[IDX2_G_I(2,2,isg)]
	v2_41 = bc2 * wt1r
	v2_51 = bc2 * wt1i
	v2_42 = bc2 * wt2r
	v2_52 = bc2 * wt2i
	v2_43 = bc2 * wt2i
	v2_53 = -bc2 * wt2r
	v2_44 = bc2 * wt1i
	v2_54 = -bc2 * wt1r
int	izt = site/(Nx*Ny)
int	iy = (site/Nx) % Ny
	bc2 = 1.0
int	it = site/(Nx*Ny*Nz)
int	iz = (site/(Nx*Ny)) % Nz
int	ixy = site % (Nx*Ny)

Detailed Description

Author

Hideo Matsufuru (matufuru)

Date

LastChangedDate

2013-01-22 13:51:53 #

Version

LastChangedRevision

2653

Definition in file mult_Wilson_xyz_openacc-inc.h.

Function Documentation

if() [1/3]

if

(

ix

= =Nx-1

)

if() [2/3]

if

(

iy

= =Ny-1

)

if() [3/3]

if

(

iz

= =Nz-1

)

Variable Documentation

bc2

bc2 = 1.0

Definition at line 278 of file mult_Wilson_xyz_openacc-inc.h.

idir

idir = 0

Definition at line 13 of file mult_Wilson_xyz_openacc-inc.h.

isg

isg = ix + iyzt * Nx + idir * Nst_pad

Definition at line 20 of file mult_Wilson_xyz_openacc-inc.h.

isn

isn = nn + iyzt * Nx

Definition at line 19 of file mult_Wilson_xyz_openacc-inc.h.

it

int it = site/(Nx*Ny*Nz)

Definition at line 461 of file mult_Wilson_xyz_openacc-inc.h.

ix

ix = site % Nx

Definition at line 16 of file mult_Wilson_xyz_openacc-inc.h.

ixy

int ixy = site % (Nx*Ny)

Definition at line 463 of file mult_Wilson_xyz_openacc-inc.h.

iy

int iy = (site/Nx) % Ny

Definition at line 239 of file mult_Wilson_xyz_openacc-inc.h.

iyzt

int iyzt = site/Nx

Definition at line 15 of file mult_Wilson_xyz_openacc-inc.h.

iz

int iz = (site/(Nx*Ny)) % Nz

Definition at line 462 of file mult_Wilson_xyz_openacc-inc.h.

izt

int izt = site/(Nx*Ny)

Definition at line 238 of file mult_Wilson_xyz_openacc-inc.h.

nn

nn = (ix+1) % Nx

Definition at line 17 of file mult_Wilson_xyz_openacc-inc.h.

u10

u10 = u_up[IDX2_G_R(2,1,isg)]

Definition at line 69 of file mult_Wilson_xyz_openacc-inc.h.

u11

u11 = u_up[IDX2_G_I(2,1,isg)]

Definition at line 70 of file mult_Wilson_xyz_openacc-inc.h.

u12

u12 = u_up[IDX2_G_R(0,2,isg)]

Definition at line 99 of file mult_Wilson_xyz_openacc-inc.h.

u13

u13 = u_up[IDX2_G_I(0,2,isg)]

Definition at line 100 of file mult_Wilson_xyz_openacc-inc.h.

u14

u14 = u_up[IDX2_G_R(1,2,isg)]

Definition at line 101 of file mult_Wilson_xyz_openacc-inc.h.

u15

u15 = u_up[IDX2_G_I(1,2,isg)]

Definition at line 102 of file mult_Wilson_xyz_openacc-inc.h.

u16

u16 = u_up[IDX2_G_R(2,2,isg)]

Definition at line 103 of file mult_Wilson_xyz_openacc-inc.h.

u17

u17 = u_up[IDX2_G_I(2,2,isg)]

Definition at line 104 of file mult_Wilson_xyz_openacc-inc.h.

u_0

u_0 = u_up[IDX2_G_R(0,0,isg)]

Definition at line 36 of file mult_Wilson_xyz_openacc-inc.h.

u_1

u_1 = u_up[IDX2_G_I(0,0,isg)]

Definition at line 37 of file mult_Wilson_xyz_openacc-inc.h.

u_2

u_2 = u_up[IDX2_G_R(1,0,isg)]

Definition at line 38 of file mult_Wilson_xyz_openacc-inc.h.

u_3

u_3 = u_up[IDX2_G_I(1,0,isg)]

Definition at line 39 of file mult_Wilson_xyz_openacc-inc.h.

u_4

u_4 = u_up[IDX2_G_R(2,0,isg)]

Definition at line 40 of file mult_Wilson_xyz_openacc-inc.h.

u_5

u_5 = u_up[IDX2_G_I(2,0,isg)]

Definition at line 41 of file mult_Wilson_xyz_openacc-inc.h.

u_6

u_6 = u_up[IDX2_G_R(0,1,isg)]

Definition at line 65 of file mult_Wilson_xyz_openacc-inc.h.

u_7

u_7 = u_up[IDX2_G_I(0,1,isg)]

Definition at line 66 of file mult_Wilson_xyz_openacc-inc.h.

u_8

u_8 = u_up[IDX2_G_R(1,1,isg)]

Definition at line 67 of file mult_Wilson_xyz_openacc-inc.h.

u_9

u_9 = u_up[IDX2_G_I(1,1,isg)]

Definition at line 68 of file mult_Wilson_xyz_openacc-inc.h.

v2_01

v2_01 = bc2 * wt1r

Definition at line 56 of file mult_Wilson_xyz_openacc-inc.h.

v2_02

v2_02 = bc2 * wt2r

Definition at line 58 of file mult_Wilson_xyz_openacc-inc.h.

v2_03

v2_03 = bc2 * wt2i

Definition at line 60 of file mult_Wilson_xyz_openacc-inc.h.

v2_04

v2_04 = bc2 * wt1i

Definition at line 62 of file mult_Wilson_xyz_openacc-inc.h.

v2_11

v2_11 = bc2 * wt1i

Definition at line 57 of file mult_Wilson_xyz_openacc-inc.h.

v2_12

v2_12 = bc2 * wt2i

Definition at line 59 of file mult_Wilson_xyz_openacc-inc.h.

v2_13

v2_13 = -bc2 * wt2r

Definition at line 61 of file mult_Wilson_xyz_openacc-inc.h.

v2_14

v2_14 = -bc2 * wt1r

Definition at line 63 of file mult_Wilson_xyz_openacc-inc.h.

v2_21

v2_21 = bc2 * wt1r

Definition at line 82 of file mult_Wilson_xyz_openacc-inc.h.

v2_22

v2_22 = bc2 * wt2r

Definition at line 84 of file mult_Wilson_xyz_openacc-inc.h.

v2_23

v2_23 = bc2 * wt2i

Definition at line 86 of file mult_Wilson_xyz_openacc-inc.h.

v2_24

v2_24 = bc2 * wt1i

Definition at line 88 of file mult_Wilson_xyz_openacc-inc.h.

v2_31

v2_31 = bc2 * wt1i

Definition at line 83 of file mult_Wilson_xyz_openacc-inc.h.

v2_32

v2_32 = bc2 * wt2i

Definition at line 85 of file mult_Wilson_xyz_openacc-inc.h.

v2_33

v2_33 = -bc2 * wt2r

Definition at line 87 of file mult_Wilson_xyz_openacc-inc.h.

v2_34

v2_34 = -bc2 * wt1r

Definition at line 89 of file mult_Wilson_xyz_openacc-inc.h.

v2_41

v2_41 = bc2 * wt1r

Definition at line 117 of file mult_Wilson_xyz_openacc-inc.h.

v2_42

v2_42 = bc2 * wt2r

Definition at line 119 of file mult_Wilson_xyz_openacc-inc.h.

v2_43

v2_43 = bc2 * wt2i

Definition at line 121 of file mult_Wilson_xyz_openacc-inc.h.

v2_44

v2_44 = bc2 * wt1i

Definition at line 123 of file mult_Wilson_xyz_openacc-inc.h.

v2_51

v2_51 = bc2 * wt1i

Definition at line 118 of file mult_Wilson_xyz_openacc-inc.h.

v2_52

v2_52 = bc2 * wt2i

Definition at line 120 of file mult_Wilson_xyz_openacc-inc.h.

v2_53

v2_53 = -bc2 * wt2r

Definition at line 122 of file mult_Wilson_xyz_openacc-inc.h.

v2_54

v2_54 = -bc2 * wt1r

Definition at line 124 of file mult_Wilson_xyz_openacc-inc.h.

vt1_0

vt1_0 = v1[IDX2_SP_R(0,0,isn)] - v1[IDX2_SP_I(0,3,isn)]

Definition at line 22 of file mult_Wilson_xyz_openacc-inc.h.

vt1_1

vt1_1 = v1[IDX2_SP_I(0,0,isn)] + v1[IDX2_SP_R(0,3,isn)]

Definition at line 23 of file mult_Wilson_xyz_openacc-inc.h.

vt1_2

vt1_2 = v1[IDX2_SP_R(1,0,isn)] - v1[IDX2_SP_I(1,3,isn)]

Definition at line 24 of file mult_Wilson_xyz_openacc-inc.h.

vt1_3

vt1_3 = v1[IDX2_SP_I(1,0,isn)] + v1[IDX2_SP_R(1,3,isn)]

Definition at line 25 of file mult_Wilson_xyz_openacc-inc.h.

vt1_4

vt1_4 = v1[IDX2_SP_R(2,0,isn)] - v1[IDX2_SP_I(2,3,isn)]

Definition at line 26 of file mult_Wilson_xyz_openacc-inc.h.

vt1_5

vt1_5 = v1[IDX2_SP_I(2,0,isn)] + v1[IDX2_SP_R(2,3,isn)]

Definition at line 27 of file mult_Wilson_xyz_openacc-inc.h.

vt2_0

vt2_0 = v1[IDX2_SP_R(0,1,isn)] - v1[IDX2_SP_I(0,2,isn)]

Definition at line 29 of file mult_Wilson_xyz_openacc-inc.h.

vt2_1

vt2_1 = v1[IDX2_SP_I(0,1,isn)] + v1[IDX2_SP_R(0,2,isn)]

Definition at line 30 of file mult_Wilson_xyz_openacc-inc.h.

vt2_2

vt2_2 = v1[IDX2_SP_R(1,1,isn)] - v1[IDX2_SP_I(1,2,isn)]

Definition at line 31 of file mult_Wilson_xyz_openacc-inc.h.

vt2_3

vt2_3 = v1[IDX2_SP_I(1,1,isn)] + v1[IDX2_SP_R(1,2,isn)]

Definition at line 32 of file mult_Wilson_xyz_openacc-inc.h.

vt2_4

vt2_4 = v1[IDX2_SP_R(2,1,isn)] - v1[IDX2_SP_I(2,2,isn)]

Definition at line 33 of file mult_Wilson_xyz_openacc-inc.h.

vt2_5

vt2_5 = v1[IDX2_SP_I(2,1,isn)] + v1[IDX2_SP_R(2,2,isn)]

Definition at line 34 of file mult_Wilson_xyz_openacc-inc.h.

wt1i

wt1i

Initial value:

= MULT_GXi(u_0, u_1, u_2, u_3, u_4, u_5,
                      vt1_0, vt1_1, vt1_2, vt1_3, vt1_4, vt1_5)

Definition at line 45 of file mult_Wilson_xyz_openacc-inc.h.

wt1r

wt1r

Initial value:

= MULT_GXr(u_0, u_1, u_2, u_3, u_4, u_5,
                      vt1_0, vt1_1, vt1_2, vt1_3, vt1_4, vt1_5)

Definition at line 43 of file mult_Wilson_xyz_openacc-inc.h.

wt2i

wt2i

Initial value:

= MULT_GXi(u_0, u_1, u_2, u_3, u_4, u_5,
                      vt2_0, vt2_1, vt2_2, vt2_3, vt2_4, vt2_5)

Definition at line 49 of file mult_Wilson_xyz_openacc-inc.h.

wt2r

wt2r

Initial value:

= MULT_GXr(u_0, u_1, u_2, u_3, u_4, u_5,
                      vt2_0, vt2_1, vt2_2, vt2_3, vt2_4, vt2_5)

Definition at line 47 of file mult_Wilson_xyz_openacc-inc.h.