From e4e764f0d7645bb02918d136491dcf0957db677b Mon Sep 17 00:00:00 2001
From: Olivier Sauter <olivier.sauter@epfl.ch>
Date: Tue, 16 Apr 2002 20:56:07 +0000
Subject: [PATCH] add AUG possibility for automaticly define machine
git-svn-id: https://spcsvn.epfl.ch/repos/TCV/gdat/trunk@1869 d63d8f72-b253-0410-a779-e742ad2e26cf
---
gdat.m | 9 +++++++--
1 file changed, 7 insertions(+), 2 deletions(-)
diff --git a/gdat.m b/gdat.m
index 72238b86..c9bf587b 100644
--- a/gdat.m
+++ b/gdat.m
@@ -51,7 +51,7 @@ function [trace,error,varargout] = gdat(shot,data_type,varargin)
% optional arguments valid for all values of data_type (not passed on to loadMACHINEdata function):
%
% varargin{1}: 0 => no plot (default), 1 => plot
-% varargin{2}: machine name 'JET' , 'TCV' (default: JET or TCV, depending on where implemented)
+% varargin{2}: machine name 'JET', 'TCV' (default)
%
% Additional input arguments for specific traces (passed on to loadMACHINEdata function)
%
@@ -110,7 +110,12 @@ doplot=0;
if (nargineff>=3 & ~isempty(varargin{1})); doplot=varargin{1}; end
machine='TCV';
a=which('gdat');
-if ~isempty(findstr('osauter',a)); machine='JET'; end
+if ~isempty(findstr('ipp',a))
+ machine='AUG';
+elseif ~isempty(findstr('osauter',a));
+ machine='JET';
+end
+if (nargineff>=4 & ~isempty(varargin{2})); machine=varargin{2}; end
if (nargineff>=4 & ~isempty(varargin{2})); machine=varargin{2}; end
% load data from specified machine
--
GitLab