crp/OpenMC
1
0
Fork 0
mirror of https://github.com/openmc-dev/openmc.git synced 2026-07-29 06:35:48 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions 5

Xslibrary path now refers to actual xsdata file, not just containing directory. Changed settings.xml for examples and benchmarks. Closes gh-36.

Browse source
This commit is contained in:
Paul Romano 2011-09-08 13:14:17 -04:00
parent 28b2eff77d
commit 7f9ab9f8c3
6 changed files with 6 additions and 11 deletions
Download patch file Download diff file Expand all files Collapse all files

2
benchmarks/pu-met-fast-001/settings.xml
View file

@ -10,7 +10,7 @@
==========================================
-->
<xslibrary path="/opt/serpent/xsdata/endfb7" />
<xslibrary path="/opt/serpent/xsdata/endfb7/xsdata" />
<criticality>
<cycles>3000</cycles>

2
benchmarks/pu-met-fast-002/settings.xml
View file

@ -10,7 +10,7 @@
==========================================
-->
<xslibrary path="/opt/serpent/xsdata/endfb7" />
<xslibrary path="/opt/serpent/xsdata/endfb7/xsdata" />
<criticality>
<cycles>3000</cycles>

2
benchmarks/pu-met-fast-005/settings.xml
View file

@ -10,7 +10,7 @@
===============================================================
-->
<xslibrary path="/opt/serpent/xsdata/endfb7" />
<xslibrary path="/opt/serpent/xsdata/endfb7/xsdata" />
<criticality>
<cycles>3000</cycles>

2
examples/basic/settings.xml
View file

@ -2,7 +2,7 @@
<settings>
<!-- Path for cross section library -->
<xslibrary path="/opt/serpent/xsdata/endfb7" />
<xslibrary path="/opt/serpent/xsdata/endfb7/xsdata" />
<!-- Parameters for criticality calculation -->
<criticality>

2
examples/lattice/settings.xml
View file

@ -2,7 +2,7 @@
<settings>
<!-- Path for cross section library -->
<xslibrary path="/opt/serpent/xsdata/endfb7" />
<xslibrary path="/opt/serpent/xsdata/endfb7/xsdata" />
<!-- Parameters for criticality calculation -->
<criticality>

7
src/cross_section.f90
View file

@ -1253,12 +1253,7 @@ contains
call message(msg, 5)
! Construct filename
n = len(path)
if (path(n:n) == '/') then
filename = trim(path) // 'xsdata'
else
filename = trim(path) // '/xsdata'
end if
filename = trim(path)
! Check if xsdata exists and is readable
inquire(FILE=filename, EXIST=file_exists, READ=readable)