From d89c3fdd32b77f7c0fa583a4df2484a27640b2ec Mon Sep 17 00:00:00 2001
From: Katrine Rogers <k_sharp13@hotmail.com>
Date: Wed, 12 Sep 2018 09:40:55 +0100
Subject: [PATCH] add function simple_optim_fitness

---
 private/simple_optim_fitness.m | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)
 create mode 100644 private/simple_optim_fitness.m

diff --git a/private/simple_optim_fitness.m b/private/simple_optim_fitness.m
new file mode 100644
index 0000000..e0f93dd
--- /dev/null
+++ b/private/simple_optim_fitness.m
@@ -0,0 +1,18 @@
+% Copyright 2018 
+% Open University (Katrine Rogers - k.s.rogers@open.ac.uk)
+% University of Southampton (Edward Rogers - etr@orc.soton.ac.uk)
+
+% Defines function to be optimised
+
+% Note fwhm_target is in terms of number of lambdas
+function IR = simple_optim_fitness(b, phi1, phi2, x, lambda, fwhm_target, ind, ind_red)
+
+f =  b*phi1 + phi2;
+I = abs(f).^2;
+w = calc_fwhm_simple(I(1:ind),x,ind_red)/lambda;   % So that w is in terms of no of lambdas
+
+if w>fwhm_target
+    IR = 1e8*w;
+else
+    IR = calc_IR(I,ind);
+end
-- 
GitLab