Skip to content
GitLab
Commit 7e29ea40 authored by Uwe Schulzweida's avatar Uwe Schulzweida
Browse files

Removed #pragma omp simd.

parent 1a2e54a4
Hide whitespace changes
Inline Side-by-side
src/after_fctrans.cc
View file @ 7e29ea40
#include <stdio.h>
#include <stdlib.h>
#include <math.h>
#if defined(HAVE_CONFIG_H)
#ifdef HAVE_CONFIG_H
#include "config.h"
#endif
#ifndef _DMEMORY_H
# include "dmemory.h"
#include "dmemory.h"
#endif
......@@ -165,9 +161,6 @@ int rpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -200,9 +193,6 @@ int rpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -233,9 +223,6 @@ int rpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -256,9 +243,6 @@ int rpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -293,9 +277,6 @@ int rpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -335,9 +316,6 @@ int rpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -378,9 +356,6 @@ int rpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -405,9 +380,6 @@ int rpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -447,9 +419,6 @@ int rpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -494,9 +463,6 @@ int rpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -546,9 +512,6 @@ int rpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -575,9 +538,6 @@ int rpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -618,9 +578,6 @@ int rpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -678,9 +635,6 @@ int rpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -745,9 +699,6 @@ int rpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -783,9 +734,6 @@ int rpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -835,9 +783,6 @@ int rpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -897,9 +842,6 @@ int rpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -960,9 +902,6 @@ int rpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -991,9 +930,6 @@ int rpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -1053,9 +989,6 @@ int rpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -1159,9 +1092,6 @@ int qpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -1193,9 +1123,6 @@ int qpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -1223,9 +1150,6 @@ int qpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -1247,9 +1171,6 @@ int qpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -1283,9 +1204,6 @@ int qpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -1322,9 +1240,6 @@ int qpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -1366,9 +1281,6 @@ int qpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -1393,9 +1305,6 @@ int qpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -1433,9 +1342,6 @@ int qpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -1481,9 +1387,6 @@ int qpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -1531,9 +1434,6 @@ int qpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -1557,9 +1457,6 @@ int qpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -1604,9 +1501,6 @@ int qpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -1661,9 +1555,6 @@ int qpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -1732,9 +1623,6 @@ int qpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -1772,9 +1660,6 @@ int qpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -1833,9 +1718,6 @@ int qpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -1896,9 +1778,6 @@ int qpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -1969,9 +1848,6 @@ int qpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -2003,9 +1879,6 @@ int qpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......@@ -2066,9 +1939,6 @@ int qpassc(double *a, double *b, double *c, double *d, double *trigs,
j = jbase;
#if defined(SX)
#pragma vdir nodep
#endif
#if defined(HAVE_OPENMP4)
#pragma omp simd
#endif
for (ijk = 0; ijk < lot; ++ijk)
{
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment

Imprint | Privacy Policy