Development of a SCALE model for High Flux Isotope Reactor cycle 400