openfile.m

该代码为图像融合的vc源程序,对学习图像融合有很重要的价值

function file_ID = openfile(filename,access,format)
%===========================================================================
%                   Matt Bowers - University of Bath
%
%                        Copyright (c) 1996
%===========================================================================
%
% Open file with error checking
%
% Arguments:
%   filename
%   access      string sets permissions - see MATLAB 'fopen' help
%
% Returns:
%   file_ID     file identifier
%
%===========================================================================

if nargin == 2
  [file_ID, message] = fopen(filename,access);
else
  [file_ID, message] = fopen(filename,access,format);
end

if file_ID==-1
    error (message) % Report errors
else
%    disp (['File: ' filename ' opened.'])
end