mirror of
https://github.com/openmc-dev/openmc.git
synced 2026-07-28 14:15:42 -04:00
Adding code for handling universes and other Fortran-side cell attributes. Skipping geometry writeout for CAD runs for now.
This commit is contained in:
parent
8dc0ba2b62
commit
3f2fc67d0b
3 changed files with 77 additions and 1 deletions
|
|
@ -8,6 +8,14 @@ namespace openmc {
|
|||
|
||||
extern "C" void
|
||||
write_geometry(hid_t file_id) {
|
||||
|
||||
#ifdef CAD
|
||||
if (dagmc) {
|
||||
return;
|
||||
}
|
||||
#endif
|
||||
|
||||
|
||||
auto geom_group = create_group(file_id, "geometry");
|
||||
write_attribute(geom_group, "n_cells", cells.size());
|
||||
write_attribute(geom_group, "n_surfaces", surfaces.size());
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue