PRO i2b,nA,lambda,b,db
;
; This procedure accepts an array of 5 picoammeter readings (suitably
; corrected and averaged) and returns three arrays: the standard
; wavelengths used for the calibration, the corresponding PLBS
; brightnesses (in kR/A), and the brightness uncertainties, assuming
; an uncertainty of 0.001 nA in each photodiode current measurement.
;
lambda=[558.3,630.64,694.09,740.05,795.36] ; measured filter cw (nm)
Rlambda=[0.319,0.390,0.445,0.480,0.518] ; photodiode A responsivities
tlambda=[0.619,0.628,0.589,0.895,0.818] ; filter peak transmissions
dlambda=[8.15,5.58,1.00,7.89,2.80] ; filter bandwidths (nm)
;
b=0.2651*na*lambda/(Rlambda*tlambda*dlambda)
db=0.2651*REPLICATE(0.001,5)*lambda/(Rlambda*tlambda*dlambda)
lambda=10.*lambda
RETURN
END