%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%                                                             %
%%  Definition av randvillkorsfunktionen gamma i randvillkoren %
%%                                                             %
%%     -a*Du/Dn = gamma*(u - g_D) + g_N.                       %
%%                                                             %
%%  Variabler:  rand_nr         heltal                         %
%%              x, y            reella tal                     %
%%              permeabilitet   reellt tal                     % 
%%                                                             %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

function permeabilitet = gamma_2D(x,y,rand_nr)

% Stationärt testproblem:

% if rand_nr == 1
%    permeabilitet = 10^7; % gamma(x,y) på randsegment 1.
% elseif rand_nr == 2
%    permeabilitet = 10^7; % gamma(x,y) på randsegment 2.
% elseif rand_nr == 3
%    permeabilitet = 10/21; % gamma(x,y) på randsegment 3.
% elseif rand_nr == 4
%    permeabilitet = 2/3; % gamma(x,y) på randsegment 4.
% end

% Tidsberoende testproblem:

permeabilitet = 10^7; % gamma(x,y) på samtliga randsegment.
