From 0a45f08871cdc83c003a943eb2e0e00058b822d0 Mon Sep 17 00:00:00 2001
From: Edilbert Kirk <Edilbert.Kirk@uni-hamburg.de>
Date: Thu, 15 Dec 2016 11:12:25 +0100
Subject: [PATCH] add GUIPUT for amplitude array

---
 cat/src/cat.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/cat/src/cat.f90 b/cat/src/cat.f90
index b78eb62..2a262e0 100644
--- a/cat/src/cat.f90
+++ b/cat/src/cat.f90
@@ -1514,7 +1514,7 @@ if (npost > 0) then
    call guiput("GVYM" // char(0), gguiym, 1, ngx, 1)   ! v
 
    c4(:,:) = cq(:,:)
-   call guiput("CQ" // char(0), c4, nkx+1, nfy+1, 2)   ! v
+   call guiput("C4" // char(0), c4, nkx+1, nfy+1, 2)   ! v
 
 endif
 
-- 
GitLab