function whatcdf

%--------------------------------------------------------------------
%     Copyright (C) J. V. Mansbridge, CSIRO, january 24 1992
% CHANGE   1.1 92/01/30
%
% DESCRIPTION:
% whatcdf lists all of the netcdf files in the current directory but without
% their .cdf suffix.  Compressed files are listed also.
% 
% INPUT:
% none
%
% OUTPUT:
% messages to the user's terminal
%
% EXAMPLE:
% Simply type whatcdf at the matlab prompt.
%
% CALLER:   general purpose
% CALLEE:   Unix ls, sed
%
% AUTHOR:   J. V. Mansbridge, CSIRO
%               modified for DOS by Marinna Martini
%---------------------------------------------------------------------

% @(#)whatcdf.m   1.1   92/01/30
% 
%--------------------------------------------------------------------

disp(' ')
disp('-----  CDF files  -----')
dir *.cdf
%!ls -C *.cdf | sed 's/\.cdf/    /g'
%disp(' ')
%disp('-----  compressed CDF files  -----')
%!ls -C *.cdf.Z | sed 's/\.cdf\.Z/      /g'
%disp(' ')