pro xform_colors,colin,xformsav,colout
; this routine transforms the basel synthetic color array colin according
; to the set of linear transformation coefficients found in file xformsav,
; containing data written by m67_color_fit,
; and returns the transformed colors in colout.
; Requires 9 colors: u-g, g-r, r-i, i-z, z-J, J-H, H-K, g-Gred, g-D51

restore,xformsav
xx=colin(1,*)-0.5
colout=colin
for i=0,8 do begin
  colout(i,*)=colout(i,*)+aa(i)+bb(i)*xx
endfor

end