mult_Domainwall_eo_t_dirac_openacc-inc.h File Reference

Go to the source code of this file.

Functions
	if (jgm5==0)
	if (it==Nt-1) bc2 = bc[3]

Variables
int	nn = (it + 1) % Nt
int	ixyz = site % Nxyz
int	isn = ixyz + nn * Nxyz
int	isg = ixyz + it * Nxyz + Nst_pad * (ieo + 2 * idir)
	else
	vt1_1 = 2.0 * v1[IDX2_SP_5D_I(0, 0, is, Ns, isn)]
	vt1_2 = 2.0 * v1[IDX2_SP_5D_R(1, 0, is, Ns, isn)]
	vt1_3 = 2.0 * v1[IDX2_SP_5D_I(1, 0, is, Ns, isn)]
	vt1_4 = 2.0 * v1[IDX2_SP_5D_R(2, 0, is, Ns, isn)]
	vt1_5 = 2.0 * v1[IDX2_SP_5D_I(2, 0, is, Ns, isn)]
	vt2_0 = 2.0 * v1[IDX2_SP_5D_R(0, 1, is, Ns, isn)]
	vt2_1 = 2.0 * v1[IDX2_SP_5D_I(0, 1, is, Ns, isn)]
	vt2_2 = 2.0 * v1[IDX2_SP_5D_R(1, 1, is, Ns, isn)]
	vt2_3 = 2.0 * v1[IDX2_SP_5D_I(1, 1, is, Ns, isn)]
	vt2_4 = 2.0 * v1[IDX2_SP_5D_R(2, 1, is, Ns, isn)]
	vt2_5 = 2.0 * v1[IDX2_SP_5D_I(2, 1, is, Ns, 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
int	bc2 = 1.0
	v2_03 = bc2 * wt1r
	v2_13 = bc2 * wt1i
	v2_04 = bc2 * wt2r
	v2_14 = bc2 * wt2i
	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_23 = bc2 * wt1r
	v2_33 = bc2 * wt1i
	v2_24 = bc2 * wt2r
	v2_34 = bc2 * wt2i
	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_43 = bc2 * wt1r
	v2_53 = bc2 * wt1i
	v2_44 = bc2 * wt2r
	v2_54 = bc2 * wt2i
	v2_01 = bc2 * wt1r
	v2_11 = bc2 * wt1i
	v2_02 = bc2 * wt2r
	v2_12 = bc2 * wt2i
	v2_21 = bc2 * wt1r
	v2_31 = bc2 * wt1i
	v2_22 = bc2 * wt2r
	v2_32 = bc2 * wt2i
	v2_41 = bc2 * wt1r
	v2_51 = bc2 * wt1i
	v2_42 = bc2 * wt2r
	v2_52 = bc2 * wt2i

Function Documentation

if() [1/2]

if

(

it

= =Nt-1

)

= bc[3]

if() [2/2]

if

(

jgm5

= = 0

)

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

Variable Documentation

bc2

bc2 = 1.0

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

else

else

Initial value:

{
        vt1_0 = 2.0 * v1[IDX2_SP_5D_R(0, 0, is, Ns, isn)]

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

isg

isg = ixyz + it * Nxyz + Nst_pad * (ieo + 2 * idir)

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

isn

isn = ixyz + nn * Nxyz

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

ixyz

int ixyz = site % Nxyz

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

nn

nn = (it + 1) % Nt

Definition at line 11 of file mult_Domainwall_eo_t_dirac_openacc-inc.h.

u10

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

Definition at line 73 of file mult_Domainwall_eo_t_dirac_openacc-inc.h.

u11

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

Definition at line 74 of file mult_Domainwall_eo_t_dirac_openacc-inc.h.

u12

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

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

u13

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

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

u14

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

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

u15

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

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

u16

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

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

u17

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

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

u_0

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

Definition at line 46 of file mult_Domainwall_eo_t_dirac_openacc-inc.h.

u_1

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

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

u_2

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

Definition at line 48 of file mult_Domainwall_eo_t_dirac_openacc-inc.h.

u_3

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

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

u_4

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

Definition at line 50 of file mult_Domainwall_eo_t_dirac_openacc-inc.h.

u_5

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

Definition at line 51 of file mult_Domainwall_eo_t_dirac_openacc-inc.h.

u_6

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

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

u_7

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

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

u_8

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

Definition at line 71 of file mult_Domainwall_eo_t_dirac_openacc-inc.h.

u_9

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

Definition at line 72 of file mult_Domainwall_eo_t_dirac_openacc-inc.h.

v2_01

v2_01 = bc2 * wt1r

Definition at line 173 of file mult_Domainwall_eo_t_dirac_openacc-inc.h.

v2_02

v2_02 = bc2 * wt2r

Definition at line 175 of file mult_Domainwall_eo_t_dirac_openacc-inc.h.

v2_03

v2_03 = bc2 * wt1r

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

v2_04

v2_04 = bc2 * wt2r

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

v2_11

v2_11 = bc2 * wt1i

Definition at line 174 of file mult_Domainwall_eo_t_dirac_openacc-inc.h.

v2_12

v2_12 = bc2 * wt2i

Definition at line 176 of file mult_Domainwall_eo_t_dirac_openacc-inc.h.

v2_13

v2_13 = bc2 * wt1i

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

v2_14

v2_14 = bc2 * wt2i

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

v2_21

v2_21 = bc2 * wt1r

Definition at line 194 of file mult_Domainwall_eo_t_dirac_openacc-inc.h.

v2_22

v2_22 = bc2 * wt2r

Definition at line 196 of file mult_Domainwall_eo_t_dirac_openacc-inc.h.

v2_23

v2_23 = bc2 * wt1r

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

v2_24

v2_24 = bc2 * wt2r

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

v2_31

v2_31 = bc2 * wt1i

Definition at line 195 of file mult_Domainwall_eo_t_dirac_openacc-inc.h.

v2_32

v2_32 = bc2 * wt2i

Definition at line 197 of file mult_Domainwall_eo_t_dirac_openacc-inc.h.

v2_33

v2_33 = bc2 * wt1i

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

v2_34

v2_34 = bc2 * wt2i

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

v2_41

v2_41 = bc2 * wt1r

Definition at line 224 of file mult_Domainwall_eo_t_dirac_openacc-inc.h.

v2_42

v2_42 = bc2 * wt2r

Definition at line 226 of file mult_Domainwall_eo_t_dirac_openacc-inc.h.

v2_43

v2_43 = bc2 * wt1r

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

v2_44

v2_44 = bc2 * wt2r

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

v2_51

v2_51 = bc2 * wt1i

Definition at line 225 of file mult_Domainwall_eo_t_dirac_openacc-inc.h.

v2_52

v2_52 = bc2 * wt2i

Definition at line 227 of file mult_Domainwall_eo_t_dirac_openacc-inc.h.

v2_53

v2_53 = bc2 * wt1i

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

v2_54

v2_54 = bc2 * wt2i

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

vt1_1

vt1_1 = 2.0 * v1[IDX2_SP_5D_I(0, 0, is, Ns, isn)]

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

vt1_2

vt1_2 = 2.0 * v1[IDX2_SP_5D_R(1, 0, is, Ns, isn)]

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

vt1_3

vt1_3 = 2.0 * v1[IDX2_SP_5D_I(1, 0, is, Ns, isn)]

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

vt1_4

vt1_4 = 2.0 * v1[IDX2_SP_5D_R(2, 0, is, Ns, isn)]

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

vt1_5

vt1_5 = 2.0 * v1[IDX2_SP_5D_I(2, 0, is, Ns, isn)]

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

vt2_0

vt2_0 = 2.0 * v1[IDX2_SP_5D_R(0, 1, is, Ns, isn)]

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

vt2_1

vt2_1 = 2.0 * v1[IDX2_SP_5D_I(0, 1, is, Ns, isn)]

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

vt2_2

vt2_2 = 2.0 * v1[IDX2_SP_5D_R(1, 1, is, Ns, isn)]

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

vt2_3

vt2_3 = 2.0 * v1[IDX2_SP_5D_I(1, 1, is, Ns, isn)]

Definition at line 42 of file mult_Domainwall_eo_t_dirac_openacc-inc.h.

vt2_4

vt2_4 = 2.0 * v1[IDX2_SP_5D_R(2, 1, is, Ns, isn)]

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

vt2_5

vt2_5 = 2.0 * v1[IDX2_SP_5D_I(2, 1, is, Ns, isn)]

Definition at line 44 of file mult_Domainwall_eo_t_dirac_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 55 of file mult_Domainwall_eo_t_dirac_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 53 of file mult_Domainwall_eo_t_dirac_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 59 of file mult_Domainwall_eo_t_dirac_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 57 of file mult_Domainwall_eo_t_dirac_openacc-inc.h.