export_LADCP.m
changeset 2 06bf500b8e22
parent 0 40938dd7a1f1
--- a/export_LADCP.m
+++ b/export_LADCP.m
@@ -1,9 +1,9 @@
 %======================================================================
-%                    E X P O R T _ L A D C P 
+%                    E X P O R T _ L A D C P . M 
 %                    doc: Tue Sep 16 12:04:42 2008
-%                    dlm: Tue Sep 16 12:18:32 2008
+%                    dlm: Fri Nov 13 13:16:26 2009
 %                    (c) 2008 A.M. Thurnherr
-%                    uE-Info: 30 56 NIL 0 0 72 2 2 4 NIL ofnI
+%                    uE-Info: 33 30 NIL 0 0 72 2 2 4 NIL ofnI
 %======================================================================
 %
 % Synopsis: export list of LADCP stations to ANTS
@@ -19,6 +19,7 @@
 
 % HISTORY:
 %	Sep 16, 2008: - created
+%	Nov 13, 2009: - adapted to new LDEO_LADCP2ANTS
 
 function [] = export_LADCP(stns)
 
@@ -31,7 +32,7 @@
 		elseif isfield(p,'magdev')	% IfM processed
 			IfM_LADCP2ANTS(dr,p,bn);
 		else						% LDEO processed
-			LDEO_LADCP2ANTS(dr,p,bn);
+			LDEO_LADCP2ANTS(dr,f,p,bn);
 		end
 	else
 		disp(sprintf('skipping station %d',s));