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

Accept input for cones.

Browse source
This commit is contained in:
Paul Romano 2012-10-15 09:01:32 -04:00
parent a5d0b1967a
commit c1bf538429
1 changed files with 9 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

9
src/input_xml.F90
View file

@ -753,6 +753,15 @@ contains
case ('sphere')
s % type = SURF_SPHERE
coeffs_reqd = 4
case ('x-cone')
s % type = SURF_CONE_X
coeffs_reqd = 4
case ('y-cone')
s % type = SURF_CONE_Y
coeffs_reqd = 4
case ('z-cone')
s % type = SURF_CONE_Z
coeffs_reqd = 4
case ('box-x')
s % type = SURF_BOX_X
coeffs_reqd = 4