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

@@ -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