function [q,g,h,r]=pdeefxpd(p,e,u,time,bl)
%PDEEFXPD Evaluate a function on edges.

%       A. Nordmark 12-20-94.
%       Copyright (c) 1994-98 by The MathWorks, Inc.
%       $Revision: 1.7 $  $Date: 1997/11/25 17:05:34 $


if pdeisfunc(bl)
  [q,g,h,r]=feval(bl,p,e,u,time);
  return
end

% Return nonsense
q=[];
g=[];
h=[];
r=[];

