% Igor Yanovsky
% Teaching Assistant
% Math 151B
% 05/23/07
% Driver routine that calls Gram-Schmidt routine gsqr()

clear all

A = [1 1 0; 1 0 1; 0 1 1]
[Q,R] = gsqr(A)


clear all