回転楕円体の反磁界係数
作者: kegasa さん実行数: 122
※ 本ライブラリは会員の方が作成した作品です。内容について当サイトは一切関知しません。
Demagnetizing factor of ellipsoid
m = a/b;
if(m==1) {m=1.0001;}
L = (1/(m^2-1))*((m/(2*sqrt(m^2-1)))*ln((m+sqrt(m^2-1))/(m-sqrt(m^2-1)))-1);
M = (m/(2*(m^2-1)))*(m - (1/(2*sqrt(m^2-1)))*ln((m+sqrt(m^2-1))/(m-sqrt(m^2-1))));
μeff = 1/(L+(1-L)/μr);
μeffmax = 1/L;
print(a);
print(b);
print(m);
print(L);
print(μr);
print(μeff);
print(μeffmax);
print(M);
if(m==1) {m=1.0001;}
L = (1/(m^2-1))*((m/(2*sqrt(m^2-1)))*ln((m+sqrt(m^2-1))/(m-sqrt(m^2-1)))-1);
M = (m/(2*(m^2-1)))*(m - (1/(2*sqrt(m^2-1)))*ln((m+sqrt(m^2-1))/(m-sqrt(m^2-1))));
μeff = 1/(L+(1-L)/μr);
μeffmax = 1/L;
print(a);
print(b);
print(m);
print(L);
print(μr);
print(μeff);
print(μeffmax);
print(M);
| a | mm |
| b | mm |
| m | |
| Ｌ/(4*pi) | |
| μr | |
| μeff | |
| μeffmax = 1/(Ｌ/(4*pi)) | |
| Ｍ/(4*pi) |
Demagnetizing factor of general ellipsoids
by Osborn
1945
http://www.cmap.polytechnique.fr/~alouges/coursm2/Osborn.pdf
by Osborn
1945
http://www.cmap.polytechnique.fr/~alouges/coursm2/Osborn.pdf
この計算についてお客様の声はまだありません。