From 7f3cb9f3a40bd36fc2fed6aaa64ec511af4ea02b Mon Sep 17 00:00:00 2001
From: Olivier Sauter <olivier.sauter@epfl.ch>
Date: Fri, 5 Apr 2002 19:23:36 +0000
Subject: [PATCH] radius from sxR as structure as for TCV
git-svn-id: https://spcsvn.epfl.ch/repos/TCV/gdat/trunk@1864 d63d8f72-b253-0410-a779-e742ad2e26cf
---
JET/loadJETdata.m | 7 ++++---
1 file changed, 4 insertions(+), 3 deletions(-)
diff --git a/JET/loadJETdata.m b/JET/loadJETdata.m
index 354b10d9..6bf69a39 100644
--- a/JET/loadJETdata.m
+++ b/JET/loadJETdata.m
@@ -477,10 +477,11 @@ switch JETkeywrdcase{index}
end
zmageff=interp1(zmag.t,zmag.data,trace.t);
for i=starti:endi
- radius(i,:)=2.848 + (2.172-zmageff') .* tan(-4.5/180.*3.14159 - atan2(0.99.*(i-18),35.31));
+ radius.data(i,:)=2.848 + (2.172-zmageff') .* tan(-4.5/180.*3.14159 - atan2(0.99.*(i-18),35.31));
end
- varargout={{radius}};
- trace.R=radius;
+ radius.t=t;
+ varargout{1}={radius};
+ trace.R=radius.data;
end
%&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&
--
GitLab