%
%                           GaussMono.m
%
% This routine finds f_L, and f_H for the Gaussian
% monocycle for a range of tau (pulse duration control
% parameter).
%

function fL = gaussmono

tau = [.1:.02:2]; % nanoseconds

fL = NA (size (tau));
bc = pi/3;
for k = 1:length (tau)
  b = bc * tau(k) * tau(k);
  fp = 1 / sqrt (b);
  fL(k) = fminbnd (@ (x) abs (10*b*x*x*exp(1-b*x*x) - 1), 0, fp, b);
endfor