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

Diff of /MITgcm_contrib/gmaze_pv/compute_QEk.m

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

revision 1.1 by gmaze, Mon Jul 10 15:09:01 2006 UTC revision 1.2 by gmaze, Thu Feb 1 17:02:02 2007 UTC
# Line 1  Line 1 
1  %  %
2  % [] = compute_QEk(SNAPSHOT)  % [QEk] = compute_QEk(SNAPSHOT)
3  %  %
4  % Here we compute the lateral heat flux induced by Ekman currents  % Here we compute the lateral heat flux induced by Ekman currents
5  % from JFz, the PV flux induced by frictional forces:  % from JFz, the PV flux induced by frictional forces:
# Line 29  Line 29 
29  % 06/27/06  % 06/27/06
30  % gmaze@mit.edu  % gmaze@mit.edu
31    
32  function QEk = compute_QEk(snapshot)  function varargout = compute_QEk(snapshot)
33    
34  global sla toshow  global sla toshow
35  global netcdf_suff netcdf_domain  global netcdf_suff netcdf_domain
# Line 151  nc{ncid}(:,:,:)        = QEk; Line 151  nc{ncid}(:,:,:)        = QEk;
151  nc=close(nc);  nc=close(nc);
152    
153    
154    
155    % Output:
156    output = struct('QEk',QEk,'lat',JFzlat,'lon',JFzlon);
157    switch nargout
158     case 1
159      varargout(1) = {output};
160    end
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22