%% SL4
z = 1 + 1j;
s = conj(z);

s = z'

Z   = abs(z)
phi = angle(z)
phi_dec = phi*180/pi
zm = Z*(cos(phi)+1j*sin(phi))

%% SL5
Z  = [1+1j, sqrt(2)]
Zz = abs(Z);
sqrt(Zz(1)^2 + Zz(2)^2)

% or...
sqrt(Zz*Zz')

norm(Z)
sqrt(dot(Z, Z))
hypot(Z(1), Z(2))

%% SL8
u = 1:2:99,
v = (25:-5:-5)'

T = [-4:-1:-6; 1:3; pi/2 pi/4 pi/6]'

T = [-4:-1:-6; 1:3; pi./(2:2:6)]'
T = [(-4:-1:-6)' (1:3)' (pi./(2:2:6))']

%% SL10
u = linspace(-1.15, 75.4)

v = linspace(100, -100, 201)

v = 100:-10:-100
v = linspace(100, -100, 200/10+1)

%% SL13
M1 = NaN(2),
M2 = ones(1, 4),
M3 = diag([2 3 -5]),
M4 = diag([1 1 1], 1);

M4 = [zeros(4,1) [eye(3); zeros(1,3)]],
M4 = diag(ones(3, 1), 1)

%% SL22
A = [1 pi; exp(1) -1i]

A1 = repmat(A, [1 3]);
A2 = reshape(A.', [1 4]);
A3 = repmat(conj(A), [3 1]);
A4 = triu(tril(repmat(A, [3 3]), 1), -1)
