From 28a3aec6356b98af6d31987f6e4850d0d0432ee1 Mon Sep 17 00:00:00 2001
From: Pjotr Prins
Date: Tue, 15 Dec 2020 10:27:55 +0000
Subject: Removed logl_H1 column for -lmm 3 - see also #237

---
 guix.scm    | 2 +-
 src/lmm.cpp | 6 +++---
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/guix.scm b/guix.scm
index b1d7738..7459c92 100644
--- a/guix.scm
+++ b/guix.scm
@@ -2,7 +2,7 @@
 ;;
 ;;   guix build -f guix.scm
 ;;
-;; To get a development container (run in emacs shell).
+;; To get a development container (e.g., run in emacs shell).
 ;;
 ;;   guix environment -C -l guix.scm
 
diff --git a/src/lmm.cpp b/src/lmm.cpp
index 31c42f5..e10c0e9 100644
--- a/src/lmm.cpp
+++ b/src/lmm.cpp
@@ -114,8 +114,8 @@ void LMM::WriteFiles() {
       outfile << "se" << "\t";
     }
 
-    // a_mode 1
-    outfile << "logl_H1" << "\t";  // we may make this an option
+    if (a_mode != 3)
+      outfile << "logl_H1" << "\t";  // we may make this an option
 
     switch(a_mode) {
     case 1:
@@ -147,7 +147,7 @@ void LMM::WriteFiles() {
       outfile << st.se << "\t";
     }
 
-    if (!is_legacy_mode())
+    if (a_mode != 3)
       outfile << st.logl_H1 << "\t";
 
     switch(a_mode) {
-- 
cgit v1.2.3