25280492314

Committed 03 May 2026 01:29PM UTC coverage: 81.183% (-0.2%) from 81.374%

Build # 25280492314

Build Type

Pull #3934

github

Committed by

web-flow

Commit Message

Merge e406ce917 into 368ea069c

Pull Request Pull Request #3934: Fix virtual surface crossing

Coverage Stats

17196 of 24672 branches covered (69.7%)

Branch coverage included in aggregate %.

19 of 19 new or added lines in 1 file covered. (100.0%)

300 existing lines in 21 files now uncovered.

57672 of 67549 relevant lines covered (85.38%)

45882307.29 hits per line

Source File
Press 'n' to go to next uncovered line, 'b' for previous

55.86

/src/distribution_spatial.cpp

#include "openmc/distribution_spatial.h"

#include "openmc/error.h"
#include "openmc/mesh.h"
#include "openmc/random_lcg.h"
#include "openmc/search.h"
#include "openmc/xml_interface.h"

namespace openmc {

//==============================================================================
// SpatialDistribution implementation
//==============================================================================

unique_ptr<SpatialDistribution> SpatialDistribution::create(pugi::xml_node node)
{
  // Check for type of spatial distribution and read
  std::string type;
  if (check_for_node(node, "type"))
    type = get_node_value(node, "type", true, true);
  if (type == "cartesian") {
    return UPtrSpace {new CartesianIndependent(node)};
  } else if (type == "cylindrical") {
    return UPtrSpace {new CylindricalIndependent(node)};
  } else if (type == "spherical") {
    return UPtrSpace {new SphericalIndependent(node)};
  } else if (type == "mesh") {
    return UPtrSpace {new MeshSpatial(node)};
  } else if (type == "cloud") {
    return UPtrSpace {new PointCloud(node)};
  } else if (type == "box") {
    return UPtrSpace {new SpatialBox(node)};
  } else if (type == "fission") {
    return UPtrSpace {new SpatialBox(node, true)};
  } else if (type == "point") {
    return UPtrSpace {new SpatialPoint(node)};
  } else {
    fatal_error(fmt::format(
      "Invalid spatial distribution for external source: {}", type));
  }
}

//==============================================================================
// CartesianIndependent implementation
//==============================================================================

CartesianIndependent::CartesianIndependent(pugi::xml_node node)
{
  // Read distribution for x coordinate
  if (check_for_node(node, "x")) {
    pugi::xml_node node_dist = node.child("x");
    x_ = distribution_from_xml(node_dist);
  } else {
    // If no distribution was specified, default to a single point at x=0
    double x[] {0.0};
    double p[] {1.0};
    x_ = UPtrDist {new Discrete {x, p, 1}};
  }

  // Read distribution for y coordinate
  if (check_for_node(node, "y")) {
    pugi::xml_node node_dist = node.child("y");
    y_ = distribution_from_xml(node_dist);
  } else {
    // If no distribution was specified, default to a single point at y=0
    double x[] {0.0};
    double p[] {1.0};
    y_ = UPtrDist {new Discrete {x, p, 1}};
  }

  // Read distribution for z coordinate
  if (check_for_node(node, "z")) {
    pugi::xml_node node_dist = node.child("z");
    z_ = distribution_from_xml(node_dist);
  } else {
    // If no distribution was specified, default to a single point at z=0
    double x[] {0.0};
    double p[] {1.0};
    z_ = UPtrDist {new Discrete {x, p, 1}};
  }
}

std::pair<Position, double> CartesianIndependent::sample(uint64_t* seed) const
{
  auto [x_val, x_wgt] = x_->sample(seed);
  auto [y_val, y_wgt] = y_->sample(seed);
  auto [z_val, z_wgt] = z_->sample(seed);
  Position xi {x_val, y_val, z_val};
  return {xi, x_wgt * y_wgt * z_wgt};
}

//==============================================================================
// CylindricalIndependent implementation
//==============================================================================

CylindricalIndependent::CylindricalIndependent(pugi::xml_node node)
{
  // Read distribution for r-coordinate
  if (check_for_node(node, "r")) {
    pugi::xml_node node_dist = node.child("r");
    r_ = distribution_from_xml(node_dist);
  } else {
    // If no distribution was specified, default to a single point at r=0
    double x[] {0.0};
    double p[] {1.0};
    r_ = make_unique<Discrete>(x, p, 1);
  }

  // Read distribution for phi-coordinate
  if (check_for_node(node, "phi")) {
    pugi::xml_node node_dist = node.child("phi");
    phi_ = distribution_from_xml(node_dist);
  } else {
    // If no distribution was specified, default to a single point at phi=0
    double x[] {0.0};
    double p[] {1.0};
    phi_ = make_unique<Discrete>(x, p, 1);
  }

  // Read distribution for z-coordinate
  if (check_for_node(node, "z")) {
    pugi::xml_node node_dist = node.child("z");
    z_ = distribution_from_xml(node_dist);
  } else {
    // If no distribution was specified, default to a single point at z=0
    double x[] {0.0};
    double p[] {1.0};
    z_ = make_unique<Discrete>(x, p, 1);
  }

  // Read cylinder center coordinates
  if (check_for_node(node, "origin")) {
    auto origin = get_node_array<double>(node, "origin");
    if (origin.size() == 3) {
      origin_ = origin;
    } else {
      fatal_error(
        "Origin for cylindrical source distribution must be length 3");
    }
  } else {
    // If no coordinates were specified, default to (0, 0, 0)
    origin_ = {0.0, 0.0, 0.0};
  }

  // Read cylinder z_dir
  if (check_for_node(node, "z_dir")) {
    auto z_dir = get_node_array<double>(node, "z_dir");
    if (z_dir.size() == 3) {
      z_dir_ = z_dir;
      z_dir_ /= z_dir_.norm();
    } else {
      fatal_error("z_dir for cylindrical source distribution must be length 3");
    }
  } else {
    // If no z_dir was specified, default to (0, 0, 1)
    z_dir_ = {0.0, 0.0, 1.0};
  }

  // Read cylinder r_dir
  if (check_for_node(node, "r_dir")) {
    auto r_dir = get_node_array<double>(node, "r_dir");
    if (r_dir.size() == 3) {
      r_dir_ = r_dir;
      r_dir_ /= r_dir_.norm();
    } else {
      fatal_error("r_dir for cylindrical source distribution must be length 3");
    }
  } else {
    // If no r_dir was specified, default to (1, 0, 0)
    r_dir_ = {1.0, 0.0, 0.0};
  }

  if (r_dir_.dot(z_dir_) > 1e-12)
    fatal_error("r_dir must be perpendicular to z_dir");

  auto phi_dir = z_dir_.cross(r_dir_);
  phi_dir /= phi_dir.norm();
  phi_dir_ = phi_dir;
}

std::pair<Position, double> CylindricalIndependent::sample(uint64_t* seed) const
{
  auto [r, r_wgt] = r_->sample(seed);
  auto [phi, phi_wgt] = phi_->sample(seed);
  auto [z, z_wgt] = z_->sample(seed);
  Position xi =
    r * (cos(phi) * r_dir_ + sin(phi) * phi_dir_) + z * z_dir_ + origin_;
  return {xi, r_wgt * phi_wgt * z_wgt};
}

//==============================================================================
// SphericalIndependent implementation
//==============================================================================

SphericalIndependent::SphericalIndependent(pugi::xml_node node)
{
  // Read distribution for r-coordinate
  if (check_for_node(node, "r")) {
    pugi::xml_node node_dist = node.child("r");
    r_ = distribution_from_xml(node_dist);
  } else {
    // If no distribution was specified, default to a single point at r=0
    double x[] {0.0};
    double p[] {1.0};
    r_ = make_unique<Discrete>(x, p, 1);
  }

  // Read distribution for cos_theta-coordinate
  if (check_for_node(node, "cos_theta")) {
    pugi::xml_node node_dist = node.child("cos_theta");
    cos_theta_ = distribution_from_xml(node_dist);
  } else {
    // If no distribution was specified, default to a single point at
    // cos_theta=0
    double x[] {0.0};
    double p[] {1.0};
    cos_theta_ = make_unique<Discrete>(x, p, 1);
  }

  // Read distribution for phi-coordinate
  if (check_for_node(node, "phi")) {
    pugi::xml_node node_dist = node.child("phi");
    phi_ = distribution_from_xml(node_dist);
  } else {
    // If no distribution was specified, default to a single point at phi=0
    double x[] {0.0};
    double p[] {1.0};
    phi_ = make_unique<Discrete>(x, p, 1);
  }

  // Read sphere center coordinates
  if (check_for_node(node, "origin")) {
    auto origin = get_node_array<double>(node, "origin");
    if (origin.size() == 3) {
      origin_ = origin;
    } else {
      fatal_error("Origin for spherical source distribution must be length 3");
    }
  } else {
    // If no coordinates were specified, default to (0, 0, 0)
    origin_ = {0.0, 0.0, 0.0};
  }
}

std::pair<Position, double> SphericalIndependent::sample(uint64_t* seed) const
{
  auto [r, r_wgt] = r_->sample(seed);
  auto [cos_theta, cos_theta_wgt] = cos_theta_->sample(seed);
  auto [phi, phi_wgt] = phi_->sample(seed);
  // sin(theta) by sin**2 + cos**2 = 1
  double x = r * std::sqrt(1 - cos_theta * cos_theta) * cos(phi) + origin_.x;
  double y = r * std::sqrt(1 - cos_theta * cos_theta) * sin(phi) + origin_.y;
  double z = r * cos_theta + origin_.z;
  Position xi {x, y, z};
  return {xi, r_wgt * cos_theta_wgt * phi_wgt};
}

//==============================================================================
// MeshSpatial implementation
//==============================================================================

MeshSpatial::MeshSpatial(pugi::xml_node node)
{

  if (get_node_value(node, "type", true, true) != "mesh") {
    fatal_error(fmt::format(
      "Incorrect spatial type '{}' for a MeshSpatial distribution"));
  }

  // No in-tet distributions implemented, could include distributions for the
  // barycentric coords Read in unstructured mesh from mesh_id value
  int32_t mesh_id = std::stoi(get_node_value(node, "mesh_id"));
  // Get pointer to spatial distribution
  mesh_idx_ = model::mesh_map.at(mesh_id);

  const auto mesh_ptr = model::meshes.at(mesh_idx_).get();

  check_element_types();

  size_t n_bins = this->n_sources();
  std::vector<double> strengths(n_bins, 1.0);

  // Create cdfs for sampling for an element over a mesh
  // Volume scheme is weighted by the volume of each tet
  // File scheme is weighted by an array given in the xml file
  if (check_for_node(node, "strengths")) {
    strengths = get_node_array<double>(node, "strengths");
    if (strengths.size() != n_bins) {
      fatal_error(
        fmt::format("Number of entries in the source strengths array {} does "
                    "not match the number of entities in mesh {} ({}).",
          strengths.size(), mesh_id, n_bins));
    }
  }

  if (get_node_value_bool(node, "volume_normalized")) {
    for (int i = 0; i < n_bins; i++) {
      strengths[i] *= this->mesh()->volume(i);
    }
  }

  elem_idx_dist_.assign(strengths);

  if (check_for_node(node, "bias")) {
    pugi::xml_node bias_node = node.child("bias");

    if (check_for_node(bias_node, "strengths")) {
      std::vector<double> bias_strengths(n_bins, 1.0);
      bias_strengths = get_node_array<double>(node, "strengths");

      if (bias_strengths.size() != n_bins) {
        fatal_error(
          fmt::format("Number of entries in the bias strengths array {} does "
                      "not match the number of entities in mesh {} ({}).",
            bias_strengths.size(), mesh_id, n_bins));
      }

      if (get_node_value_bool(node, "volume_normalized")) {
        for (int i = 0; i < n_bins; i++) {
          bias_strengths[i] *= this->mesh()->volume(i);
        }
      }

      // Compute importance weights
      weight_ = compute_importance_weights(strengths, bias_strengths);

      // Re-initialize DiscreteIndex with bias strengths for sampling
      elem_idx_dist_.assign(bias_strengths);
    } else {
      fatal_error(fmt::format(
        "Bias node for mesh {} found without strengths array.", mesh_id));
    }
  }
}

MeshSpatial::MeshSpatial(int32_t mesh_idx, span<const double> strengths)
  : mesh_idx_(mesh_idx)
{
  check_element_types();
  elem_idx_dist_.assign(strengths);
}

void MeshSpatial::check_element_types() const
{
  const auto umesh_ptr = dynamic_cast<const UnstructuredMesh*>(this->mesh());
  if (umesh_ptr) {
    // ensure that the unstructured mesh contains only linear tets
    for (int bin = 0; bin < umesh_ptr->n_bins(); bin++) {
      if (umesh_ptr->element_type(bin) != ElementType::LINEAR_TET) {
        fatal_error(
          "Mesh specified for source must contain only linear tetrahedra.");
      }
    }
  }
}

int32_t MeshSpatial::sample_element_index(uint64_t* seed) const
{
  return elem_idx_dist_.sample(seed);
}

std::pair<int32_t, Position> MeshSpatial::sample_mesh(uint64_t* seed) const
{
  // Sample the CDF defined in initialization above
  int32_t elem_idx = this->sample_element_index(seed);
  return {elem_idx, mesh()->sample_element(elem_idx, seed)};
}

std::pair<Position, double> MeshSpatial::sample(uint64_t* seed) const
{
  auto [elem_idx, u] = this->sample_mesh(seed);
  double wgt = weight_.empty() ? 1.0 : weight_[elem_idx];
  return {u, wgt};
}

//==============================================================================
// PointCloud implementation
//==============================================================================

PointCloud::PointCloud(pugi::xml_node node)
{
  if (check_for_node(node, "coords")) {
    point_cloud_ = get_node_position_array(node, "coords");
  } else {
    fatal_error("No coordinates were provided for the PointCloud "
                "spatial distribution");
  }

  std::vector<double> strengths;

  if (check_for_node(node, "strengths"))
    strengths = get_node_array<double>(node, "strengths");
  else
    strengths.resize(point_cloud_.size(), 1.0);

  if (strengths.size() != point_cloud_.size()) {
    fatal_error(
      fmt::format("Number of entries for the strengths array {} does "
                  "not match the number of spatial points provided {}.",
        strengths.size(), point_cloud_.size()));
  }

  point_idx_dist_.assign(strengths);

  if (check_for_node(node, "bias")) {
    pugi::xml_node bias_node = node.child("bias");

    if (check_for_node(bias_node, "strengths")) {
      std::vector<double> bias_strengths(point_cloud_.size(), 1.0);
      bias_strengths = get_node_array<double>(node, "strengths");

      if (bias_strengths.size() != point_cloud_.size()) {
        fatal_error(
          fmt::format("Number of entries in the bias strengths array {} does "
                      "not match the number of spatial points provided {}.",
            bias_strengths.size(), point_cloud_.size()));
      }

      // Compute importance weights
      weight_ = compute_importance_weights(strengths, bias_strengths);

      // Re-initialize DiscreteIndex with bias strengths for sampling
      point_idx_dist_.assign(bias_strengths);
    } else {
      fatal_error(
        fmt::format("Bias node for PointCloud found without strengths array."));
    }
  }
}

PointCloud::PointCloud(
  std::vector<Position> point_cloud, span<const double> strengths)
{
  point_cloud_.assign(point_cloud.begin(), point_cloud.end());
  point_idx_dist_.assign(strengths);
}

std::pair<Position, double> PointCloud::sample(uint64_t* seed) const
{
  int32_t index = point_idx_dist_.sample(seed);
  double wgt = weight_.empty() ? 1.0 : weight_[index];
  return {point_cloud_[index], wgt};
}

//==============================================================================
// SpatialBox implementation
//==============================================================================

SpatialBox::SpatialBox(pugi::xml_node node, bool fission)
  : only_fissionable_ {fission}
{
  // Read lower-right/upper-left coordinates
  auto params = get_node_array<double>(node, "parameters");
  if (params.size() != 6)
    openmc::fatal_error("Box/fission spatial source must have six "
                        "parameters specified.");

  lower_left_ = Position {params[0], params[1], params[2]};
  upper_right_ = Position {params[3], params[4], params[5]};
}

SpatialBox::SpatialBox(Position lower_left, Position upper_right, bool fission)
  : lower_left_(lower_left), upper_right_(upper_right),
    only_fissionable_(fission)
{}

std::pair<Position, double> SpatialBox::sample(uint64_t* seed) const
{
  Position xi {prn(seed), prn(seed), prn(seed)};
  return {lower_left_ + xi * (upper_right_ - lower_left_), 1.0};
}

//==============================================================================
// SpatialPoint implementation
//==============================================================================

SpatialPoint::SpatialPoint(pugi::xml_node node)
{
  // Read location of point source
  auto params = get_node_array<double>(node, "parameters");
  if (params.size() != 3)
    openmc::fatal_error("Point spatial source must have three "
                        "parameters specified.");

  // Set position
  r_ = Position {params.data()};
}

std::pair<Position, double> SpatialPoint::sample(uint64_t* seed) const
{
  return {r_, 1.0};
}

} // namespace openmc

1	#include "openmc/distribution_spatial.h"
2
3	#include "openmc/error.h"
4	#include "openmc/mesh.h"
5	#include "openmc/random_lcg.h"
6	#include "openmc/search.h"
7	#include "openmc/xml_interface.h"
8
9	namespace openmc {
10
11	//==============================================================================
12	// SpatialDistribution implementation
13	//==============================================================================
14
15	unique_ptr<SpatialDistribution> SpatialDistribution::create(pugi::xml_node node)	6,685✔
16	{
17	// Check for type of spatial distribution and read
18	std::string type;	6,685✔
19	if (check_for_node(node, "type"))	6,685!
20	type = get_node_value(node, "type", true, true);	6,685✔
21	if (type == "cartesian") {	6,685✔
22	return UPtrSpace {new CartesianIndependent(node)};	26✔
23	} else if (type == "cylindrical") {	6,659✔
24	return UPtrSpace {new CylindricalIndependent(node)};	39✔
25	} else if (type == "spherical") {	6,620✔
26	return UPtrSpace {new SphericalIndependent(node)};	41✔
27	} else if (type == "mesh") {	6,579✔
28	return UPtrSpace {new MeshSpatial(node)};	34✔
29	} else if (type == "cloud") {	6,545✔
30	return UPtrSpace {new PointCloud(node)};	10✔
31	} else if (type == "box") {	6,535✔
32	return UPtrSpace {new SpatialBox(node)};	3,532✔
33	} else if (type == "fission") {	3,003✔
34	return UPtrSpace {new SpatialBox(node, true)};	20✔
35	} else if (type == "point") {	2,983!
36	return UPtrSpace {new SpatialPoint(node)};	2,983✔
37	} else {
38	fatal_error(fmt::format(	×
39	"Invalid spatial distribution for external source: {}", type));
40	}
41	}	6,685✔
42
43	//==============================================================================
44	// CartesianIndependent implementation
45	//==============================================================================
46
47	CartesianIndependent::CartesianIndependent(pugi::xml_node node)	26✔
48	{
49	// Read distribution for x coordinate
50	if (check_for_node(node, "x")) {	26!
51	pugi::xml_node node_dist = node.child("x");	26✔
52	x_ = distribution_from_xml(node_dist);	26✔
53	} else {
54	// If no distribution was specified, default to a single point at x=0
55	double x[] {0.0};	×
56	double p[] {1.0};	×
57	x_ = UPtrDist {new Discrete {x, p, 1}};	×
58	}
59
60	// Read distribution for y coordinate
61	if (check_for_node(node, "y")) {	26!
62	pugi::xml_node node_dist = node.child("y");	26✔
63	y_ = distribution_from_xml(node_dist);	26✔
64	} else {
65	// If no distribution was specified, default to a single point at y=0
66	double x[] {0.0};	×
67	double p[] {1.0};	×
68	y_ = UPtrDist {new Discrete {x, p, 1}};	×
69	}
70
71	// Read distribution for z coordinate
72	if (check_for_node(node, "z")) {	26!
73	pugi::xml_node node_dist = node.child("z");	26✔
74	z_ = distribution_from_xml(node_dist);	26✔
75	} else {
76	// If no distribution was specified, default to a single point at z=0
77	double x[] {0.0};	×
78	double p[] {1.0};	×
79	z_ = UPtrDist {new Discrete {x, p, 1}};	×
80	}
81	}	26✔
82
83	std::pair<Position, double> CartesianIndependent::sample(uint64_t* seed) const	5,400✔
84	{
85	auto [x_val, x_wgt] = x_->sample(seed);	5,400✔
86	auto [y_val, y_wgt] = y_->sample(seed);	5,400✔
87	auto [z_val, z_wgt] = z_->sample(seed);	5,400✔
88	Position xi {x_val, y_val, z_val};	5,400✔
89	return {xi, x_wgt * y_wgt * z_wgt};	5,400✔
90	}
91
92	//==============================================================================
93	// CylindricalIndependent implementation
94	//==============================================================================
95
96	CylindricalIndependent::CylindricalIndependent(pugi::xml_node node)	39✔
97	{
98	// Read distribution for r-coordinate
99	if (check_for_node(node, "r")) {	39!
100	pugi::xml_node node_dist = node.child("r");	39✔
101	r_ = distribution_from_xml(node_dist);	39✔
102	} else {
103	// If no distribution was specified, default to a single point at r=0
104	double x[] {0.0};	×
105	double p[] {1.0};	×
106	r_ = make_unique<Discrete>(x, p, 1);	×
107	}
108
109	// Read distribution for phi-coordinate
110	if (check_for_node(node, "phi")) {	39!
111	pugi::xml_node node_dist = node.child("phi");	39✔
112	phi_ = distribution_from_xml(node_dist);	39✔
113	} else {
114	// If no distribution was specified, default to a single point at phi=0
115	double x[] {0.0};	×
116	double p[] {1.0};	×
117	phi_ = make_unique<Discrete>(x, p, 1);	×
118	}
119
120	// Read distribution for z-coordinate
121	if (check_for_node(node, "z")) {	39!
122	pugi::xml_node node_dist = node.child("z");	39✔
123	z_ = distribution_from_xml(node_dist);	39✔
124	} else {
125	// If no distribution was specified, default to a single point at z=0
126	double x[] {0.0};	×
127	double p[] {1.0};	×
128	z_ = make_unique<Discrete>(x, p, 1);	×
129	}
130
131	// Read cylinder center coordinates
132	if (check_for_node(node, "origin")) {	39!
133	auto origin = get_node_array<double>(node, "origin");	39✔
134	if (origin.size() == 3) {	39!
135	origin_ = origin;	39✔
136	} else {
137	fatal_error(	×
138	"Origin for cylindrical source distribution must be length 3");
139	}
140	} else {	39✔
141	// If no coordinates were specified, default to (0, 0, 0)
142	origin_ = {0.0, 0.0, 0.0};	×
143	}
144
145	// Read cylinder z_dir
146	if (check_for_node(node, "z_dir")) {	39!
147	auto z_dir = get_node_array<double>(node, "z_dir");	×
148	if (z_dir.size() == 3) {	×
149	z_dir_ = z_dir;	×
150	z_dir_ /= z_dir_.norm();	×
151	} else {
152	fatal_error("z_dir for cylindrical source distribution must be length 3");	×
153	}
154	} else {	×
155	// If no z_dir was specified, default to (0, 0, 1)
156	z_dir_ = {0.0, 0.0, 1.0};	39✔
157	}
158
159	// Read cylinder r_dir
160	if (check_for_node(node, "r_dir")) {	39!
161	auto r_dir = get_node_array<double>(node, "r_dir");	×
162	if (r_dir.size() == 3) {	×
163	r_dir_ = r_dir;	×
164	r_dir_ /= r_dir_.norm();	×
165	} else {
166	fatal_error("r_dir for cylindrical source distribution must be length 3");	×
167	}
168	} else {	×
169	// If no r_dir was specified, default to (1, 0, 0)
170	r_dir_ = {1.0, 0.0, 0.0};	39✔
171	}
172
173	if (r_dir_.dot(z_dir_) > 1e-12)	39!
174	fatal_error("r_dir must be perpendicular to z_dir");	×
175
176	auto phi_dir = z_dir_.cross(r_dir_);	39✔
177	phi_dir /= phi_dir.norm();	39✔
178	phi_dir_ = phi_dir;	39✔
179	}	39✔
180
181	std::pair<Position, double> CylindricalIndependent::sample(uint64_t* seed) const	3,220✔
182	{
183	auto [r, r_wgt] = r_->sample(seed);	3,220✔
184	auto [phi, phi_wgt] = phi_->sample(seed);	3,220✔
185	auto [z, z_wgt] = z_->sample(seed);	3,220✔
186	Position xi =	3,220✔
187	r * (cos(phi) * r_dir_ + sin(phi) * phi_dir_) + z * z_dir_ + origin_;	3,220✔
188	return {xi, r_wgt * phi_wgt * z_wgt};	3,220✔
189	}
190
191	//==============================================================================
192	// SphericalIndependent implementation
193	//==============================================================================
194
195	SphericalIndependent::SphericalIndependent(pugi::xml_node node)	41✔
196	{
197	// Read distribution for r-coordinate
198	if (check_for_node(node, "r")) {	41!
199	pugi::xml_node node_dist = node.child("r");	41✔
200	r_ = distribution_from_xml(node_dist);	41✔
201	} else {
202	// If no distribution was specified, default to a single point at r=0
203	double x[] {0.0};	×
204	double p[] {1.0};	×
205	r_ = make_unique<Discrete>(x, p, 1);	×
206	}
207
208	// Read distribution for cos_theta-coordinate
209	if (check_for_node(node, "cos_theta")) {	41!
210	pugi::xml_node node_dist = node.child("cos_theta");	41✔
211	cos_theta_ = distribution_from_xml(node_dist);	41✔
212	} else {
213	// If no distribution was specified, default to a single point at
214	// cos_theta=0
215	double x[] {0.0};	×
216	double p[] {1.0};	×
217	cos_theta_ = make_unique<Discrete>(x, p, 1);	×
218	}
219
220	// Read distribution for phi-coordinate
221	if (check_for_node(node, "phi")) {	41!
222	pugi::xml_node node_dist = node.child("phi");	41✔
223	phi_ = distribution_from_xml(node_dist);	41✔
224	} else {
225	// If no distribution was specified, default to a single point at phi=0
226	double x[] {0.0};	×
227	double p[] {1.0};	×
228	phi_ = make_unique<Discrete>(x, p, 1);	×
229	}
230
231	// Read sphere center coordinates
232	if (check_for_node(node, "origin")) {	41!
233	auto origin = get_node_array<double>(node, "origin");	41✔
234	if (origin.size() == 3) {	41!
235	origin_ = origin;	41✔
236	} else {
237	fatal_error("Origin for spherical source distribution must be length 3");	×
238	}
239	} else {	41✔
240	// If no coordinates were specified, default to (0, 0, 0)
241	origin_ = {0.0, 0.0, 0.0};	×
242	}
243	}	41✔
244
245	std::pair<Position, double> SphericalIndependent::sample(uint64_t* seed) const	102,080✔
246	{
247	auto [r, r_wgt] = r_->sample(seed);	102,080✔
248	auto [cos_theta, cos_theta_wgt] = cos_theta_->sample(seed);	102,080✔
249	auto [phi, phi_wgt] = phi_->sample(seed);	102,080✔
250	// sin(theta) by sin2 + cos2 = 1
251	double x = r * std::sqrt(1 - cos_theta * cos_theta) * cos(phi) + origin_.x;	102,080✔
252	double y = r * std::sqrt(1 - cos_theta * cos_theta) * sin(phi) + origin_.y;	102,080✔
253	double z = r * cos_theta + origin_.z;	102,080✔
254	Position xi {x, y, z};	102,080✔
255	return {xi, r_wgt * cos_theta_wgt * phi_wgt};	102,080✔
256	}
257
258	//==============================================================================
259	// MeshSpatial implementation
260	//==============================================================================
261
262	MeshSpatial::MeshSpatial(pugi::xml_node node)	34✔
263	{
264
265	if (get_node_value(node, "type", true, true) != "mesh") {	68!
266	fatal_error(fmt::format(	×
267	"Incorrect spatial type '{}' for a MeshSpatial distribution"));
268	}
269
270	// No in-tet distributions implemented, could include distributions for the
271	// barycentric coords Read in unstructured mesh from mesh_id value
272	int32_t mesh_id = std::stoi(get_node_value(node, "mesh_id"));	68✔
273	// Get pointer to spatial distribution
274	mesh_idx_ = model::mesh_map.at(mesh_id);	34✔
275
276	const auto mesh_ptr = model::meshes.at(mesh_idx_).get();	34✔
277
278	check_element_types();	34✔
279
280	size_t n_bins = this->n_sources();	34✔
281	std::vector<double> strengths(n_bins, 1.0);	34✔
282
283	// Create cdfs for sampling for an element over a mesh
284	// Volume scheme is weighted by the volume of each tet
285	// File scheme is weighted by an array given in the xml file
286	if (check_for_node(node, "strengths")) {	34✔
287	strengths = get_node_array<double>(node, "strengths");	64✔
288	if (strengths.size() != n_bins) {	32!
UNCOV 289	fatal_error(	×
UNCOV 290	fmt::format("Number of entries in the source strengths array {} does "	×
291	"not match the number of entities in mesh {} ({}).",
UNCOV 292	strengths.size(), mesh_id, n_bins));	×
293	}
294	}
295
296	if (get_node_value_bool(node, "volume_normalized")) {	34✔
297	for (int i = 0; i < n_bins; i++) {	25,232✔
298	strengths[i] *= this->mesh()->volume(i);	25,200✔
299	}
300	}
301
302	elem_idx_dist_.assign(strengths);	34✔
303
304	if (check_for_node(node, "bias")) {	34!
305	pugi::xml_node bias_node = node.child("bias");	×
306
307	if (check_for_node(bias_node, "strengths")) {	×
308	std::vector<double> bias_strengths(n_bins, 1.0);	×
309	bias_strengths = get_node_array<double>(node, "strengths");	×
310
311	if (bias_strengths.size() != n_bins) {	×
312	fatal_error(	×
313	fmt::format("Number of entries in the bias strengths array {} does "	×
314	"not match the number of entities in mesh {} ({}).",
315	bias_strengths.size(), mesh_id, n_bins));	×
316	}
317
318	if (get_node_value_bool(node, "volume_normalized")) {	×
319	for (int i = 0; i < n_bins; i++) {	×
320	bias_strengths[i] *= this->mesh()->volume(i);	×
321	}
322	}
323
324	// Compute importance weights
325	weight_ = compute_importance_weights(strengths, bias_strengths);	×
326
327	// Re-initialize DiscreteIndex with bias strengths for sampling
328	elem_idx_dist_.assign(bias_strengths);	×
329	} else {	×
330	fatal_error(fmt::format(	×
331	"Bias node for mesh {} found without strengths array.", mesh_id));
332	}
333	}
334	}	34✔
335
336	MeshSpatial::MeshSpatial(int32_t mesh_idx, span<const double> strengths)	182✔
337	: mesh_idx_(mesh_idx)	182✔
338	{
339	check_element_types();	182✔
340	elem_idx_dist_.assign(strengths);	182✔
341	}	182✔
342
343	void MeshSpatial::check_element_types() const	216✔
344	{
345	const auto umesh_ptr = dynamic_cast<const UnstructuredMesh*>(this->mesh());	216!
346	if (umesh_ptr) {	216✔
347	// ensure that the unstructured mesh contains only linear tets
348	for (int bin = 0; bin < umesh_ptr->n_bins(); bin++) {	72,006✔
349	if (umesh_ptr->element_type(bin) != ElementType::LINEAR_TET) {	72,000!
350	fatal_error(	×
351	"Mesh specified for source must contain only linear tetrahedra.");
352	}
353	}
354	}
355	}	216✔
356
357	int32_t MeshSpatial::sample_element_index(uint64_t* seed) const	1,773,668✔
358	{
359	return elem_idx_dist_.sample(seed);	1,773,668✔
360	}
361
362	std::pair<int32_t, Position> MeshSpatial::sample_mesh(uint64_t* seed) const	401,100✔
363	{
364	// Sample the CDF defined in initialization above
365	int32_t elem_idx = this->sample_element_index(seed);	401,100✔
366	return {elem_idx, mesh()->sample_element(elem_idx, seed)};	401,100✔
367	}
368
369	std::pair<Position, double> MeshSpatial::sample(uint64_t* seed) const	401,100✔
370	{
371	auto [elem_idx, u] = this->sample_mesh(seed);	401,100✔
372	double wgt = weight_.empty() ? 1.0 : weight_[elem_idx];	401,100!
373	return {u, wgt};	401,100✔
374	}
375
376	//==============================================================================
377	// PointCloud implementation
378	//==============================================================================
379
380	PointCloud::PointCloud(pugi::xml_node node)	10✔
381	{
382	if (check_for_node(node, "coords")) {	10!
383	point_cloud_ = get_node_position_array(node, "coords");	10✔
384	} else {
385	fatal_error("No coordinates were provided for the PointCloud "	×
386	"spatial distribution");
387	}
388
389	std::vector<double> strengths;	10✔
390
391	if (check_for_node(node, "strengths"))	10!
392	strengths = get_node_array<double>(node, "strengths");	20✔
393	else
394	strengths.resize(point_cloud_.size(), 1.0);	×
395
396	if (strengths.size() != point_cloud_.size()) {	10!
397	fatal_error(	×
398	fmt::format("Number of entries for the strengths array {} does "	×
399	"not match the number of spatial points provided {}.",
400	strengths.size(), point_cloud_.size()));	×
401	}
402
403	point_idx_dist_.assign(strengths);	10✔
404
405	if (check_for_node(node, "bias")) {	10!
406	pugi::xml_node bias_node = node.child("bias");	×
407
408	if (check_for_node(bias_node, "strengths")) {	×
409	std::vector<double> bias_strengths(point_cloud_.size(), 1.0);	×
410	bias_strengths = get_node_array<double>(node, "strengths");	×
411
412	if (bias_strengths.size() != point_cloud_.size()) {	×
413	fatal_error(	×
414	fmt::format("Number of entries in the bias strengths array {} does "	×
415	"not match the number of spatial points provided {}.",
416	bias_strengths.size(), point_cloud_.size()));	×
417	}
418
419	// Compute importance weights
420	weight_ = compute_importance_weights(strengths, bias_strengths);	×
421
422	// Re-initialize DiscreteIndex with bias strengths for sampling
423	point_idx_dist_.assign(bias_strengths);	×
424	} else {	×
425	fatal_error(	×
426	fmt::format("Bias node for PointCloud found without strengths array."));	×
427	}
428	}
429	}	10✔
430
431	PointCloud::PointCloud(	×
432	std::vector<Position> point_cloud, span<const double> strengths)	×
433	{
434	point_cloud_.assign(point_cloud.begin(), point_cloud.end());	×
435	point_idx_dist_.assign(strengths);	×
436	}	×
437
438	std::pair<Position, double> PointCloud::sample(uint64_t* seed) const	500,000✔
439	{
440	int32_t index = point_idx_dist_.sample(seed);	500,000✔
441	double wgt = weight_.empty() ? 1.0 : weight_[index];	500,000!
442	return {point_cloud_[index], wgt};	500,000✔
443	}
444
445	//==============================================================================
446	// SpatialBox implementation
447	//==============================================================================
448
449	SpatialBox::SpatialBox(pugi::xml_node node, bool fission)	3,552✔
450	: only_fissionable_ {fission}	3,552✔
451	{
452	// Read lower-right/upper-left coordinates
453	auto params = get_node_array<double>(node, "parameters");	3,552✔
454	if (params.size() != 6)	3,552!
455	openmc::fatal_error("Box/fission spatial source must have six "	×
456	"parameters specified.");
457
458	lower_left_ = Position {params[0], params[1], params[2]};	3,552✔
459	upper_right_ = Position {params[3], params[4], params[5]};	3,552✔
460	}	3,552✔
461
462	SpatialBox::SpatialBox(Position lower_left, Position upper_right, bool fission)	10✔
463	: lower_left_(lower_left), upper_right_(upper_right),	10✔
464	only_fissionable_(fission)	10✔
465	{}	10✔
466
467	std::pair<Position, double> SpatialBox::sample(uint64_t* seed) const	6,681,360✔
468	{
469	Position xi {prn(seed), prn(seed), prn(seed)};	6,681,360✔
470	return {lower_left_ + xi * (upper_right_ - lower_left_), 1.0};	6,681,360✔
471	}
472
473	//==============================================================================
474	// SpatialPoint implementation
475	//==============================================================================
476
477	SpatialPoint::SpatialPoint(pugi::xml_node node)	2,983✔
478	{
479	// Read location of point source
480	auto params = get_node_array<double>(node, "parameters");	2,983✔
481	if (params.size() != 3)	2,983!
482	openmc::fatal_error("Point spatial source must have three "	×
483	"parameters specified.");
484
485	// Set position
486	r_ = Position {params.data()};	2,983✔
487	}	2,983✔
488
489	std::pair<Position, double> SpatialPoint::sample(uint64_t* seed) const	25,268,719✔
490	{
491	return {r_, 1.0};	25,268,719✔
492	}
493
494	} // namespace openmc

openmc-dev / openmc / 25280492314

Source File Press 'n' to go to next uncovered line, 'b' for previous

Source File
Press 'n' to go to next uncovered line, 'b' for previous