QuantumSyncEngineWrapper.H

Go to the documentation of this file.

/* Copyright 2019 Luca Fedeli
 *
 * This file is part of WarpX.
 *
 * License: BSD-3-Clause-LBNL
 */
#ifndef WARPX_quantum_sync_engine_wrapper_h_
#define WARPX_quantum_sync_engine_wrapper_h_

#include "QedWrapperCommons.H"
#include "QedChiFunctions.H"
#include "Utils/WarpXConst.H"

#include <AMReX_Array.H>
#include <AMReX_Vector.H>
#include <AMReX_Gpu.H>

#include <physics/quantum_sync/quantum_sync_engine_tables.hpp>
#include <physics/quantum_sync/quantum_sync_engine_core.hpp>

#include <string>
#include <vector>

// Aliases =============================
using QS_dndt_table_params =
    picsar::multi_physics::phys::quantum_sync::
    dndt_lookup_table_params<amrex::Real>;

using QS_dndt_table =
    picsar::multi_physics::phys::quantum_sync::
    dndt_lookup_table<
    amrex::Real,
    amrex::Gpu::DeviceVector<amrex::Real>>;

using QS_dndt_table_view = QS_dndt_table::view_type;

using QS_phot_em_table_params =
    picsar::multi_physics::phys::quantum_sync::
    photon_emission_lookup_table_params<amrex::Real>;

using QS_phot_em_table =
    picsar::multi_physics::phys::quantum_sync::
    photon_emission_lookup_table<
    amrex::Real,
    amrex::Gpu::DeviceVector<amrex::Real>>;

using QS_phot_em_table_view = QS_phot_em_table::view_type;

struct PicsarQuantumSyncCtrl
{
    QS_dndt_table_params dndt_params;
    QS_phot_em_table_params phot_em_params;
};

// Functors ==================================

// These functors allow using the core elementary functions of the library.
// They are generated by a factory class (QuantumSynchrotronEngine, see below).
// They can be included in GPU kernels.

class QuantumSynchrotronGetOpticalDepth
{
public:
    QuantumSynchrotronGetOpticalDepth ()
    {};

    AMREX_GPU_HOST_DEVICE
    AMREX_FORCE_INLINE
    amrex::Real operator() () const noexcept
    {
        namespace pxr_qs = picsar::multi_physics::phys::quantum_sync;

        //A random number in [0,1) should be provided as an argument.
        return pxr_qs::get_optical_depth(amrex::Random());
    }
};
//____________________________________________

class QuantumSynchrotronEvolveOpticalDepth
{
public:

    QuantumSynchrotronEvolveOpticalDepth (){}

    QuantumSynchrotronEvolveOpticalDepth (
        const QS_dndt_table_view table_view,
        const amrex::ParticleReal qs_minimum_chi_part):
        m_table_view{table_view}, m_qs_minimum_chi_part{qs_minimum_chi_part}{};

    AMREX_GPU_DEVICE
    AMREX_FORCE_INLINE
    int operator()(
        const amrex::Real ux, const amrex::Real uy, const amrex::Real uz,
        const amrex::Real ex, const amrex::Real ey, const amrex::Real ez,
        const amrex::Real bx, const amrex::Real by, const amrex::Real bz,
        const amrex::Real dt, amrex::Real& opt_depth) const noexcept
    {
        using namespace amrex::literals;
        namespace pxr_p = picsar::multi_physics::phys;
        namespace pxr_qs = picsar::multi_physics::phys::quantum_sync;

        constexpr amrex::Real m_e = PhysConst::m_e;
        constexpr amrex::Real inv_c2 = 1._rt/(PhysConst::c*PhysConst::c);
        const amrex::Real gamma = std::sqrt(1._rt + (ux*ux + uy*uy + uz*uz)*inv_c2);
        const auto energy = gamma*m_e*PhysConst::c*PhysConst::c;

        const auto chi_part = QedUtils::chi_ele_pos(
            m_e*ux, m_e*uy, m_e*uz, ex, ey, ez, bx, by, bz);

        if (chi_part < m_qs_minimum_chi_part)
            return 0;

        const auto is_out = pxr_qs::evolve_optical_depth<
            amrex::Real,
            QS_dndt_table_view,
            pxr_p::unit_system::SI>(
                energy, chi_part, dt, opt_depth, m_table_view);

        return is_out;
    }

private:
    QS_dndt_table_view m_table_view;
    amrex::ParticleReal m_qs_minimum_chi_part;
};

class QuantumSynchrotronPhotonEmission
{
public:

    QuantumSynchrotronPhotonEmission (){}

    QuantumSynchrotronPhotonEmission (
        const QS_phot_em_table_view table_view):
        m_table_view{table_view}{};

    AMREX_GPU_DEVICE
    AMREX_FORCE_INLINE
    bool operator()(
    amrex::Real& ux, amrex::Real& uy, amrex::Real& uz,
    const amrex::Real ex, const amrex::Real ey, const amrex::Real ez,
    const amrex::Real bx, const amrex::Real by, const amrex::Real bz,
    amrex::Real& g_ux, amrex::Real& g_uy, amrex::Real& g_uz) const noexcept
    {
        using namespace amrex;
        namespace pxr_m = picsar::multi_physics::math;
        namespace pxr_p = picsar::multi_physics::phys;
        namespace pxr_qs = picsar::multi_physics::phys::quantum_sync;

        const auto rand_zero_one_minus_epsi = amrex::Random();

        constexpr ParticleReal me = PhysConst::m_e;
        constexpr ParticleReal one_over_me = 1._prt/me;

        // Particle momentum is stored as gamma * velocity.
        // Convert to m * gamma * velocity
        auto px = ux*me;
        auto py = uy*me;
        auto pz = uz*me;

        const auto chi_particle = QedUtils::chi_ele_pos(
            px, py, pz, ex, ey, ez, bx, by, bz);

        auto momentum_particle = pxr_m::vec3<amrex::Real>{px, py, pz};
        auto momentum_photon = pxr_m::vec3<amrex::Real>();

        const auto is_out = pxr_qs::generate_photon_update_momentum<
            amrex::Real,
            QS_phot_em_table_view,
            pxr_p::unit_system::SI>(
                chi_particle, momentum_particle,
                rand_zero_one_minus_epsi,
                m_table_view,
                momentum_photon);

        ux = momentum_particle[0]*one_over_me;
        uy = momentum_particle[1]*one_over_me;
        uz = momentum_particle[2]*one_over_me;
        g_ux = momentum_photon[0]*one_over_me;
        g_uy = momentum_photon[1]*one_over_me;
        g_uz = momentum_photon[2]*one_over_me;

        return is_out;
    }

private:
    QS_phot_em_table_view m_table_view;

};

// Factory class =============================

class QuantumSynchrotronEngine
{
public:
    QuantumSynchrotronEngine ();

    QuantumSynchrotronGetOpticalDepth build_optical_depth_functor ();

    QuantumSynchrotronEvolveOpticalDepth build_evolve_functor ();

    QuantumSynchrotronPhotonEmission build_phot_em_functor ();

    bool are_lookup_tables_initialized () const;

    std::vector<char> export_lookup_tables_data () const;

    bool init_lookup_tables_from_raw_data (const std::vector<char>& raw_data,
        const amrex::Real qs_minimum_chi_part);

    void init_builtin_tables(const amrex::Real qs_minimum_chi_part);

    void compute_lookup_tables (PicsarQuantumSyncCtrl ctrl,
        const amrex::Real qs_minimum_chi_part);

    PicsarQuantumSyncCtrl get_default_ctrl() const;

    amrex::Real get_minimum_chi_part() const;

private:
    bool m_lookup_tables_initialized = false;

    //Variables to store the minimum chi parameters to enable
    //Quantum Synchrotron process
    amrex::Real m_qs_minimum_chi_part;

    QS_dndt_table m_dndt_table;
    QS_phot_em_table m_phot_em_table;

    void init_builtin_dndt_table();
    void init_builtin_phot_em_table();
};

//============================================

#endif //WARPX_quantum_sync_engine_wrapper_h_