From 68a0d717783e6167efb3bc2f6e8a1ced5dd46322 Mon Sep 17 00:00:00 2001
From: Oliver Lemke <olemke@gmail.com>
Date: Tue, 14 Jan 2025 09:43:02 +0100
Subject: [PATCH] Remove duplicate maxima

---
 atovs_read_find.m | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/atovs_read_find.m b/atovs_read_find.m
index 988f932..bc7b76c 100644
--- a/atovs_read_find.m
+++ b/atovs_read_find.m
@@ -155,9 +155,11 @@ M(3) = max(A(3,:));
 M(4) = max(A(4,:));
 maximum = max(max(M))';
 [ret.x,ret.y]=find(A==maximum);
+if size(ret.x, 1)>1
+    ret.x = ret.x(1);
+    ret.y = ret.y(1);
+end
 ret.maximum = repmat(maximum, size(ret.x));
-% ret.x = ret.x(1);
-% ret.y = ret.y(1);
 ret.lon=((double(data.lonfov45(ret.y))+double(data.lonfov46(ret.y)))/2E4)'; % longitude of nadir at maximum of light curve
 ret.lat=((double(data.latfov45(ret.y))+double(data.latfov46(ret.y)))/2E4)'; % latitude of nadir at maximum of light curve
 ret.height=(double(data.height(ret.y))/10)'; % altitude of satellite at maximum of light curve
-- 
GitLab