Home

Introduction

Contents

Scripts

FeedBack

Date 08/09/2010
Script S6_2_5.m
Download Script S6_2_5.m
%==============================================
%photons 2
%==============================================
%
%standard constants
c=2.998e008;
h=6.626e-034;
e=1.6e-19;
%power of the sources
P=400;
%wavelengths of the sources
lambdaV=0.4e-06;
lambdaR=0.7e-06;
%constants and preliminary calculi
cost=h*c;
costeV=cost/e;
% num=P*lambda;
numV=P*lambdaV;
numR=P*lambdaR;
% N=num/cost;
%numbers of photons and their difference
NV=P*lambdaV/cost
NR=P*lambdaR/cost
diff=NR-NV
%a sphere of radius r in m and its area
R=2;
rq=R*R;
S=4*pi*rq;
%intensities as number of photons per sec and per square meter
IV=NV/S
IR=NR/S
%intensities as watt/(square meter)
IIV=IV*cost/lambdaV
IIR=IR*cost/lambdaR
%==============================================
%
%==============================================
%==============================================
%Corrigenda
%lambdaR isn't 400 nm but 700 nm (Sec. 6.2.5,
%pag. 253 at the second row of the question of
%the problem "Photons 2")
%==============================================
%==============================================

Top