From 1fee45a858042be374004d9e2ae641300500c256 Mon Sep 17 00:00:00 2001
From: Bryan Herman <bherman@mit.edu>
Date: Fri, 28 Oct 2011 19:23:42 -0400
Subject: [PATCH] linked cmfd_utils in main code and successfully printed from
 cmfd routine

---
 src/cmfd_utils.f90 | 2 ++
 src/main.f90       | 4 ++++
 2 files changed, 6 insertions(+)

diff --git a/src/cmfd_utils.f90 b/src/cmfd_utils.f90
index e2b2ff753c..dfa842d65b 100644
--- a/src/cmfd_utils.f90
+++ b/src/cmfd_utils.f90
@@ -47,6 +47,8 @@ contains
 
   subroutine print_cmfd()
 
+    write(7,*) 'hello world'
+
   end subroutine print_cmfd
 
 end module cmfd_utils
diff --git a/src/main.f90 b/src/main.f90
index 9bbb16c6a4..d6caa6d0ef 100644
--- a/src/main.f90
+++ b/src/main.f90
@@ -1,5 +1,6 @@
 program main
 
+  use cmfd_utils,      only: print_cmfd
   use constants
   use global
   use initialize,      only: initialize_run
@@ -132,6 +133,9 @@ contains
     ! Calculate statistics for tallies
     call tally_statistics()
 
+    ! Call cmfd print routine
+    call print_cmfd()
+
     if (master) call header("SIMULATION FINISHED", 1)
 
   end subroutine run_problem