Commit 4e501d65 authored by Pierre Cazenave's avatar Pierre Cazenave

Remove email address

parent 638c678e
function show_sigma(meshfile,bathfile,sigmafile,varargin) function show_sigma(meshfile,bathfile,sigmafile,varargin)
% plot a sigma distribution along a user-selected line % plot a sigma distribution along a user-selected line
% %
% function [] = show_sigma(meshfile,bathfile,sigmafile) % show_sigma(meshfile,bathfile,sigmafile)
% %
% DESCRIPTION: % DESCRIPTION:
% plot a sigma distribution along a user-selected line % plot a sigma distribution along a user-selected line
...@@ -20,7 +20,7 @@ function show_sigma(meshfile,bathfile,sigmafile,varargin) ...@@ -20,7 +20,7 @@ function show_sigma(meshfile,bathfile,sigmafile,varargin)
% %
% Author(s): % Author(s):
% Geoff Cowles (University of Massachusetts Dartmouth) % Geoff Cowles (University of Massachusetts Dartmouth)
% Pierre Cazenave (Plymouth Marine Laboratory, pica@pml.ac.uk) % Pierre Cazenave (Plymouth Marine Laboratory)
% %
% Revision history % Revision history
% 2013-01-08 Added more resilient reading of the sigma coordinates file % 2013-01-08 Added more resilient reading of the sigma coordinates file
...@@ -151,7 +151,7 @@ ds = (xt(2)-xt(1))/(npts-1); ...@@ -151,7 +151,7 @@ ds = (xt(2)-xt(1))/(npts-1);
xline = xt(1):ds:xt(2); xline = xt(1):ds:xt(2);
ds = (yt(2)-yt(1))/(npts-1); ds = (yt(2)-yt(1))/(npts-1);
yline = yt(1):ds:yt(2); yline = yt(1):ds:yt(2);
plot(xline, yline, 'r+') plot(xline, yline, 'w+')
sline = zeros(1, npts); sline = zeros(1, npts);
for i=2:npts for i=2:npts
sline(i) = sline(i-1) + sqrt((xline(i)-xline(i-1))^2 + (yline(i)-yline(i-1))^2); sline(i) = sline(i-1) + sqrt((xline(i)-xline(i-1))^2 + (yline(i)-yline(i-1))^2);
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment