3d.hpp

Go to the documentation of this file.

/* 
 * This file is part of PLaSK (https://plask.app) by Photonics Group at TUL
 * Copyright (c) 2022 Lodz University of Technology
 * 
 * This program is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation, version 3.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
 * GNU General Public License for more details.
 */
#ifndef PLASK__VECTORCART3D_H
#define PLASK__VECTORCART3D_H
 
#include <iostream>
 
#include "../math.hpp"
#include "plask/exceptions.hpp"
 
#include "common.hpp"
 
#include "../utils/metaprog.hpp"   // for is_callable
#include "../utils/warnings.hpp"
 
namespace plask {
 
template <typename T>
struct Vec<3,T> {
 
    static const int DIMS = 3;
 
    T c0, c1, c2;
 
    T& lon() { return c0; }
    constexpr const T& lon() const { return c0; }
 
    T& tran() { return c1; }
    constexpr const T& tran() const { return c1; }
 
    T& vert() { return c2; }
    constexpr const T& vert() const { return c2; }
 
    // radial coordinates
    T& rad_p() { return c0; }
    constexpr const T& rad_p() const { return c0; }
 
    T& rad_r() { return c1; }
    constexpr const T& rad_r() const { return c1; }
 
    T& rad_z() { return c2; }
    constexpr const T& rad_z() const { return c2; }
 
    // for surface-emitting lasers (z-axis up)
    T& se_x() { return c0; }
    constexpr const T& se_x() const { return c0; }
 
    T& se_y() { return c1; }
    constexpr const T& se_y() const { return c1; }
 
    T& se_z() { return c2; }
    constexpr const T& se_z() const { return c2; }
 
    // for surface-emitting lasers (z-axis up)
    T& zup_x() { return c0; }
    constexpr const T& z_up_x() const { return c0; }
 
    T& zup_y() { return c1; }
    constexpr const T& z_up_y() const { return c1; }
 
    T& zup_z() { return c2; }
    constexpr const T& z_up_z() const { return c2; }
 
    // for edge emitting lasers (y-axis up), we keep the coordinates right-handed
    T& ee_z() { return c0; }
    constexpr const T& ee_z() const { return c0; }
 
    T& ee_x() { return c1; }
    constexpr const T& ee_x() const { return c1; }
 
    T& ee_y() { return c2; }
    constexpr const T& ee_y() const { return c2; }
 
    // for edge emitting lasers (y-axis up), we keep the coordinates right-handed
    T& yup_z() { return c0; }
    constexpr const T& y_up_z() const { return c0; }
 
    T& yup_x() { return c1; }
    constexpr const T& y_up_x() const { return c1; }
 
    T& yup_y() { return c2; }
    constexpr const T& y_up_y() const { return c2; }
 
    typedef T* iterator;
 
    typedef const T* const_iterator;
 
    Vec() {}
 
    template <typename OtherT>
    constexpr Vec(const Vec<3,OtherT>& p): c0(p.c0), c1(p.c1), c2(p.c2) {}
 
    constexpr Vec(const T& c0__lon, const T& c1__tran, const T& c2__up): c0(c0__lon), c1(c1__tran), c2(c2__up) {}
 
    template <typename T0, typename T1, typename T2>
    constexpr Vec(const std::tuple<T0,T1,T2>& comp): c0(std::get<0>(comp)), c1(std::get<1>(comp)), c2(std::get<2>(comp)) {}
 
    template <typename InputIteratorType>
    static inline Vec<3,T> fromIterator(InputIteratorType inputIt) {
        Vec<3,T> result;
        result.c0 = T(*inputIt);
        result.c1 = T(*++inputIt);
        result.c2 = T(*++inputIt);
        return result;
    }
 
    iterator begin() { return &c0; }
 
    const_iterator begin() const { return &c0; }
 
    iterator end() { return &c0 + 3; }
 
    const_iterator end() const { return &c0 + 3; }
 
    template <typename OtherT>
    constexpr bool operator==(const Vec<3,OtherT>& p) const { return p.c0 == c0 && p.c1 == c1 && p.c2 == c2; }
 
    template <typename OtherT, typename SuprType>
    constexpr bool equals(const Vec<3, OtherT>& p, const SuprType& abs_supremum) const {
        return is_zero(p.c0 - c0, abs_supremum) && is_zero(p.c1 - c1, abs_supremum) && is_zero(p.c2 - c2, abs_supremum); }
 
    template <typename OtherT>
    constexpr bool equals(const Vec<3, OtherT>& p) const {
        return is_zero(p.c0 - c0) && is_zero(p.c1 - c1) && is_zero(p.c2 - c2);
    }
 
    template <typename OtherT>
    constexpr bool operator!=(const Vec<3,OtherT>& p) const { return p.c0 != c0 || p.c1 != c1 || p.c2 != c2; }
 
    inline T& operator[](size_t i) {
        assert(i < 3);
        return *(&c0 + i);
    }
 
    inline const T& operator[](size_t i) const {
        assert(i < 3);
        return *(&c0 + i);
    }
 
    template <typename OtherT>
    constexpr auto operator+(const Vec<3,OtherT>& other) const -> Vec<3,decltype(c0 + other.c0)> {
        return Vec<3,decltype(this->c0 + other.c0)>(c0 + other.c0, c1 + other.c1, c2 + other.c2);
    }
 
    Vec<3,T>& operator+=(const Vec<3,T>& other) {
        c0 += other.c0;
        c1 += other.c1;
        c2 += other.c2;
        return *this;
    }
 
    template <typename OtherT>
    constexpr auto operator-(const Vec<3,OtherT>& other) const -> Vec<3,decltype(c0 - other.c0)> {
        return Vec<3, decltype(this->c0 - other.c0)>(c0 - other. c0, c1 - other. c1, c2 - other.c2);
    }
 
    Vec<3,T>& operator-=(const Vec<3,T>& other) {
        c0 -= other.c0;
        c1 -= other.c1;
        c2 -= other.c2;
        return *this;
    }
 
    template <typename OtherT>
    constexpr auto operator*(const OtherT scale) const -> Vec<3,decltype(c0*scale)> {
PLASK_NO_CONVERSION_WARNING_BEGIN
        return Vec<3,decltype(c0*scale)>(c0 * scale, c1 * scale, c2 * scale);
PLASK_NO_WARNING_END
    }
 
    Vec<3,T>& operator*=(const T scalar) {
        c0 *= scalar;
        c1 *= scalar;
        c2 *= scalar;
        return *this;
    }
 
    constexpr Vec<3,T> operator/(const T scalar) const { return Vec<3,T>(c0 / scalar, c1 / scalar, c2 / scalar); }
 
    Vec<3,T>& operator/=(const T scalar) {
        c0 /= scalar;
        c1 /= scalar;
        c2 /= scalar;
        return *this;
    }
 
    constexpr Vec<3,T> operator-() const {
        return Vec<3,T>(-c0, -c1, -c2);
    }
 
    Vec<3,T> sqr() const {
        return Vec<3,T>(c0*c0, c1*c1, c2*c2);
    }
 
    Vec<3,T>& sqr_inplace() {
        c0 *= c0; c1 *= c1; c2 *= c2;
        return *this;
    }
 
    Vec<3,T> sqrt() const {
        return Vec<3,T>(std::sqrt(c0), std::sqrt(c1), std::sqrt(c2));
    }
 
    Vec<3,T>& sqrt_inplace() {
        c0 = std::sqrt(c0); c1 = std::sqrt(c1); c2 = std::sqrt(c2);
        return *this;
    }
 
    template <typename OtherT>
    Vec<3,T> pow(OtherT a) const {
        return Vec<3,T>(std::pow(c0, a), std::pow(c1, a), std::pow(c2, a));
    }
 
    inline void flip(size_t i) {
        assert(i < 3);
        operator[](i) = -operator[](i);
    }
 
    inline Vec<3,T> flipped(size_t i) {
        Vec<3,T> res = *this;
        res.flip(i);
        return res;
    }
 
    friend inline std::ostream& operator<<(std::ostream& out, const Vec<3,T>& to_print) {
        return out << '[' << to_print.c0 << ", " << to_print.c1 << ", " << to_print.c2 << ']';
    }
 
    template<class OT>
    bool operator< (Vec<3, OT> const& v) const {
        if (dbl_compare_lt(this->c0, v.c0)) return true;
        if (dbl_compare_gt(this->c0, v.c0)) return false;
        if (dbl_compare_lt(this->c1, v.c1)) return true;
        if (dbl_compare_gt(this->c1, v.c1)) return false;
        return dbl_compare_lt(this->c2, v.c2);
    }
 
 
};
 
template <typename T>
inline constexpr Vec<3,T> conj(const Vec<3,T>& v) { return Vec<3,T>(conj(v.c0), conj(v.c1), conj(v.c2)); }
 
template <typename T1, typename T2>
inline auto dot(const Vec<3,T1>& v1, const Vec<3,T2>& v2) -> decltype(v1.c0*v2.c0) {
    return ::plask::fma(v1.c0, v2.c0, ::plask::fma(v1.c1, v2.c1, v1.c2 * v2.c2));   //MSVC needs ::plask::
}
 
//template <>   //MSVC2015 doesn't support this specialization, and using overloding shouldn't have negative consequences
inline auto dot(const Vec<3,dcomplex>& v1, const Vec<3,double>& v2) -> decltype(v1.c0*v2.c0) {
    return ::plask::fma(conj(v1.c0), v2.c0, ::plask::fma(conj(v1.c1), v2.c1, conj(v1.c2) * v2.c2)); //MSVC needs ::plask::
}
 
//template <>   //MSVC2015 doesn't support this specialization, and using overloding shouldn't have negative consequences
inline auto dot(const Vec<3,dcomplex>& v1, const Vec<3,dcomplex>& v2) -> decltype(v1.c0*v2.c0) {
    return ::plask::fma(conj(v1.c0), v2.c0, ::plask::fma(conj(v1.c1), v2.c1, conj(v1.c2) * v2.c2)); //MSVC needs ::plask::
}
 
template <typename T>
inline constexpr Vec<3,T> vec(const T c0__lon, const T c1__tran, const T c2__up) {
    return Vec<3,T>(c0__lon, c1__tran, c2__up);
}
 
template <typename T>
struct NaNImpl<Vec<3,T>> {
    static constexpr Vec<3,T> get() { return Vec<3,T>(NaN<T>(), NaN<T>(), NaN<T>()); }
};
 
template <typename T>
struct ZeroImpl<Vec<3,T>> {
    static constexpr Vec<3,T> get() { return Vec<3,T>(0., 0., 0.); }
};
 
template <typename T>
inline bool is_zero(const Vec<3,T>& v) {
    return is_zero(v.c0) && is_zero(v.c1) && v.c2;
}
 
PLASK_API_EXTERN_TEMPLATE_SPECIALIZATION_STRUCT(Vec<3, double>)
PLASK_API_EXTERN_TEMPLATE_SPECIALIZATION_STRUCT(Vec<3, std::complex<double> >)
 
} //namespace plask
 
namespace std {
    template <typename T>
    plask::Vec<3,T> sqrt(plask::Vec<3,T> vec) {
        return vec.sqrt();
    }
 
    template <typename T, typename OtherT>
    plask::Vec<3,T> pow(plask::Vec<3,T> vec, OtherT a) {
        return vec.pow(a);
    }
}
 
#endif // PLASK__VECTORCART3D_H