function [A,B,V] = ograph(n,rad,fr)
%
% A = ograph(B,V,rad,fr)
%
% Computes incidence matrix and plots circular graph
% for n vertices
% rad - gives size of circles at nodes and triangle at grounded node
% default is .08
% fr - gives fraction of distance along edge to write amount of current
% default fraction is 4/7
%
% A - incidence matrix for graph
% B - 2 column matrix giving the edges
% the ith row of B says which two nodes are connected by edge i
% V - 2 column matrix giving (x,y) coordinates of nodes to be used
% in a figure. If omitted, no figure is drawn.
%
% See also OEDGE, OGON, NGON, CGRAPH, GRAPH, INCIDENCE, NETWORK,
[B,V] = ogon(n);
if nargin < 2, rad = .08; end
if nargin < 3, fr = 4/7; end
A = graph(B,V,rad,fr);