function z=opdl(nam)
 
% The function OPDL opens and reads 1-D binary file in 'double 64' format.
%
% Example-
% 	x=opdl('x')
%
% Calling sequence-
% z=opdl(nam)
%
% Input-
%	nam	- string, that represents the name of the file
% Output-
%	z	- 1-D data record in memory

%----- Open the file
fd=fopen(nam,'rb');

%----- Read the record in memory
z=fread(fd,'float64');

%----- Close the file
fclose(fd);
return