summaryrefslogtreecommitdiff
path: root/axial/lens.m
blob: a75b2f4318ec58eeaead283161f88edbf9aa8d6b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
%---------------------------------------------------------------
% Returns the ABCD matrix for propagation through a thin lens.
%
% SYNTAX: abcd=lens(f);
%
%
% f = lens focal length
%
% abcd = |  1    0 |
%        |-1/f   1 |
%
%---------------------------------------------------------------
% SYNTAX: abcd=lens(f);
%---------------------------------------------------------------

function abcd=lens(f)

abcd=[
    1       0
    -1/f    1
];