crp/OpenMC
1
0
Fork 0
mirror of https://github.com/openmc-dev/openmc.git synced 2026-07-27 21:55:41 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions 5

neutron balance routine now outputs a relative residual

Browse source
This commit is contained in:
Bryan Herman 2012-01-30 19:10:04 -05:00
parent cb03153e95
commit c201a71372
1 changed files with 3 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/cmfd_output.F90
View file

@ -86,6 +86,9 @@ contains
! compute residual
res = leakage + interactions - scattering - (ONE/keff)*fission
! normalize by flux
res = res/cmfd%flux(g,i,j,k)
! write output
label = "MESH (" // trim(int4_to_str(i)) // ". " // &
& trim(int4_to_str(j)) // ", " // trim(int4_to_str(k)) // &