File: LjgToXYZFun.m

package info (click to toggle)
psychtoolbox-3 3.0.14.20170103%2Bgit6-g605ff5c.dfsg1-1
  • links: PTS, VCS
  • area: main
  • in suites: stretch
  • size: 103,044 kB
  • ctags: 69,483
  • sloc: ansic: 167,371; cpp: 11,232; objc: 4,708; sh: 1,875; python: 383; php: 344; makefile: 207; java: 113
file content (22 lines) | stat: -rw-r--r-- 428 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
function [f,g] = LjgToXYZFun(XYZ,Ljg)
% [f,g] = LjgToXYZFun(XYZ,Ljg)
%
% Optimization function for LjgToXYZ numerical
% search.  Not vectorized.
%
% 3/27/01  dhb  Wrote it.

% Convert back.
Ljg1 = XYZToLjg(XYZ);

% Handle case where XYZ is so weird that
% an imaginary value is returned.
if (any(~isreal(Ljg1)))
	sdiff = (abs(Ljg1)-Ljg).^2;
	f = sum(sdiff);
	g = 10;
else
	sdiff = (Ljg1-Ljg).^2;
	f = sum(sdiff);
	g = -XYZ;
end