matlab开发-MuellerStokesJonesCalculus

matlab开发-MuellerStokesJonesCalculus。用于极化演算的Mueller、Stokes-Jones矩阵和向量的函数

function A = jones（varargin）
    %function A = jones（varargin）
    %Multiply Jones matrices and vectors.
    %
    %  Syntax:
    %     JM = jones（JM）
    %     A = jones（C1 C2 ...）
    %
    %  Description:
    %     M = jones（M）
    %
    %     A = jones（C1 C2 ...）
    %
    %  Examples:
    %     JM = jones（jones_linpolarizer（）jones_rotate（jones_linpolarizer（）90‘deg‘））
    %     % crossed polarizers
    %     JM =
    %
    %       1.0e-016 *
    % 
    %         0.0000    0.6123
    %              0         0
    %
    %  References:
    %     [1] E. Collett Field Guide to Polarization
    %         SPIE Field Guides vol. FG05 SPIE （2005）. ISBN 0-8194-5868-6.
    %     [2] R. A. Chipman “Polarimetry“ chapter 22 in Handbook of Optics II
    %         2nd Ed M. Bass editor in chief （McGraw-Hill New York 1995）
    %     [3] “Jones calculus“ http://en.wikipedia.org/wiki/Jones_calculus
    %         last retrieved on Jan 13 2014.
    %
    %  See also:
    %
    %  File information:
    %     version 1.0 （jan 2014）
    %     （c） Martin Vogel
    %     email: matlab@martin-vogel.info
    %
    %  Revision history:
    %     1.0 （jan 2014） initial release version
    %
    
    if nargin<1
        A = [];
        return;
    end
    
    A = varargin{1};
    
    for vi=2:nargin
        A = cellfunc（@（M1M2）（M1*M2） A varargin{vi}）;
    end
    
end

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     文件        2660  2014-01-17 22:43  mueller_stokes_jones\stokes_degpolarization.m
     文件        2133  2014-01-17 22:45  mueller_stokes_jones\mueller_unity.m
     文件        2710  2014-01-17 23:17  mueller_stokes_jones\jones_example.m
     文件        2295  2014-01-17 23:14  mueller_stokes_jones\jones_cpleft.m
     文件        2478  2014-01-17 22:52  mueller_stokes_jones\mueller_absorber.m
     文件        5414  2014-01-17 23:13  mueller_stokes_jones\jones_lindiattenuator.m
     文件        2426  2014-01-17 22:42  mueller_stokes_jones\stokes_intensity.m
     文件         690  2014-01-17 22:32  mueller_stokes_jones\private\c2n.m
     文件        1859  2014-01-17 22:33  mueller_stokes_jones\private\cellfunc.m
     文件        3197  2014-01-17 22:51  mueller_stokes_jones\mueller_circretarder.m
     文件        2391  2014-01-17 22:40  mueller_stokes_jones\stokes_lphorizontal.m
     文件        2320  2014-01-17 23:11  mueller_stokes_jones\jones_lphorizontal.m
     文件        2955  2014-01-17 23:12  mueller_stokes_jones\jones_linretarder.m
     文件        2406  2014-01-17 22:36  mueller_stokes_jones\stokes_lpminus45.m
     文件        2338  2014-01-17 22:44  mueller_stokes_jones\stokes_cpleft.m
     文件        2323  2014-01-17 22:47  mueller_stokes_jones\mueller_linpolarizer.m
     文件        2351  2014-01-17 22:44  mueller_stokes_jones\stokes_cpright.m
     文件        1444  2014-01-17 23:16  mueller_stokes_jones\jones.m
     文件        6044  2014-01-17 22:47  mueller_stokes_jones\mueller_lindiattenuator.m
     文件        7225  2014-01-17 22:49  mueller_stokes_jones\mueller_homogeneous_elliptic_diattenuator.m
     文件        2014  2014-01-17 23:10  mueller_stokes_jones\jones_mirror.m
     文件        2341  2014-01-17 23:11  mueller_stokes_jones\jones_lpminus45.m
     文件        1577  2014-01-17 23:01  mueller_stokes_jones\mueller_stokes.m
     文件        2435  2014-01-17 22:36  mueller_stokes_jones\stokes_lpplus45.m
     文件        2793  2014-01-17 22:58  mueller_stokes_jones\mueller_checkmueller.m
     文件        2692  2014-01-17 22:48  mueller_stokes_jones\mueller_ismueller.m
     文件        2209  2014-01-17 22:46  mueller_stokes_jones\mueller_mirror.m
     文件        2920  2014-01-17 22:44  mueller_stokes_jones\mueller_waveplate.m
     文件        2626  2014-01-17 22:41  mueller_stokes_jones\stokes_isstokes.m
     文件        3202  2014-01-17 22:46  mueller_stokes_jones\mueller_linretarder.m
     文件        2364  2014-01-17 22:35  mueller_stokes_jones\stokes_lpvertical.m
............此处省略17个文件信息