summaryrefslogtreecommitdiff
path: root/2258/CH1/EX1.16/1_16.sce
blob: b12fc9eac93d2dd5a3ac2bc6188b58b2e8b4fe74 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
clc();
clear;
// To calculate the probability of finding the particle
n=1;   //lowest state
L=10;    //width in armstrong
L=L*10^-10;    //width in m
x=L/2;
delta_x=1;    //interval in armstrong
delta_x=delta_x*10^-10;    //interval in m
psi1=(sqrt(2/L))*sin(%pi*x/L);
A=psi1^2;
P=A*delta_x;
printf("probability of finding the particle is %f",P);