function []=prob_7_1_29()
%
% Written by:
% -- 
% John L. Weatherwax                2006-11-21
% 
% email: wax@alum.mit.edu
% 
% Please send comments and especially bug reports to the
% above email address.
% 
%-----
  
clc; close all; 

addpath( '../Tcodes' ); 

H = [ -6 -6 -7 0 7 6 6 -3 -3 0 0 -6 ;
      -7 2 1 8 1 2 -7 -7 -2 -2 -7 -7 ];

figure; 
x = H(1,:).'; y = H(2,:).';
plot( x, y, 'o' ); hold on; 
plot( x, y, '-' ); grid on; 
xlim( [ -10 10 ] ); ylim( [ -10 10 ] ); axis( 'square' );
title( 'the original house' ); 

A = [ 0 1 ; 1 0 ]; 
figure; plot2d(A' * H); 
figure; plot2d(A' * A* H); 

A = [ cos(deg2rad(35)) -sin(deg2rad(35)); sin(deg2rad(35)) cos(deg2rad(35)) ];
figure; plot2d(A' * H); 
figure; plot2d(A' * A* H);

close all; 

A = [ 0.7 0.3; 0.3 0.7 ];
figure; plot2d(A' * H); 
figure; plot2d(A' * A* H);

A = [ 0.7 0.2; -0.3 0.9 ];
figure; plot2d(A' * H); 
figure; plot2d(A' * A* H);