%function phase_plot(filename)

%%This file will attempt to open up see.out and phase.out and plot the
%%phase screen

%Ax=zeros(256,256);
%Ay=zeros(256,256);

see_file=fopen('see_A.out');                   %Declare File handle pointing to filename
[seeing,count]=fread(see_file,'float');        %Take in values

for i=1,256,
    for j=1,256,
        Ax(i,j)=seeing(j+i*(j-1));
        Ay(i,j)=seeing(j+i*(j-1)+5);
    end
end

fclose(see_file);

