/usr/share/psychtoolbox-3/PsychTests/MonoImageToSRGBTest.m is in psychtoolbox-3-common 3.0.11.20140816.dfsg1-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 | % MonoImageToSRGBTest
%
% Test that our litte routine that converts a monochrome image to a
% color image works about right.
%
% 6/15/11 dhb, ms Wrote it.
%% Clear
clear; close all;
%% Set chromaticity. This
% basically sets the "tint' of
% the produced image.
xy = [0.3 0.35]';
%% Read in a monochrome test image
testImageName = 'konijntjes1024x768gray.jpg';
if (~exist(testImageName,'file'))
error('Someone removed the test image from the Psychtoolbox. Find a new one.');
end
testImage = double(imread(testImageName));
%% Call our routine
rgbImage = MonoImageToSRGB(testImage,xy);
%% Display
figure;
subplot(1,2,1);
imshow(testImage/max(testImage(:)));
subplot(1,2,2);
imshow(rgbImage);
|