/usr/share/psychtoolbox-3/PsychRadiometric/QuantaToEnergy.m is in psychtoolbox-3-common 3.0.14.20170103+git6-g605ff5c.dfsg1-1build1.
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 | function energy = QuantaToEnergy(wls,quanta)
% energy = QuantaToEnergy(wls,quanta)
%
% Convert quantal units (quanta per unit wavelength)
% to energy units (energy or power per unit wavelength).
%
% Constants are set up so that we have energy in joules or
% power in watts.
%
% The routine is set up to convert spectra. These are
% passed as the columns of the matrix quanta. The
% wavelengths corresponding to each row are passed in
% the column vector wls.
%
% 7/29/96 dhb Added comment.
% 8/16/96 dhb, abp Modified interface.
wls = MakeItWls(wls);
h = 6.626e-34;
c = 2.998e8;
[n,m] = size(quanta);
energy = (quanta*h*c) ./ ((1e-9) * wls(:,ones(1,m)));
|