%    Copyright (C) 1995-1998
%    Massachussetts Institute of Technology
%    Sea Grant AUV Laboratory
%    $Id: rb2gr.m,v 1.2 1998/10/21 21:51:49 bamoran Exp $	

function ep = rb2gr( r, b, sp )

if nargin < 3, sp = [0 0]; end

b = b*pi/180;
ep = sp + r*[cos(b) sin(b)];
