LUKEITM

LUKE - Function that gives the correspondance between the name of a LUKE structure and its number in the ITM MDS+ database

Function that gives the correspondance between the name of a LUKE structure and its number in the ITM MDS+ database

by Y.Peysson CEA-IRFM <yves.peysson@cea.fr> and Joan Decker CEA-IRFM (joan.decker@cea.fr)

0001 function [struct_name,struct_path] = LUKEITM(dkepath,name)
0002 %LUKE - Function that gives the correspondance between the name of a LUKE structure and its number in the ITM MDS+ database
0003 %
0004 %Function that gives the correspondance between the name of a LUKE structure and its number in the ITM MDS+ database
0005 %
0006 %by Y.Peysson CEA-IRFM <yves.peysson@cea.fr> and Joan Decker CEA-IRFM (joan.decker@cea.fr)
0007 %
0008 if nargin < 2,error('Not enough input arguments in LUKEITM.m');end
0009 %
0010 if strcmp(name,'equil'),
0011     equil_name{1} = 'TScyl';path_equil{1} = '';
0012     equil_name{2} = 'TScirc';path_equil{2} = '';
0013     equil_name{3} = 'TScirc_peak';path_equil{3} = '';
0014     equil_name{4} = 'TScirc_e1';path_equil{4} = '';
0015     equil_name{5} = 'TScyl_lowTene';path_equil{5} = '';
0016     equil_name{6} = 'JETh77';path_equil{6} = '';
0017     equil_name{7} = 'JETliketest';path_equil{7} = [dkepath.luke_root,'Project_DKE/Modules/C3PO/Examples/JETlike/EQUIL/'];% Magnetic equilibrium from ~/LUKE/Project_DKE/Modules/C3PO/Examples/***/EQUIL/
0018     equil_name{8} = 'PLTtest';path_equil{8} = [dkepath.luke_root,'Project_DKE/Modules/C3PO/Examples/PLT/EQUIL/'];% Magnetic equilibrium from ~/LUKE/Project_DKE/Modules/C3PO/Examples/***/EQUIL/
0019     equil_name{9} = 'VERSATOR2test';path_equil{9} = [dkepath.luke_root,'Project_DKE/Modules/C3PO/Examples/VERSATOR2/EQUIL/'];% Magnetic equilibrium from ~/LUKE/Project_DKE/Modules/C3PO/Examples/***/EQUIL/
0020     equil_name{10} = 'RTtest';path_equil{10} = [dkepath.luke_root,'Project_DKE/Modules/C3PO/Examples/RTtest/EQUIL/'];% Magnetic equilibrium from ~/LUKE/Project_DKE/Modules/C3PO/Examples/***/EQUIL/
0021     equil_name{11} = 'RTtest_vacuum';path_equil{11} = [dkepath.luke_root,'Project_DKE/Modules/C3PO/Examples/RTtest/EQUIL/'];% Magnetic equilibrium from ~/LUKE/Project_DKE/Modules/C3PO/Examples/***/EQUIL/
0022     equil_name{12} = 'RFP';path_equil{12} = [dkepath.luke_root,'Project_DKE/Modules/C3PO/Examples/RFP/EQUIL/'];% Magnetic equilibrium from ~/LUKE/Project_DKE/Modules/C3PO/Examples/***/EQUIL/
0023     equil_name{13} = 'ITER_Scen4_IAEA06';path_equil{13} = [dkepath.luke_root,'Simulations/Examples/ITER/Scen4/EQUIL/'];% Magnetic equilibrium from ~/LUKE/Simulations/
0024     equil_name{14} = 'CRONOS_32299_k100';path_equil{14} = [dkepath.luke_root,'Simulations/Examples/TS/32299/EQUIL/'];% Magnetic equilibrium from ~/LUKE/Simulations/
0025     %
0026     struct_name = equil_name;
0027     struct_path = path_equil;
0028 elseif strcmp(name,'wave'),
0029     %
0030     wave_name{1} = 'WAVE_ITER_Scen4_IAEA06_20Z';path_wave{1} = [dkepath.luke_root,'Simulations/Examples/ITER/Scen4/WAVE/C3PO/'];% Magnetic equilibrium from ~/LUKE/Simulations/
0031     %
0032     struct_name = wave_name;
0033     struct_path = path_wave;
0034 end
0035 %