1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53
|
#include <iostream>
#include <string>
#include <vector>
#include <cassert>
#include <cmath>
#include <complex>
#include <Kokkos_Core.hpp>
#include <lfortran_intrinsics.h>
template <typename T>
Kokkos::View<T*> from_std_vector(const std::vector<T> &v)
{
Kokkos::View<T*> r("r", v.size());
for (size_t i=0; i < v.size(); i++) {
r(i) = v[i];
}
return r;
}
// Forward declarations
namespace {
}
// Implementations
namespace {
void main2() {
int32_t i;
float r;
r = 1.00000000000000000e+00*(float)(2);
r = (float)(2)* 1.00000000000000000e+00;
r = (float)(2)*((float)(3) + 1.00000000000000000e+00);
r = (float)(2)*( 3.00000000000000000e+00 - (float)(1));
r = (float)(1/2);
r = 1.00000000000000000e+00/(float)(2);
r = (float)(1)/ 2.00000000000000000e+00;
i = (int32_t)( 1.00000000000000000e+00*(float)(2));
i = (int32_t)((float)(2)* 1.00000000000000000e+00);
i = (int32_t)((float)(2)*((float)(3) + 1.00000000000000000e+00));
i = (int32_t)((float)(2)*( 3.00000000000000000e+00 - (float)(1)));
i = 1/2;
i = (int32_t)( 1.00000000000000000e+00/(float)(2));
i = (int32_t)((float)(1)/ 2.00000000000000000e+00);
}
}
int main(int argc, char* argv[])
{
Kokkos::initialize(argc, argv);
main2();
Kokkos::finalize();
return 0;
}
|