blob: 68f9beb568e8b8750267a985b7d841c0d432de35 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
%---------------------------------------------------------------
% Returns the ABCD matrix for free space propagation.
%
% SYNTAX: abcd=free(L);
% <...> indicates optional argument
%
% L = distance to propagate.
% n = index of refraction. Default is 1.
%
% abcd = |1 L|
% |0 1 |
%
%---------------------------------------------------------------
% SYNTAX: abcd=free(L);
%---------------------------------------------------------------
function abcd=free(L,varargin)
abcd=[
1 L
0 1
];
|
