mult_Wilson_eo_xyz_openacc-inc.h File Reference

Go to the source code of this file.

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

Variables
int	idir = 0
int	iyzt = iy + Ny * (iz + Nz * it)
int	isn = ((ix + keo) % Nx) + Nx * iyzt
int	isg = site + Nst_pad * (ieo + 2*idir)
	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
	bc2 = 1.0
	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	ix2 = (ix - 1 + keo + Nx) % Nx
int	izt = site / Nxy
int	nn = (iy + 1) % Ny
int	ixy = site % Nxy

Detailed Description

Author

Hideo Matsufuru (matufuru)

Date

LastChangedDate

2013-01-22 13:51:53 #

Version

LastChangedRevision

2653

Definition in file mult_Wilson_eo_xyz_openacc-inc.h.

Function Documentation

if() [1/3]

if

(

ix

= =Nx-1 &&keo==1

)

if() [2/3]

if

(

iy

= =Ny-1

)

if() [3/3]

if

(

iz

= =Nz-1

)

Variable Documentation

bc2

bc2 = 1.0

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

idir

idir = 0

Definition at line 12 of file mult_Wilson_eo_xyz_openacc-inc.h.

isg

isg = site + Nst_pad * (ieo + 2*idir)

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

isn

isn = ((ix + keo) % Nx) + Nx * iyzt

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

ix2

int ix2 = (ix - 1 + keo + Nx) % Nx

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

ixy

int ixy = site % Nxy

Definition at line 453 of file mult_Wilson_eo_xyz_openacc-inc.h.

iyzt

int iyzt = iy + Ny * (iz + Nz * it)

Definition at line 14 of file mult_Wilson_eo_xyz_openacc-inc.h.

izt

int izt = site / Nxy

Definition at line 232 of file mult_Wilson_eo_xyz_openacc-inc.h.

nn

nn = (iy + 1) % Ny

Definition at line 233 of file mult_Wilson_eo_xyz_openacc-inc.h.

u10

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

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

u11

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

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

u12

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

Definition at line 95 of file mult_Wilson_eo_xyz_openacc-inc.h.

u13

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

Definition at line 96 of file mult_Wilson_eo_xyz_openacc-inc.h.

u14

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

Definition at line 97 of file mult_Wilson_eo_xyz_openacc-inc.h.

u15

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

Definition at line 98 of file mult_Wilson_eo_xyz_openacc-inc.h.

u16

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

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

u17

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

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

u_0

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

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

u_1

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

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

u_2

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

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

u_3

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

Definition at line 35 of file mult_Wilson_eo_xyz_openacc-inc.h.

u_4

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

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

u_5

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

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

u_6

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

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

u_7

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

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

u_8

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

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

u_9

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

Definition at line 64 of file mult_Wilson_eo_xyz_openacc-inc.h.

v2_01

v2_01 = bc2 * wt1r

Definition at line 52 of file mult_Wilson_eo_xyz_openacc-inc.h.

v2_02

v2_02 = bc2 * wt2r

Definition at line 54 of file mult_Wilson_eo_xyz_openacc-inc.h.

v2_03

v2_03 = bc2 * wt2i

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

v2_04

v2_04 = bc2 * wt1i

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

v2_11

v2_11 = bc2 * wt1i

Definition at line 53 of file mult_Wilson_eo_xyz_openacc-inc.h.

v2_12

v2_12 = bc2 * wt2i

Definition at line 55 of file mult_Wilson_eo_xyz_openacc-inc.h.

v2_13

v2_13 = -bc2 * wt2r

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

v2_14

v2_14 = -bc2 * wt1r

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

v2_21

v2_21 = bc2 * wt1r

Definition at line 78 of file mult_Wilson_eo_xyz_openacc-inc.h.

v2_22

v2_22 = bc2 * wt2r

Definition at line 80 of file mult_Wilson_eo_xyz_openacc-inc.h.

v2_23

v2_23 = bc2 * wt2i

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

v2_24

v2_24 = bc2 * wt1i

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

v2_31

v2_31 = bc2 * wt1i

Definition at line 79 of file mult_Wilson_eo_xyz_openacc-inc.h.

v2_32

v2_32 = bc2 * wt2i

Definition at line 81 of file mult_Wilson_eo_xyz_openacc-inc.h.

v2_33

v2_33 = -bc2 * wt2r

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

v2_34

v2_34 = -bc2 * wt1r

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

v2_41

v2_41 = bc2 * wt1r

Definition at line 113 of file mult_Wilson_eo_xyz_openacc-inc.h.

v2_42

v2_42 = bc2 * wt2r

Definition at line 115 of file mult_Wilson_eo_xyz_openacc-inc.h.

v2_43

v2_43 = bc2 * wt2i

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

v2_44

v2_44 = bc2 * wt1i

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

v2_51

v2_51 = bc2 * wt1i

Definition at line 114 of file mult_Wilson_eo_xyz_openacc-inc.h.

v2_52

v2_52 = bc2 * wt2i

Definition at line 116 of file mult_Wilson_eo_xyz_openacc-inc.h.

v2_53

v2_53 = -bc2 * wt2r

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

v2_54

v2_54 = -bc2 * wt1r

Definition at line 120 of file mult_Wilson_eo_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 18 of file mult_Wilson_eo_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 19 of file mult_Wilson_eo_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 20 of file mult_Wilson_eo_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 21 of file mult_Wilson_eo_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 22 of file mult_Wilson_eo_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 23 of file mult_Wilson_eo_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 25 of file mult_Wilson_eo_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 26 of file mult_Wilson_eo_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 27 of file mult_Wilson_eo_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 28 of file mult_Wilson_eo_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 29 of file mult_Wilson_eo_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 30 of file mult_Wilson_eo_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 41 of file mult_Wilson_eo_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 39 of file mult_Wilson_eo_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 45 of file mult_Wilson_eo_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 43 of file mult_Wilson_eo_xyz_openacc-inc.h.