From af2c79516738406900f52271ace3f1d484745616 Mon Sep 17 00:00:00 2001
From: Elia Merzari <merzari@stomp.mcs.anl.gov>
Date: Wed, 19 Oct 2016 16:48:07 -0500
Subject: [PATCH] Added testing

---
 examples/integration_example/integration_example.usr | 11 +++++++++--
 1 file changed, 9 insertions(+), 2 deletions(-)

diff --git a/examples/integration_example/integration_example.usr b/examples/integration_example/integration_example.usr
index 7e5b270..5e7ace3 100644
--- a/examples/integration_example/integration_example.usr
+++ b/examples/integration_example/integration_example.usr
@@ -94,8 +94,8 @@ c-----------------------------------------------------------------------
 
 c     Will this be overwritten -----------------
       write(6,*)"*** Setting polynomial orders ..." 
-      n_legendre=10
-      m_fourier=10
+      n_legendre=5
+      m_fourier=2
 c-----------------------------------------------
 
 c This is for testing -----------
@@ -107,6 +107,13 @@ c      call nek_testp()
 c      call exitt()
 c--------------------------------
 
+      do i0=1,n_legendre
+        do j0=1,m_fourier
+        if (nid.eq.0) write(6,*)"C(",i0,",",j0,")=",
+     &      coeff_fij(i0,j0)
+        enddo 
+      enddo
+
       return
       end
 c-----------------------------------------------------------------------
-- 
2.26.2