Skip to content
Snippets Groups Projects
ConvertSCDtoMDE.cpp 8.46 KiB
Newer Older
Hahn, Steven's avatar
Hahn, Steven committed
// Mantid Repository : https://github.com/mantidproject/mantid
//
// Copyright © 2018 ISIS Rutherford Appleton Laboratory UKRI,
//     NScD Oak Ridge National Laboratory, European Spallation Source
//     & Institut Laue - Langevin
// SPDX - License - Identifier: GPL - 3.0 +

Hahn, Steven's avatar
Hahn, Steven committed
#include "MantidMDAlgorithms/ConvertSCDtoMDE.h"
#include "MantidAPI/IMDEventWorkspace.h"
#include "MantidAPI/IMDHistoWorkspace.h"
#include "MantidAPI/IMDIterator.h"
#include "MantidAPI/Run.h"
#include "MantidDataObjects/MDBoxBase.h"
#include "MantidDataObjects/MDEventFactory.h"
#include "MantidDataObjects/MDEventInserter.h"
#include "MantidGeometry/MDGeometry/QSample.h"
#include "MantidKernel/ArrayProperty.h"
#include "MantidKernel/ConfigService.h"
#include "MantidKernel/PropertyWithValue.h"
#include "MantidKernel/UnitLabelTypes.h"

#include "Eigen/Dense"
#include "boost/math/constants/constants.hpp"

namespace Mantid {
namespace MDAlgorithms {
using Mantid::API::WorkspaceProperty;
using Mantid::Kernel::Direction;
using namespace Mantid::Geometry;
using namespace Mantid::Kernel;
using namespace Mantid::MDAlgorithms;
using namespace Mantid::API;
using namespace Mantid::DataObjects;

// Register the algorithm into the AlgorithmFactory
Hahn, Steven's avatar
Hahn, Steven committed
DECLARE_ALGORITHM(ConvertSCDtoMDE)

//----------------------------------------------------------------------------------------------

/// Algorithms name for identification. @see Algorithm::name
Hahn, Steven's avatar
Hahn, Steven committed
const std::string ConvertSCDtoMDE::name() const {
  return "ConvertSCDtoMDE";
}

/// Algorithm's version for identification. @see Algorithm::version
Hahn, Steven's avatar
Hahn, Steven committed
int ConvertSCDtoMDE::version() const { return 1; }

/// Algorithm's category for identification. @see Algorithm::category
Hahn, Steven's avatar
Hahn, Steven committed
const std::string ConvertSCDtoMDE::category() const {
Hahn, Steven's avatar
Hahn, Steven committed
  return "MDAlgorithm\\Creation";
}

/// Algorithm's summary for use in the GUI and help. @see Algorithm::summary
Hahn, Steven's avatar
Hahn, Steven committed
const std::string ConvertSCDtoMDE::summary() const {
Hahn, Steven's avatar
Hahn, Steven committed
  return "Convert from the detector vs scan index MDHistoWorkspace into a "
         "MDEventWorkspace with units in Q_sample.";
Hahn, Steven's avatar
Hahn, Steven committed
std::map<std::string, std::string> ConvertSCDtoMDE::validateInputs() {
  std::map<std::string, std::string> result;

  std::vector<double> minVals = this->getProperty("MinValues");
  std::vector<double> maxVals = this->getProperty("MaxValues");

  if (minVals.size() != maxVals.size()) {
    std::stringstream msg;
    msg << "Rank of MinValues != MaxValues (" << minVals.size()
        << "!=" << maxVals.size() << ")";
    result["MinValues"] = msg.str();
    result["MaxValues"] = msg.str();
  } else {
    std::stringstream msg;

    size_t rank = minVals.size();
    for (size_t i = 0; i < rank; ++i) {
      if (minVals[i] >= maxVals[i]) {
        if (msg.str().empty())
          msg << "max not bigger than min ";
        else
          msg << ", ";
        msg << "at index=" << (i + 1) << " (" << minVals[i]
            << ">=" << maxVals[i] << ")";
      }
    }

    if (!msg.str().empty()) {
      result["MinValues"] = msg.str();
      result["MaxValues"] = msg.str();
    }
  }

  return result;
}

//----------------------------------------------------------------------------------------------
/** Initialize the algorithm's properties.
 */
Hahn, Steven's avatar
Hahn, Steven committed
void ConvertSCDtoMDE::init() {

  // Box controller properties. These are the defaults
  this->initBoxControllerProps("5" /*SplitInto*/, 1000 /*SplitThreshold*/,
                               20 /*MaxRecursionDepth*/);
  declareProperty(
      std::make_unique<WorkspaceProperty<API::IMDHistoWorkspace>>(
          "InputWorkspace", "", Direction::Input),
      "An input workspace.");
  declareProperty(
      std::make_unique<WorkspaceProperty<API::IMDEventWorkspace>>(
          "OutputWorkspace", "", Direction::Output),
      "An output workspace.");
  declareProperty(std::make_unique<PropertyWithValue<double>>(
                      "wavelength", Mantid::EMPTY_DBL(), Direction::Input),
                  "wavelength");
  declareProperty(std::make_unique<ArrayProperty<double>>("MinValues"),
                  "It has to be N comma separated values, where N is the "
                  "number of dimensions of the target workspace. Values "
                  "smaller then specified here will not be added to "
                  "workspace.\n Number N is defined by properties 4,6 and 7 "
                  "and "
                  "described on *MD Transformation factory* page. See also "
                  ":ref:`algm-ConvertToMDMinMaxLocal`");
  declareProperty(std::make_unique<ArrayProperty<double>>("MaxValues"),
                  "A list of the same size and the same units as MinValues "
                  "list. Values higher or equal to the specified by "
                  "this list will be ignored");
}

//----------------------------------------------------------------------------------------------
/** Execute the algorithm.
 */
Hahn, Steven's avatar
Hahn, Steven committed
void ConvertSCDtoMDE::exec() {
  double wavelength = this->getProperty("wavelength");
  if (wavelength == Mantid::EMPTY_DBL()) {
    throw std::invalid_argument("wavelength not entered!");
  }

  API::IMDHistoWorkspace_sptr inputWS = this->getProperty("InputWorkspace");
  auto &expInfo = *(inputWS->getExperimentInfo(static_cast<uint16_t>(0)));
  auto s1 = (*(dynamic_cast<Kernel::PropertyWithValue<std::vector<double>> *>(
      expInfo.getLog("s1"))))();
  auto azimuthal =
      (*(dynamic_cast<Kernel::PropertyWithValue<std::vector<double>> *>(
          expInfo.getLog("azimuthal"))))();
  auto twotheta =
      (*(dynamic_cast<Kernel::PropertyWithValue<std::vector<double>> *>(
          expInfo.getLog("twotheta"))))();

  auto outputWS = DataObjects::MDEventFactory::CreateMDWorkspace(3, "MDEvent");
  Mantid::Geometry::QSample frame;
  std::vector<double> minVals = this->getProperty("MinValues");
  std::vector<double> maxVals = this->getProperty("MaxValues");
  outputWS->addDimension(boost::make_shared<Geometry::MDHistoDimension>(
      "Q_sample_x", "Q_sample_x", frame, static_cast<coord_t>(minVals[0]),
      static_cast<coord_t>(maxVals[0]), 1));

  outputWS->addDimension(boost::make_shared<Geometry::MDHistoDimension>(
      "Q_sample_y", "Q_sample_y", frame, static_cast<coord_t>(minVals[1]),
      static_cast<coord_t>(maxVals[1]), 1));

  outputWS->addDimension(boost::make_shared<Geometry::MDHistoDimension>(
      "Q_sample_z", "Q_sample_z", frame, static_cast<coord_t>(minVals[2]),
      static_cast<coord_t>(maxVals[2]), 1));
  outputWS->setCoordinateSystem(Mantid::Kernel::QSample);
  outputWS->initialize();

  BoxController_sptr bc = outputWS->getBoxController();
  this->setBoxController(bc);
  outputWS->splitBox();

  auto mdws_mdevt_3 =
      boost::dynamic_pointer_cast<MDEventWorkspace<MDEvent<3>, 3>>(outputWS);
  MDEventInserter<MDEventWorkspace<MDEvent<3>, 3>::sptr> inserter(mdws_mdevt_3);

      boost::math::float_constants::two_pi / static_cast<float>(wavelength);
  std::vector<Eigen::Vector3f> q_lab_pre;
  q_lab_pre.reserve(azimuthal.size());
  for (size_t m = 0; m < azimuthal.size(); ++m) {
    auto twotheta_f = static_cast<float>(twotheta[m]);
    auto azimuthal_f = static_cast<float>(azimuthal[m]);
    q_lab_pre.push_back({-sin(twotheta_f) * cos(azimuthal_f) * k,
                         -sin(twotheta_f) * sin(azimuthal_f) * k,
                         (1.f - cos(twotheta_f)) * k});
  for (size_t n = 0; n < s1.size(); n++) {
    Eigen::Matrix3f goniometer;
    float sl_radian =
        static_cast<float>(s1[n]) * boost::math::float_constants::degree;
    goniometer(0, 0) = cos(sl_radian);
    goniometer(0, 2) = sin(sl_radian);
    goniometer(2, 0) = -sin(sl_radian);
    goniometer(2, 2) = cos(sl_radian);
    goniometer = goniometer.inverse();
    for (size_t m = 0; m < azimuthal.size(); m++) {
      Eigen::Vector3f q_sample = goniometer * q_lab_pre[m];
      size_t idx = n * azimuthal.size() + m;
      coord_t signal = static_cast<coord_t>(inputWS->getSignalAt(idx));
        inserter.insertMDEvent(signal, signal, 0, 0, q_sample.data());
    }
  }

  auto *ts = new ThreadSchedulerFIFO();
  ThreadPool tp(ts);
  outputWS->splitAllIfNeeded(ts);
  tp.joinAll();

Hahn, Steven's avatar
Hahn, Steven committed
  outputWS->refreshCache();
  outputWS->copyExperimentInfos(*inputWS);

  auto user_convention =
      Kernel::ConfigService::Instance().getString("Q.convention");
  auto ws_convention = outputWS->getConvention();
  if (user_convention != ws_convention) {
    auto convention_alg = createChildAlgorithm("ChangeQConvention");
    convention_alg->setProperty("InputWorkspace", outputWS);
    convention_alg->executeAsChildAlg();
  }
  setProperty("OutputWorkspace", outputWS);
}

} // namespace MDAlgorithms
} // namespace Mantid