"fragment"><pre class="comment"> close all; clear all;
 fvcom_mesh = 'skg4.3_grd.dat';
 fvcom_bath = 'skg4.3_dep.dat';
 lon = -122.4721646 ;
 lat = 48.3372476; 
 zeta_min = -3;
 zeta_max = 3;
 nZeta = 30;
 nTheta = 16;
 dry_thresh = 0.1;
 darc = 125;
 Calculate fetch as a function of free surface height (positive up) and orientation 

 function [fetch_struct] = fetch_calc(fvcom_mesh,lon,lat,zeta_min,zeta_max,dzeta,dtheta,dry_thresh) 

 DESCRIPTION:
   Calculate fetch as a function of free surface height (po