FM2DElectroStatic.cpp

Go to the documentation of this file.

#include "Fields/FM2DElectroStatic.h"
#include "Fields/Fieldmap.hpp"
#include "Physics/Units.h"
#include "Utilities/GeneralClassicException.h"
#include "Utilities/Util.h"

#include <fstream>
#include <ios>
#include <cmath>

_FM2DElectroStatic::_FM2DElectroStatic(const std::string& filename)
    : _Fieldmap(filename),
      FieldstrengthEz_m(nullptr),
      FieldstrengthEr_m(nullptr) {
    std::ifstream file;
    std::string tmpString;
    double tmpDouble;

    Type =  T2DElectroStatic;

    // open field map, parse it and disable element on error
    file.open(Filename_m.c_str());
    if (file.good()) {
        bool parsing_passed = true;
        try {
            parsing_passed = interpretLine<std::string, std::string>(file, tmpString, tmpString);
        } catch (GeneralClassicException &e) {
            parsing_passed = interpretLine<std::string, std::string, std::string>(file,
                                                                                   tmpString,
                                                                                   tmpString,
                                                                                   tmpString);

            tmpString = Util::toUpper(tmpString);
            if (tmpString != "TRUE" &&
                tmpString != "FALSE")
                throw GeneralClassicException("_FM2DElectroStatic::_FM2DElectroStatic",
                                              "The third string on the first line of 2D field "
                                              "maps has to be either TRUE or FALSE");

            normalize_m = (tmpString == "TRUE");
        }

        if (tmpString == "ZX") {
            swap_m = true;
            parsing_passed = parsing_passed &&
                             interpretLine<double, double, int>(file, rbegin_m, rend_m, num_gridpr_m);
            parsing_passed = parsing_passed &&
                             interpretLine<double, double, int>(file, zbegin_m, zend_m, num_gridpz_m);
        } else if (tmpString == "XZ") {
            swap_m = false;
            parsing_passed = parsing_passed &&
                             interpretLine<double, double, int>(file, zbegin_m, zend_m, num_gridpz_m);
            parsing_passed = parsing_passed &&
                             interpretLine<double, double, int>(file, rbegin_m, rend_m, num_gridpr_m);
        } else {
            std::cerr << "unknown orientation of 2D electrostatic fieldmap" << std::endl;
            parsing_passed = false;
        }

        for (long i = 0; (i < (num_gridpz_m + 1) * (num_gridpr_m + 1)) && parsing_passed; ++ i) {
            parsing_passed = parsing_passed && interpretLine<double, double>(file, tmpDouble, tmpDouble);
        }

        parsing_passed = parsing_passed &&
                         interpreteEOF(file);

        file.close();
        lines_read_m = 0;

        if (!parsing_passed) {
            disableFieldmapWarning();
            zend_m = zbegin_m - 1e-3;
            throw GeneralClassicException("_FM2DElectroStatic::_FM2DElectroStatic",
                                          "An error occured when reading the fieldmap '" + Filename_m + "'");
        } else {
            // conversion from cm to m
            rbegin_m *= Units::cm2m;
            rend_m *= Units::cm2m;
            zbegin_m *= Units::cm2m;
            zend_m *= Units::cm2m;

            hr_m = (rend_m - rbegin_m) / num_gridpr_m;
            hz_m = (zend_m - zbegin_m) / num_gridpz_m;

            // num spacings -> num grid points
            ++ num_gridpr_m;
            ++ num_gridpz_m;
        }
    } else {
        noFieldmapWarning();
        zbegin_m = 0.0;
        zend_m = -1e-3;
    }
}

_FM2DElectroStatic::~_FM2DElectroStatic() {
    freeMap();
}

FM2DElectroStatic _FM2DElectroStatic::create(const std::string& filename)
{
    return FM2DElectroStatic(new _FM2DElectroStatic(filename));
}

void _FM2DElectroStatic::readMap() {
    if (FieldstrengthEz_m == nullptr) {
        // declare variables and allocate memory
        std::ifstream in;
        std::string tmpString;
        double Ezmax = 0.0;

        FieldstrengthEz_m = new double[num_gridpz_m * num_gridpr_m];
        FieldstrengthEr_m = new double[num_gridpz_m * num_gridpr_m];

        // read in and parse field map
        in.open(Filename_m.c_str());
        getLine(in, tmpString);
        getLine(in, tmpString);
        getLine(in, tmpString);


        if (swap_m) {
            for (int i = 0; i < num_gridpz_m; ++ i) {
                for (int j = 0; j < num_gridpr_m; ++ j) {
                    interpretLine<double, double>(in,
                                                   FieldstrengthEr_m[i + j * num_gridpz_m],
                                                   FieldstrengthEz_m[i + j * num_gridpz_m]);
                }
                if (std::abs(FieldstrengthEz_m[i]) > Ezmax) Ezmax = std::abs(FieldstrengthEz_m[i]);
            }
        } else {
            for (int j = 0; j < num_gridpr_m; ++ j) {
                for (int i = 0; i < num_gridpz_m; ++ i) {
                    interpretLine<double, double>(in,
                                                   FieldstrengthEz_m[i + j * num_gridpz_m],
                                                   FieldstrengthEr_m[i + j * num_gridpz_m]);
                }
            }

            for (int i = 0; i < num_gridpz_m; ++ i) {
                if (std::abs(FieldstrengthEz_m[i]) > Ezmax) {
                    Ezmax = std::abs(FieldstrengthEz_m[i]);
                }
            }
        }
        in.close();

        if (!normalize_m)
            Ezmax = 1.0;

        // conversion MV/m to V/m and normalization to Ez_max = 1 MV/m
        for (int i = 0; i < num_gridpr_m * num_gridpz_m; ++ i) {
            FieldstrengthEz_m[i] *= Units::MVpm2Vpm / Ezmax;
            FieldstrengthEr_m[i] *= Units::MVpm2Vpm / Ezmax;
        }
        INFOMSG(typeset_msg("read in field map '" + Filename_m + "'", "info") << "\n"
                << endl);
    }
}

void _FM2DElectroStatic::freeMap() {
    if (FieldstrengthEz_m != nullptr) {
        delete[] FieldstrengthEz_m;
        FieldstrengthEz_m = nullptr;
        delete[] FieldstrengthEr_m;
        FieldstrengthEr_m = nullptr;
    }
}

bool _FM2DElectroStatic::getFieldstrength(const Vector_t &R, Vector_t &E, Vector_t &/*B*/) const {
    // do bi-linear interpolation
    const double RR = std::sqrt(R(0) * R(0) + R(1) * R(1));

    const int indexr = (int)std::floor(RR / hr_m);
    const double leverr = (RR / hr_m) - indexr;

    const int indexz = (int)std::floor((R(2) - zbegin_m) / hz_m);
    const double leverz = (R(2) - zbegin_m) / hz_m - indexz;

    if ((indexz < 0) || (indexz + 2 > num_gridpz_m))
        return false;
    if (indexr + 2 > num_gridpr_m)
        return true;

    const int index1 = indexz + indexr * num_gridpz_m;
    const int index2 = index1 + num_gridpz_m;
    const double EfieldR = (1.0 - leverz) * (1.0 - leverr) * FieldstrengthEr_m[index1]
                           + leverz         * (1.0 - leverr) * FieldstrengthEr_m[index1 + 1]
                           + (1.0 - leverz) * leverr         * FieldstrengthEr_m[index2]
                           + leverz         * leverr         * FieldstrengthEr_m[index2 + 1];

    const double EfieldZ = (1.0 - leverz) * (1.0 - leverr) * FieldstrengthEz_m[index1]
                           + leverz         * (1.0 - leverr) * FieldstrengthEz_m[index1 + 1]
                           + (1.0 - leverz) * leverr         * FieldstrengthEz_m[index2]
                           + leverz         * leverr         * FieldstrengthEz_m[index2 + 1];

    if (RR > 1e-10) {
        E(0) += EfieldR * R(0) / RR;
        E(1) += EfieldR * R(1) / RR;
    }
    E(2) += EfieldZ;
    return false;
}

bool _FM2DElectroStatic::getFieldDerivative(const Vector_t &/*R*/, Vector_t &/*E*/, Vector_t &/*B*/, const DiffDirection &/*dir*/) const {
    return false;
}

void _FM2DElectroStatic::getFieldDimensions(double &zBegin, double &zEnd) const {
    zBegin = zbegin_m;
    zEnd = zend_m;
}
void _FM2DElectroStatic::getFieldDimensions(double &/*xIni*/, double &/*xFinal*/, double &/*yIni*/, double &/*yFinal*/, double &/*zIni*/, double &/*zFinal*/) const {}

void _FM2DElectroStatic::swap() {
    if (swap_m) swap_m = false;
    else swap_m = true;
}

void _FM2DElectroStatic::getInfo(Inform *msg) {
    (*msg) << Filename_m << " (2D electrostatic); zini= " << zbegin_m << " m; zfinal= " << zend_m << " m;" << endl;
}

double _FM2DElectroStatic::getFrequency() const {
    return 0.0;
}

void _FM2DElectroStatic::setFrequency(double /*freq*/)
{ ;}