jan/opencl_fdfd
2
1
Fork 1
Code Issues Pull Requests Releases Wiki Activity

minor cleanup of generated source

Browse Source
This commit is contained in:
Jan Petykiewicz 2017-05-20 21:30:32 -07:00
parent 4ffa5e4a66
commit 1d5e7ff3bb
1 changed files with 7 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
opencl_fdfd/kernels/e2h.cl
View File

@ -31,7 +31,7 @@ __global char *pmc_z = pmc + ZZ;
//Update H components; set them to 0 if PMC is enabled at that location. //Update H components; set them to 0 if PMC is enabled at that location.
//Mu division and PMC conditional are only included if {{mu}} and {{pmc}} are true //Mu division and PMC conditional are only included if {mu} and {pmc} are true
{% if pmc -%} {% if pmc -%}
if (pmc_x[i] != 0) { if (pmc_x[i] != 0) {
Hx[i] = zero; Hx[i] = zero;
@ -42,9 +42,9 @@ if (pmc_x[i] != 0) {
ctype Dyz = mul(sub(Ey[i + pz], Ey[i]), inv_dez[z]); ctype Dyz = mul(sub(Ey[i + pz], Ey[i]), inv_dez[z]);
ctype x_curl = sub(Dzy, Dyz); ctype x_curl = sub(Dzy, Dyz);
{%- if mu -%} {%- if mu %}
Hx[i] = mul(inv_mu_x[i], x_curl); Hx[i] = mul(inv_mu_x[i], x_curl);
{%- else -%} {%- else %}
Hx[i] = x_curl; Hx[i] = x_curl;
{%- endif %} {%- endif %}
} }
@ -59,9 +59,9 @@ if (pmc_y[i] != 0) {
ctype Dzx = mul(sub(Ez[i + px], Ez[i]), inv_dex[x]); ctype Dzx = mul(sub(Ez[i + px], Ez[i]), inv_dex[x]);
ctype y_curl = sub(Dxz, Dzx); ctype y_curl = sub(Dxz, Dzx);
{%- if mu -%} {%- if mu %}
Hy[i] = mul(inv_mu_y[i], y_curl); Hy[i] = mul(inv_mu_y[i], y_curl);
{%- else -%} {%- else %}
Hy[i] = y_curl; Hy[i] = y_curl;
{%- endif %} {%- endif %}
} }
@ -76,9 +76,9 @@ if (pmc_z[i] != 0) {
ctype Dxy = mul(sub(Ex[i + py], Ex[i]), inv_dey[y]); ctype Dxy = mul(sub(Ex[i + py], Ex[i]), inv_dey[y]);
ctype z_curl = sub(Dyx, Dxy); ctype z_curl = sub(Dyx, Dxy);
{%- if mu -%} {%- if mu %}
Hz[i] = mul(inv_mu_z[i], z_curl); Hz[i] = mul(inv_mu_z[i], z_curl);
{%- else -%} {%- else %}
Hz[i] = z_curl; Hz[i] = z_curl;
{%- endif %} {%- endif %}
} }