/[MITgcm]/MITgcm_contrib/gmaze_pv/C_compute_potential_vorticity.m
ViewVC logotype

Diff of /MITgcm_contrib/gmaze_pv/C_compute_potential_vorticity.m

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.4 by gmaze, Tue Jan 30 22:10:10 2007 UTC revision 1.5 by gmaze, Thu Feb 1 17:02:02 2007 UTC
# Line 29  Line 29 
29  % gmaze@mit.edu  % gmaze@mit.edu
30  %  %
31        
32  function [] = C_compute_potential_vorticity(snapshot,varargin)  function varargout = C_compute_potential_vorticity(snapshot,varargin)
33    
34    
35  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
# Line 403  nc{ncid}.uniquename    = ncchar(uniquena Line 403  nc{ncid}.uniquename    = ncchar(uniquena
403  nc{ncid}(:,:,:)        = PV;  nc{ncid}(:,:,:)        = PV;
404    
405  nc=close(nc);  nc=close(nc);
406    close(ncOx);
407    close(ncOy);
408    close(ncOz);
409    close(ncST);
410    
411  % Outputs:  % Outputs:
412  OUT = struct('value',PV,'dpt',PV_dpt,'lat',PV_lat,'lon',PV_lon);  OUT = struct('PV',PV,'dpt',PV_dpt,'lat',PV_lat,'lon',PV_lon);
413  switch nargout  switch nargout
414   case 1   case 1
415    varargout(1) = OUT;    varargout(1) = {OUT};
416  end  end

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

  ViewVC Help
Powered by ViewVC 1.1.22