%EFD2 BLATT 6 AUFGABE 2
function aufgabe2

%gegebene Parameter und einfache Berechnungen
Az=0.05;
deg=-30;
rho=999.975;
omega=7.29e-5;
f=2*omega*sind(deg);
H=200;

dpx=0;
dpy=-0.01;

%zu a)
display('zu a)')

display('Richtung des geostophen Wassertransports')
ug=-1/(f*rho)*dpy;
Mgx=rho*H*ug
vg=0;
Mgy=rho*H*f*vg
display('also Richtung: Westen.')

display('Betrag des geostophen Wassertransports')
Mg=sqrt(Mgx^2+Mgy^2)

display('Richtung des Wassertransports in folge von Reibung')
Mbx=-ug*rho*sqrt(Az/(2*abs(f)))
Mby=ug*rho*sqrt(Az/(2*abs(f)))
display('also Richtung: Süd-Ost.')

display('Betrag des Wassertransports in folge von Reibung')
Mb=sqrt(Mbx^2+Mby^2)


display('zu b)')

display('Energiedissipation:')
J=rho*ug^2*sqrt(Az*abs(f)/2)
end

