| # | Line 4 | Line 4 | |
|---|---|---|
| 4 | # Compute 1976 CIE Lab deltaE* between two Radiance pictures | |
| 5 | # | |
| 6 | if ($#argv != 2) then | |
| 7 | < | echo "Usage: $0 picture1 picture2 > output.pic" |
| 7 | > | echo "Usage: $0 picture1 picture2 > output.hdr" |
| 8 | exit 1 | |
| 9 | endif | |
| 10 | set cielab='sq(x):x*x;Ls(Yi):if(Yi/Yw-.01,116*(Yi/Yw)^(1/3)-16,903.3*Yi/Yw);as(Xi,Yi,Zi):500*((Xi/Xw)^(1/3)-(Yi/Yw)^(1/3));bs(Xi,Yi,Zi):200*((Yi/Yw)^(1/3)-(Zi/Zw)^(1/3));dE(X1,Y1,Z1,X2,Y2,Z2):sqrt(sq(Ls(Y1)-Ls(Y2))+sq(as(X1,Y1,Z1)-as(X2,Y2,Z2))+sq(bs(X1,Y1,Z1)-bs(X2,Y2,Z2)));' | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |