blob: 9db4b56ecb58e0ebdd8c362447b10daec23c73a7 (
plain)
1
2
3
4
5
6
7
8
9
|
// Scilab Code Ex19.1: Page-959 (2011)
clc; clear;
T_c = 6.2; // Critical temperature of lead in superconducting state, K
T = 4; // Temperature at which critical field of lead is to be found out, K
H_c0 = 0.064; // Critical field for lead at 0 K, MA/m
H_cT = H_c0*(1-(T/T_c)^2); // Critical field for lead at 4 K, MA/m
printf("\nThe critical field for lead at 4 K = %5.3f MA/m", H_cT);
// Result
// The critical field for lead at 4 K = 0.037 MA/m
|
