File: PowerToTrolands.m

package info (click to toggle)
psychtoolbox-3 3.0.9%2Bsvn2579.dfsg1-1
  • links: PTS, VCS
  • area: main
  • in suites: wheezy
  • size: 63,408 kB
  • sloc: ansic: 73,310; cpp: 11,139; objc: 3,129; sh: 1,669; python: 382; php: 272; makefile: 172; java: 113
file content (14 lines) | stat: -rwxr-xr-x 459 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
function trolands = PowerToTrolands(wl,power,S_vLambda,vLambda)
% trolands = PowerToTrolands(wl,power,S_vLambda,vLambda)
%
% Convert from power (in watts/deg-2) to trolands for a
% monochromatic light.  Wavelength specified in nm,
% vLambda should be CIE photopic luminosity function.
%
% See W&S, p. 103.
%
% 8/15/96  dhb, abp  Wrote the header.

wls_vLambda = MakeItWls(S_vLambda);
index = find(wl == wls_vLambda);
trolands = power*vLambda(index)*2.242e12;