Demonstrates RefineXAxisIntercept

%--------------------------------------------------------------------------
%   Copyright (c) 2018 Princeton Satellite Systems, Inc.
%   All rights reserved.
%--------------------------------------------------------------------------
%   Since 2018.1
%--------------------------------------------------------------------------

family      ='f20pRef.mat';
s           = load(family);
y           = s.d.initialState;
t0          = 0;
tF          = s.d.period;
tol         = 0.001;
mu          = (Constant('mu')+Constant('mu Moon'))/(Constant('mu')+Constant('mu sun')+Constant('mu Moon'));
RefineXAxisIntercept(y,t0,tF,tol,mu)




%--------------------------------------