% Wien's law
function val = lMax(T)    % T=K, val=um
  C3=2897.8;
  val = C3./T; 
end
