function output=creat_cont_orth_card_model

% this function returns a what remains of a continuous models after being
% orthogonalized from the cardinal model

clear all;

a=creatcontmodel;

b=creat_u_d_model;
c=creat_l_r_model;

d=b+c;

a=zscore(a)
d=zscore(d)

e1(:,1)=(a(:))
e1(:,2)=(d(:))
f1=spm_orth(e1)
g1=reshape(f1(:,2),16,16)

e2(:,2)=(a(:))
e2(:,1)=(d(:))
f2=spm_orth(e2)
g2=reshape(f2(:,2),16,16)

% figure;
% subplot(1,3,1)
% imagesc(d)
% title('1')
% 
% subplot(1,3,2)
% imagesc(a)
% title('2')
% 
% subplot(1,3,3)
% imagesc(g2)
% title('output')

output=g2

end