clc; clear all; h=1/2;b2=1/2;l=1;
c=@(the,phi1) abs((cos(pi*h/l*cos(the).*sin(phi1))-cos(pi*h/l))./ \ (sqrt(1-cos(the).^2.*sin(phi1).^2))) \ *2.*abs(sin(pi*2*b2/l*cos(phi1)));
ezsurf(@(the,phi1) c(the,phi1).*cos(the).*sin(phi1),\ @(the,phi1) c(the,phi1).*sin(the).*sin(phi1),\ @(the,phi1) c(the,phi1).*cos(phi1), [-pi, pi, -pi/2, pi/2] ,30);
axis equal; #print("horDipolOPG.png", "-dpng");
:)
...verbindet mich mit
Inhalt:
--------------------------------------------------------------------------------------------------------------------- sorry - Your requested page is not on this server.
If it is a page/file in
To search on this page go to search
--------------------------------------------------------------------------------------------------------------------- Entschuldigung - Die abgefragte Seite ist nicht auf diesem Server vorhanden.
Wenn es sich um eine Seite/Datei in
Um auf dieser Seite zu suchen suchen
---------------------------------------------------------------------------------------------------------------------
Gruss Werner Dahn
Am 19.11.2017 um 18:20 schrieb aioe usenet:
nochmal.
Danke. Siueht gut aus.
:)
ElectronDepot website is not affiliated with any of the manufacturers or service providers discussed here. All logos and trade names are the property of their respective owners.