function vektorfelt (valg)
% vektorfelt (valg) - kall opp programmet med valg for følgende alternativer

[x,y] = meshgrid(-5:1:5);

switch (valg)
  case 1
    vx = x;
    vy = y;
  case 2
    vx = y;
    vy = x;
  case 3
    vx = - x;
    vy = y;
  case 4
    vx = - y;
    vy = x;
  case 5
    vx = y;
    vy = x.^2;
endswitch

% quiver = (pile)kogger

% Kall opp quiver med skaleringsfaktor for å justere lengden på pilene
% quiver(x,y,vx,vy,1.5)
% eller kall opp quiver uten skaleringsfaktor
quiver(x,y,vx,vy)
axis equal
