1 files changed, 14 insertions, 0 deletions
diff --git a/135/CH13/EX13.6/EX6.sce b/135/CH13/EX13.6/EX6.sce
new file mode 100755
index 000000000..323e91cb6
--- /dev/null
+++ b/135/CH13/EX13.6/EX6.sce
@@ -0,0 +1,14 @@
+// Example 13.6: Thermal resistance, Power rating at 70°C, Junction temperature at 100 mW
+clc, clear
+TAo=25; // in °C
+PDo=200; // in mili-watts
+Tj_max=150; // Maximum junction temperature in °C
+T=70; // in °C
+P=100; // in mili-watts
+TA=50; // Ambient temperature in °C
+theta=(Tj_max-TAo)/PDo; // Thermal resistance in °C per mili-watts
+PR=(Tj_max-T)/theta; // Power rating at 70 °C in mili-watts
+Tj=TA+theta*P; // Junction temperature at 100 mW in °C
+disp(theta,"Thermal resistance (°C/mW) =");
+disp(PR,"Power rating at 70 °C (mW) =");
+disp(Tj,"Junction temperature at 100 mW (°C) =");
+\ No newline at end of file