From 066f940afa401eff85705098911cc1593f2895e7 Mon Sep 17 00:00:00 2001
From: Antoine Merle <Antoine.Merle@epfl.ch>
Date: Fri, 2 Mar 2018 09:52:08 +0000
Subject: [PATCH] Correct syntax for LIUQE.M2 or LIUQE.M3

git-svn-id: https://spcsvn.epfl.ch/repos/TCV/gdat/trunk@9419 d63d8f72-b253-0410-a779-e742ad2e26cf
---
 crpptbx/TCV/gdat_tcv.m | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/crpptbx/TCV/gdat_tcv.m b/crpptbx/TCV/gdat_tcv.m
index 63fb9ad6..892b3479 100644
--- a/crpptbx/TCV/gdat_tcv.m
+++ b/crpptbx/TCV/gdat_tcv.m
@@ -375,7 +375,7 @@ if strcmp(mapping_for_tcv.method(1:3),'tdi')
         if ~isempty(ij)
           mapping_for_tcv.expression(ij+5:ij+6) = substr_liuqe;
         end
-        ij = regexpi(mapping_for_tcv.expression,'LIUQE.*\.M','once');
+        ij = regexpi(mapping_for_tcv.expression,'LIUQE\.M.?','once');
         if ~isempty(ij)
           ichar_after_liuqe = 7;
           if strcmp(mapping_for_tcv.expression(ij+ichar_after_liuqe),'2') || ...
@@ -416,7 +416,7 @@ if strcmp(mapping_for_tcv.method(1:3),'tdi')
           end
         end
       else
-        ij = regexpi(mapping_for_tcv.expression,'LIUQE.*\.M','once');
+        ij = regexpi(mapping_for_tcv.expression,'LIUQE\.M.?','once');
         if ~isempty(ij)
           mapping_for_tcv.expression = [mapping_for_tcv.expression(1:ij+4) substr_liuqe_tcv_eq mapping_for_tcv.expression(ij+7:end)];
           do_liuqem2liuqef = 1;
-- 
GitLab