Changeset 360 in ETALON for SPESO/Online


Ignore:
Timestamp:
Mar 7, 2016, 2:57:18 PM (9 years ago)
Author:
malovyts
Message:

Edited parameter finding function for SPESO

Location:
SPESO/Online
Files:
3 edited

Legend:

Unmodified
Added
Removed

  • SPESO/Online/SOLEIL_define_data.m

    r359 r360  
    3333angles = RS4pos([6,7]);%,7,9,10,12,14]);
    3434
     35R10=-18;
     36R20= 43;
     37
    3538% {[positions; angles(cartesian system)], axis_name, angle_name, search_range}
    3639PositionTables_exp={...
    3740                ...{[TZpos;(90+RS3pos).*pi./180], 'Z0','R3', 20000},...
    3841                ...{[TZpos;(90-RS4pos).*pi./180], 'Z0','R4', 20000},...
    39                 {[TSpos2;(90+18+RS1pos2).*pi./180],'S2','R1', 200000},...
    40                 {[TSpos4;(90+18+RS1pos4).*pi./180],'S4','R1', 200000},...
    41                 {[TSpos2(3:end);(90-43+RS2pos2(3:end)).*pi./180],'S2','R2', 100000},...
    42                 {[TSpos4(2:end);(90-43+RS2pos4(2:end)).*pi./180],'S4','R2', 100000},...
     42                {[TSpos2;(90-R10+RS1pos2).*pi./180],'S2','R1', 200000},...
     43                {[TSpos4;(90-R10+RS1pos4).*pi./180],'S4','R1', 200000},...
     44                {[TSpos2;(90-R20+RS2pos2).*pi./180],'S2','R2', 100000},...
     45                {[TSpos4;(90-R20+RS2pos4).*pi./180],'S4','R2', 100000},...
    4346                ...{[TZpos;(90+RS3pos2).*pi./180],'Z2','R3', 20000},...
    4447                ...{[TZpos;(90-RS4pos2).*pi./180],'Z2','R4', 20000},...
    … …  
    97100                                  ,PositionTables{tables_loop+1},AXX_arr2...
    98101                                  );
     102end;
     103
     104for tables_loop=1:length(PositionTables)
     105        [AX0_mean, AX0_RMS, X_mean, X_RMS]=SOLEIL_angles03(PositionTables{tables_loop});
     106        AXX_arr1 = [AX0_mean, AX0_RMS, X_mean, X_RMS];
     107        SOLEIL_intersection_plots(PositionTables{tables_loop},AXX_arr1);
    99108end;
    100109

  • SPESO/Online/SOLEIL_get_angles.m

    r358 r360  
    1111        %TZ0_3 - TZ position, when RS3 ==  0; TZ position of the grating, for det. 1
    1212        %TZ0_4 - TZ position, when RS4 ==  0; TZ position of the grating, for det. 2
    13         TX0 = 154268;
    14         TX0_Z = 0.4;
    15         TX0_S = 0.6;
     13        %R10,R20 - angles of motors, at which detectors 1 and 2 see grating orthohonally
     14        TX0Z3 = 719486;
     15        TX0Z4 = 454689;
     16        TX0S1 = 154268;
     17        TX0S2 = 91771;
     18        TX0_Z3 = 0.41;
     19        TX0_Z4 = 0.41;
     20        TX0_S1 = 0.81;
     21        TX0_S2 = 0.83;
    1622        TS0_1 = -38663;
    1723        TS0_2 = 255000;
    1824        TZ0_3 = -68860;
    1925        TZ0_4 = -68964;
     26        R10= -18
     27        R20=  43;
     28
     29        maxRS12=  50;
     30        minRS12= -50;
     31        maxRS34=  25;
     32        minRS34= -25;
    2033
    2134        RS_new=cell(1,4);
    22         RS_new{1}=atan((TX_pos-TX0).*TX0_S./(TS_pos-TS0_1)).*180./pi;
    23         RS_new{2}=atan((TX_pos-TX0).*TX0_S./(TS_pos-TS0_2)).*180./pi;
    24         RS_new{3}=atan((TX_pos-TX0).*TX0_Z./(TZ_pos-TZ0_3)).*180./pi;
     35        RS_new{1}=atan((TX_pos-TX0S1).*TX0_S1./(TS_pos-TS0_1)).*180./pi+R10;
     36        RS_new{2}=atan((TX_pos-TX0S2).*TX0_S2./(TS_pos-TS0_2)).*180./pi+R20;
     37        RS_new{3}=atan((TX_pos-TX0Z3).*TX0_Z3./(TZ_pos-TZ0_3)).*180./pi;
    2538        RS_new{3}= RS_new{3}-90*sign(RS_new{3});
    26         RS_new{4}=atan((TX_pos-TX0).*TX0_Z./(TZ_pos-TZ0_4)).*180./pi;
     39        RS_new{4}=atan((TX_pos-TX0Z4).*TX0_Z4./(TZ_pos-TZ0_4)).*180./pi;
    2740        RS_new{4}=-RS_new{4}+90*sign(RS_new{4});
     41
     42        for iloop=1:2
     43                if RS_new{iloop}>maxRS12
     44                        RS_new{iloop}=maxRS12;
     45                end;
     46
     47                if RS_new{iloop}<minRS12
     48                        RS_new{iloop}=maxRS12;
     49                end;
     50               
     51                if RS_new{iloop}>maxRS34
     52                        RS_new{iloop+2}=maxRS34;
     53                end;
     54
     55                if RS_new{iloop}<minRS34
     56                        RS_new{iloop+2}=minRS34;
     57                end;
     58        end;
    2859
    2960end

  • SPESO/Online/SOLEIL_get_parameters.m

    r359 r360  
    1010
    1111% tx = -200000
    12 %TSpos2 =   [ 100 -100000 -200000 -300000 -400000 -500000 -600000 -700000 -795311  ];
    13 %RS2pos2 =  [  90      80      72      65      53      43      34      25      21  ];
    14 %RS1pos2 =  [   8      10       3      -3     -10     -18     -23     -34     -42  ];
    15 TSpos2 =   [ 100 -300000 -400000 -500000 -600000 -700000 -795311  ];
    16 RS1pos2 =  [  50      50      41      30      30      26      25  ];
    17 RS2pos2 =  [  27      27      23      21      9       3        1  ];
     12TSpos2 =   [ 100 -100000 -200000 -300000 -400000 -500000 -600000 -700000 -795311  ];
     13RS2pos2 =  [  90      80      72      65      53      43      34      25      21  ];
     14RS1pos2 =  [   8      10       3      -3     -10     -18     -23     -34     -42  ];
     15%TSpos2 =   [ 100 -300000 -400000 -500000 -600000 -700000 -795311  ];
     16%RS1pos2 =  [  50      50      41      30      30      26      25  ];
     17%RS2pos2 =  [  27      27      23      21      9       3        1  ];
    1818RS3pos2 = RS3pos .* 0.8;
    1919RS4pos2 = RS4pos .* 0.8;
    2020
    2121% tx = -400000
    22 %TSpos4 =   [ 100 -200000 -400000 -600000 -795311  ];
    23 %RS1pos4 =  [  -3      -3     -15     -27     -40  ];
    24 %RS2pos4 =  [  80      66      50      37      23  ];
     22TSpos4 =   [ 100 -200000 -400000 -600000 -795311  ];
     23RS1pos4 =  [  -3      -3     -15     -27     -40  ];
     24RS2pos4 =  [  80      66      50      37      23  ];
    2525
    26 TSpos4 =   [ 100 -300000 -400000 -500000 -600000 -700000 -795311  ];
    27 RS1pos4 =  [  50      50      41      30      30      26      25  ];
    28 RS2pos4 =  [  27      27      23      21      9       3        1  ];
     26%TSpos4 =   [ 100 -300000 -400000 -500000 -600000 -700000 -795311  ];
     27%RS1pos4 =  [  50      50      41      30      30      26      25  ];
     28%RS2pos4 =  [  27      27      23      21      9       3        1  ];
    2929RS3pos4 = RS3pos .* 0.5;
    3030RS4pos4 = RS4pos .* 0.5;
    … …  
    3434angles = RS4pos([6,7]);%,7,9,10,12,14]);
    3535
     36R10=-18;
     37R20= 43;
     38
    3639% {[positions; angles(cartesian system)], axis_name, angle_name, search_range}
    3740PositionTables_exp={...
    3841                ...{[TZpos;(90+RS3pos).*pi./180], 'TZ_TX000k','RS3', 20000},...
    3942                ...{[TZpos;(90-RS4pos).*pi./180], 'TZ_TX000k','RS4', 20000},...
    40                 {[TSpos2;(90+RS1pos2).*pi./180],'TS_TX200k','RS1', 200000},...  %RS1 200k
    41                 {[TSpos4;(90+RS1pos4).*pi./180],'TS_TX400k','RS1', 200000},...  %RS1 400k
    42                 {[TSpos2;(90+RS2pos2).*pi./180],'TS_TX200k','RS2', 100000},...                  %RS2 200k
    43                 {[TSpos4;(90+RS2pos4).*pi./180],'TS_TX400k','RS2', 100000},...                  %RS2 400k
     43                {[TSpos2;(90-R10+RS1pos2).*pi./180],'TS_TX200k','RS1', 200000},...      %RS1 200k
     44                {[TSpos4;(90-R10+RS1pos4).*pi./180],'TS_TX400k','RS1', 200000},...      %RS1 400k
     45                {[TSpos2;(90-R20+RS2pos2).*pi./180],'TS_TX200k','RS2', 100000},...                      %RS2 200k
     46                {[TSpos4;(90-R20+RS2pos4).*pi./180],'TS_TX400k','RS2', 100000},...                      %RS2 400k
    4447                {[TZpos;(90+RS3pos2).*pi./180],'TZ_TX200k','RS3', 20000},...                    %RS3 200k
    4548                {[TZpos;(90-RS4pos2).*pi./180],'TZ_TX200k','RS4', 20000},...                    %RS4 200k
Note: See TracChangeset for help on using the changeset viewer.