function res = bc(YL,YR)

global n eta lambda kappa

   res = [YL(1,1)               % v(0) = 0
          YR(1,1) - YL(1,2)     % Continuity of v(x) at x=1
          YR(2,1) - YL(2,2)     % Continuity of C(x) at x=1
          YR(2,end) - 1];       % C(lambda) = 1
end                             % End nested function bc