%RANK CDF PROGRAM
%Developed by Larry S. Liebovitch
%Florida Atlantic University
%777 Glades Road, Boca Raton, FL 33431
%liebovit@fau.edu, 561.297.2239
%These programs have been tested and found to be accurate on a number of 
%different data sets, we do not guarantee that they will be accurate on 
%all data sets. The user assumes any risk involved in the use these 
%programs.

%MATLAB (R2008A, 7.6.324) PROGRAM: pdfcum
%Produces a Cumulative Distribution Function (CDF) of the Prob. (>x) %
%
clear
format long
filename=input('Type file name ','s');
fid=fopen(char(filename));
data = fscanf (fid, '%g',[inf]);
size12=size(data);
ptotal=size12(1)
ntotal=ptotal;

x=(ntotal-1:-1:0)/ntotal;
y=sort(data);

output(1,:)=y;
output(2,:)=x;
toutput=output'

inputfilename=filename
outputfilename=strrep(inputfilename,'.','RANKCDF.')
Datafid = fopen(outputfilename,'w');
fprintf(Datafid,'%16.8g \t %16.8g  \n',output);
fclose(Datafid);