summaryrefslogtreecommitdiff
path: root/3020/CH9/EX9.1/ex9_1.sce
blob: ebfc47ad67f4787a4ed3ad664656e874f966e929 (plain)
1
2
3
4
5
6
clc;
clear all;
deltas = 10e8; // Difference between principal stress in newton per square meters
c = 1e-12; // The stress optic coefficient in squared meters per newton
N = c*deltas; 
disp('',N,'The difference between the refractive indices along with the principal stresses is')