% etermines chirality of quasi affine homography (within disk) chirality of quasi affinity +-1 or 0 = undefined chi = sugr_get_chirality_Homography_2D(H,radius) Wolfgang Förstner wfoerstn@uni-bonn.de wf 2/2011
0001 %% etermines chirality of quasi affine homography (within disk) 0002 % chirality of quasi affinity +-1 or 0 = undefined 0003 % 0004 % chi = sugr_get_chirality_Homography_2D(H,radius) 0005 % 0006 % 0007 % Wolfgang Förstner 0008 % wfoerstn@uni-bonn.de 0009 % 0010 % wf 2/2011 0011 0012 function chi = sugr_get_chirality_Homography_2D(H) 0013 0014 if sugr_get_isquasiaffine_Homography_2D(H) 0015 chi = sign(H.H(3,3)); 0016 else 0017 chi = 0; 0018 end