summaryrefslogtreecommitdiff
path: root/3523/CH2/EX2.8.11/Ex2_11.sce
blob: da2d6bdb25e79530fb2271960b8372c9c7234b43 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
//Example 11// Ch 2
clear all
clc
close

phi1=0;
phi3=10;

phir=[phi1;phi3];
sl=[1.25 -0.014;-0.014 0.8381]; //elements of global stiffness matrix
sr=-[-0.7786 -0.4571;-0.4571 -0.3667];//elements of global stiffness matrix

phil=inv(sl)*sr*phir

printf('value of potentials at the nodes are %f \n',phil)