sugr_show_Point_2D

% Show information of 2D point on console

 sugr_show_Point_2D(Point_2D, [name])

 * Point_2D = sugr object, structure 
      .h     = spherically normalized homogeneous coordinates
      .Crr   = reduced covariance matrix
      .Jr    = null space of .h'
 * name = Name of object, optional

 Wolfgang Förstner 1/2011
 wfoerstn@uni-bonn.de

 sw 9/2016
 sw 1/2018

 See also sugr_Point_2D

0001 %% Show information of 2D point on console
0002 %
0003 % sugr_show_Point_2D(Point_2D, [name])
0004 %
0005 % * Point_2D = sugr object, structure
0006 %      .h     = spherically normalized homogeneous coordinates
0007 %      .Crr   = reduced covariance matrix
0008 %      .Jr    = null space of .h'
0009 % * name = Name of object, optional
0010 %
0011 % Wolfgang Förstner 1/2011
0012 % wfoerstn@uni-bonn.de
0013 %
0014 % sw 9/2016
0015 % sw 1/2018
0016 %
0017 % See also sugr_Point_2D
0018 
0019 function sugr_show_Point_2D(Point_2D,name)
0020 
0021 if nargin<2
0022     name = 'x';
0023 end
0024 
0025 global type_name
0026 
0027 f    = sugr_get_isfinite_Point_2D(Point_2D);
0028 typ_no   = Point_2D.type;
0029 
0030 if f
0031     fprintf('\n%s: finite %s\n',name,type_name{typ_no})
0032 else
0033     fprintf('\n%s: infinite %s\n',name,type_name{typ_no})
0034 end
0035 
0036 [e,Cee] = sugr_get_Euclidean_Point_2D(Point_2D);
0037 fprintf('\t%s_e =\t%5.3f\t\tCov_ee =\t%5.3f %5.3f\n',name,e(1),Cee(1,1), Cee(1,2))
0038 fprintf('\t\t\t%5.3f\t\t\t\t\t%5.3f %5.3f\n',e(2),Cee(2,1), Cee(2,2))
0039 
0040 h = Point_2D.h;
0041 Chh  = sugr_get_CovM_homogeneous_Vector(Point_2D);
0042 Crr  = Point_2D.Crr;
0043 fprintf('\n\t\t\t%5.3f\t\t\t\t\t%5.3f %5.3f %5.3f\n',h(1),Chh(1,1), Chh(1,2), Chh(1,3))
0044 fprintf('\t%s_h =\t%5.3f\t\tCov_hh =\t%5.3f %5.3f %5.3f\t\tCov_rr =\t%5.3f %5.3f\n',name,h(2),Chh(2,1), Chh(2,2), Chh(2,3), Crr(1,1), Crr(1,2))
0045 fprintf('\t\t\t%5.3f\t\t\t\t\t%5.3f %5.3f %5.3f\t\t\t\t\t%5.3f %5.3f\n',h(3),Chh(3,1), Chh(3,2), Chh(3,3), Crr(2,1), Crr(2,2))
0046 
0047 
0048