From b504ef35278a39301c00ff32eb68f25c4558a1f9 Mon Sep 17 00:00:00 2001 From: Patrick Shriwise Date: Tue, 2 Oct 2018 15:28:29 -0500 Subject: [PATCH] Skipping neighbor list setup if using CAD. --- src/input_xml.F90 | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/src/input_xml.F90 b/src/input_xml.F90 index 9fefbbfcdc..6f1080b8af 100644 --- a/src/input_xml.F90 +++ b/src/input_xml.F90 @@ -179,8 +179,10 @@ contains ! After reading input and basic geometry setup is complete, build lists of ! neighboring cells for efficient tracking - call neighbor_lists() - + if (.not. dagmc) then + call neighbor_lists() + end if + ! Assign temperatures to cells that don't have temperatures already assigned call assign_temperatures()