Overleg:Shallow water equations

Uit EurosWiki
Naar navigatie springen Naar zoeken springen

  • W = Water
  • H = Hoogte, Waterstand
  • B = Bodem of Diepte
  • u = snelheid in de Noord-Zuid richting
  • v = snelheid in de Oost-West richting
  • X,Y = midden van een rekencel
  • x,Y = onderkant van een rekencel
  • X,y = linkerkant van een rekencel

Hoofdletters is het midden van een cel, een kleine letter betekend dat er een halve cel wordt verschoven. Op deze manier zijn snelheden niet in het midden van een cel definieert. Dit heet een staggered grid.

∂WX,Y∂t⋅DX⋅DYX=ux,Y⋅Wx,Y*DYx−ux+1,Y⋅Wx+1,Y⋅DYx+1+vX,y*WX,y*DX−vX,y+1*WX,y+1*DX


∂ux,Y∂t⋅DX⋅DYx⋅WxY=impulsnormaal+impulstangentieel+zwaartekracht+kromming+coriolis+getijkracht+frictie

Fout bij het parsen (onbekende functie "\codt"): {\displaystyle impuls_{normaal}=\frac{1}{2} \codt ({W_{x-1,Y} \cdot u_{x-1,Y}^2 \cdot DY_{x-1} -W_{x+1,Y} \cdot u_{x+1,Y}^2 \cdot DY_{x+1}}) }

impulstangentieel=Wx,y⋅vx,y⋅ux,y⋅DX−Wx,y+1⋅vx,y+1⋅ux,y+1⋅DX

zwaartekracht=12⋅g⋅(HX−1,Y−HX,Y)⋅DYX⋅Wx,Y

Fout bij het parsen (syntactische fout): {\displaystyle  ????kromming=-\frac{u[x][y]}{R}_{aarde}} \cdot DY_X \cdot DX \cdot v_{x,Y}*sin(\theta_x)}???? }

coriolis=−2⋅Ω⋅vx,Y⋅sin(θx)⋅Wx,Y⋅DX⋅DYx

getijkracht=Fgetij,x(x,Y)⋅Wx,Y⋅DX⋅DYx

frictie=−ux,Y⋅0.01⋅DX⋅DYx



∂vx,Y∂t⋅DX⋅DYX⋅WXy=impulsnormaal+impulstangentieel+zwaartekracht+kromming+coriolis+getijkracht+frictie

Fout bij het parsen (onbekende functie "\codt"): {\displaystyle impuls_{normaal}=\frac{1}{2} \codt ({W_{X,y-1} \cdot v_{X,y-1}^2 \cdot DX -W_{X,y+1} \cdot v_{X,y+1}^2 \cdot DX) }

impulstangentieel=Wx,y⋅ux,y⋅vx,y⋅DYx−Wx+1,y⋅ux+1,y⋅vx+1,y⋅DYx+1

zwaartekracht=12⋅g⋅(HX,Y−HX,Y−1)⋅DX⋅WX,Y

Fout bij het parsen (syntactische fout): {\displaystyle  ????kromming=-\frac{u[x][y]}{R}_{aarde}} \cdot DY_X \cdot DX \cdot v_{x,Y}*sin(\theta_x)}???? }

coriolis=−2⋅Ω⋅uX,y⋅sin(θX)⋅WX,y⋅DYX⋅DX

getijkracht=Fgetij,y(X,y)⋅WX,y⋅DYX⋅DX

frictie=−vX,y⋅0.01⋅DYX⋅DX


dwdt[x][y]=u[x][y]*uW[x][y]*dyo[x]−u[x+1][y]*uW[x+1][y]*dyo[x+1]+(v[x][y]*vW[x][y]−v[x][y+1]*vW[x][y+1])*DX;W[x][y]+=dwdt[x][y]*DT/DX/dym[x];dudt[x][y]=(uW[x−1][y]*u[x−1][y]*u[x−1][y]*dyo[x−1]−uW[x+1][y]*u[x+1][y]*u[x+1][y]*dyo[x+1])/2.0+//impulstransport.5*g*(H[x−1][y]−H[x][y])*dyo[x]*uW[x][y]+//potentieleenergie(LOW[x][y]*(v[x][y]+v[x−1][y])*(u[x][y]+u[x][y−1])−ROW[x][y]*(v[x][y+1]+v[x−1][y+1])*(u[x][y+1]+u[x][y]))/4.0*DX+//tangentieelimpulstransport−u[x][y]/R*dyo[x]*DX*vopu[x][y]*sino[x]+//curvature−2*omega*vopu[x][y]*sino[x]*uW[x][y]*DX*dyo[x]+//corioliskrachtuGM[x][y]*uW[x][y]*DX*dyo[x]+//maangetijkracht−u[x][y]*0.01*DX*dyo[x];//frictiedvdt[x][y]=(vW[x][y−1]*v[x][y−1]*v[x][y−1]−vW[x][y+1]*v[x][y+1]*v[x][y+1])/2.0*DX+.5*g*(H[x][y−1]−H[x][y])*vW[x][y]*DX+(LOW[x][y]*(u[x][y]+u[x][y−1])*(v[x][y]+v[x−1][y])*dyo[x]−LBW[x][y]*(u[x+1][y]+u[x+1][y−1])*(v[x+1][y]+v[x][y])*dyo[x+1])/4.0+uopv[x][y]/R*dym[x]*DX*uopv[x][y]*sinm[x]+2*omega*uopv[x][y]*sinm[x]*vW[x][y]*DX*dym[x]+vGM[x][y]*vW[x][y]*DX*dym[x]+−v[x][y]*0.01*DX*dym[x];dudt[x][y]/=uW[x][y]*DX*dyo[x];dvdt[x][y]/=vW[x][y]*DX*dym[x];