From 0b878b76be743324c9ad85c40d13ea0e64ed25ba Mon Sep 17 00:00:00 2001
From: Bryan Herman <bherman@mit.edu>
Date: Wed, 1 Feb 2012 16:30:13 -0500
Subject: [PATCH] cmfd is now executed after every active cycle

---
 src/main.F90 | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/src/main.F90 b/src/main.F90
index 0ef6a17b51..2329db803d 100644
--- a/src/main.F90
+++ b/src/main.F90
@@ -33,7 +33,7 @@ program main
   end if
      
   ! call cmfd run
-  call execute_cmfd()
+! call execute_cmfd()
 
   ! finalize run
   call finalize_run()
@@ -133,6 +133,11 @@ contains
 
        ! print cycle information
 
+       ! run cmfd
+       if (current_cycle > n_inactive) then
+         call execute_cmfd()
+       end if
+
        ! Turn tallies on once inactive cycles are complete
        if (current_cycle == n_inactive) then
           tallies_on = .true.