crp/OpenMC
1
0
Fork 0
mirror of https://github.com/openmc-dev/openmc.git synced 2026-07-28 22:26:08 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions 5

Made surface name 104 characters

Browse source
This commit is contained in:
Will Boyd 2015-10-12 23:41:42 -04:00
parent 8624c784f2
commit bb9c0ea40c
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/surface_header.F90
View file

@ -15,7 +15,7 @@ module surface_header
neighbor_pos(:), & ! List of cells on positive side
neighbor_neg(:) ! List of cells on negative side
integer :: bc ! Boundary condition
character(len=52) :: name = "" ! User-defined name
character(len=104) :: name = "" ! User-defined name
contains
procedure :: sense
procedure :: reflect