From 0039f2f6ffa408d95c2cb5f8e6f17e393445aa32 Mon Sep 17 00:00:00 2001
From: Jacques Grelet <jacques.grelet@ird.fr>
Date: Tue, 8 Jan 2008 15:01:28 +0000
Subject: [PATCH] utilise les conventions NetCDF V1.4

---
 tsg_util/tsg_initialisation.m | 153 ++++++++++++++++++++++++++++++++--
 1 file changed, 148 insertions(+), 5 deletions(-)

diff --git a/tsg_util/tsg_initialisation.m b/tsg_util/tsg_initialisation.m
index c276343..712136e 100644
--- a/tsg_util/tsg_initialisation.m
+++ b/tsg_util/tsg_initialisation.m
@@ -10,9 +10,24 @@ function tsg_initialisation(hTsgGUI, hQcCmenu)
 % $Id$
 %
 
-% *************************************************************************
-%              Constants for the quality control procedure
+% -------------------------------------------------------------------------
+%              Constants for NetCDF DATA FORMAT TSG
+% -------------------------------------------------------------------------
+% netcdf file version
+FORMAT_VERSION      = '1.4';
+
+% date of reference for julian days, is 1st january 1950
+REFERENCE_DATE_TIME = '19500101000000';
+
+% -------------------------------------------------------------------------
+%              Levitus field for climatology
+% -------------------------------------------------------------------------
+tsg.levitus.data = [];
+tsg.levitus.type = [];
 
+% -------------------------------------------------------------------------
+%              Constants for the quality control procedure
+% -------------------------------------------------------------------------
 % Quality Code and color
 
 qc.Color.NO_CONTROL    = 'k';
@@ -37,10 +52,9 @@ set( hQcCmenu, 'UserData', quality );
 % --------------------------------------------
 setappdata( hTsgGUI, 'qcColor', qc);
 
-
-% *************************************************************************
+% -------------------------------------------------------------------------
 %              Constants for the Correction procedure
-
+% -------------------------------------------------------------------------
 % Smoothing of tsg time series over 1 hour interval
 % 1 hour interval expressed in MATLAB serial Number
 % -------------------------------------------------
@@ -62,4 +76,133 @@ cst.COR_TIME_WINDOWS = 10;
 % --------------------------------------------------
 setappdata( hTsgGUI, 'constante', cst);
 
+% store tsg NetCDF data structure
+% -------------------------------
+% get actual date
+date = datestr(now,30);
+
+% dimensions
+tsg.DAYD                  = 0;
+tsg.DAYD_WS               = 0;
+tsg.DAYD_EXT              = 0;
+
+% globals attributes
+tsg.PLATFORM_NAME         =  '';
+tsg.SHIP_CALL_SIGN        =  '';
+tsg.SHIP_MMSI             =  '';
+tsg.TSG_TYPE              =  '';
+tsg.TSG_NUMBER            =  '';
+tsg.TINT_TYPE             =  '';
+tsg.TINT_NUMBER           =  '';
+tsg.DATA_TYPE             =  '';
+tsg.DATA_MODE             =  '';
+tsg.SAMPLING_PERIOD       =  '';
+tsg.PROCESSING_STATUS     =  '';
+tsg.DATE_START            =  '';
+tsg.DATE_END              =  '';
+tsg.SOUTH_LATX            =  '';
+tsg.NORTH_LATX            =  '';
+tsg.WEST_LONX             =  '';
+tsg.EAST_LONX             =  '';
+tsg.FORMAT_VERSION        =  FORMAT_VERSION;
+tsg.DATE_CREATION         =  [date(1:8) date(10:15)];;
+tsg.DATE_UPDATE           =  tsg.DATE_CREATION; 
+tsg.DATA_RESTRICTIONS     =  '';
+tsg.CITATION              =  '';
+tsg.COMMENT               =  '';
+tsg.PROJECT_NAME          =  '';
+tsg.PI_NAME               =  '';
+tsg.DATA_CENTRE           =  '';
+tsg.DATA_ACQUISITION      =  '';
+tsg.PROCESSING_CENTRE     =  '';
+tsg.PROCESSING_STATES     =  '';
+
+% variables describing TSG installation (Salinity, SSPS et Jacket
+% Temperature SSJT)
+tsg.SSPS_DEPH             = 0;
+tsg.SSPS_DEPH_MIN         = 0;
+tsg.SSPS_DEPH_MAX         = 0;
+tsg.CNDC_CALCOEF          = [99999 99999 99999 99999 99999];
+tsg.CNDC_LINCOEF          = [99999 99999];
+tsg.SSJT_CALCOEF          = [99999 99999 99999 99999 99999];
+tsg.SSJT_LINCOEF          = [99999 99999];
+
+% variables describing Temperature sensor at intake (SSJT) installation
+tsg.SSTP_DEPH             = 0;
+tsg.SSTP_DEPH_MIN         = 0;
+tsg.SSTP_DEPH_MAX         = 0;
+tsg.SSTP_CALCOEF          = [99999 99999 99999 99999 99999];
+tsg.SSTP_LINCOEF          = [99999 99999];
+
+% Coordinates
+tsg.DATE                  = [];
+tsg.DAYD                  = [];
+tsg.LATX                  = [];
+tsg.LONX                  = [];
+tsg.POSITION_QC           = [];
+tsg.SPDC                  = [];
+tsg.REFERENCE_DATE_TIME   = REFERENCE_DATE_TIME;
+
+% variables
+tsg.PRES                  = [];
+tsg.SSJT                  = [];
+tsg.SSJT_STD              = [];
+tsg.SSJT_CAL              = [];
+tsg.SSJT_ADJUSTED         = [];
+tsg.SSJT_ADJUSTED_ERROR   = [];
+tsg.SSJT_ADJUSTED_QC      = [];
+tsg.SSJT_ADJUSTED_HIST    = [];  
+tsg.CNDC                  = [];
+tsg.CNDC_STD              = [];
+tsg.CNDC_CAL              = [];
+
+%% a verifier !!!!! 
+tsg.SSTP                  = [];
+tsg.SSTP_QC               = [];
+tsg.SSTP_CAL              = [];
+tsg.SSTP_ADJUSTED         = [];
+tsg.SSTP_ADJUSTED_ERROR   = [];
+tsg.SSTP_ADJUSTED_QC      = [];
+tsg.SSTP_ADJUSTED_HIST    = [];  
+
+tsg.SSPS                  = [];
+tsg.SSPS_QC               = [];
+tsg.SSPS_CAL              = [];
+tsg.SSPS_ADJUSTED         = [];
+tsg.SSPS_ADJUSTED_ERROR   = [];
+tsg.SSPS_ADJUSTED_QC      = [];
+tsg.SSPS_ADJUSTED_HIST    = [];  
+
+% Water Sample Coordinates
+tsg.DATE_WS               = [];
+tsg.DAYD_WS               = [];
+tsg.LATX_WS               = [];
+tsg.LONX_WS               = [];
+
+% Water Sample variables
+tsg.SSPS_WS               = []; 
+tsg.SSPS_WS               = []; 
+tsg.SSPS_WS_QC            = []; 
+%tsg.SSPS_WS_DIF           = [];
+%tsg.SSPS_WS_SMOOTH        = [];  % a verifier
+tsg.SSPS_WS_ANALDATE      = []; 
+tsg.SSPS_WS_BOTTLE        = []; 
+
+% External data coordinates
+tsg.DATE_EXT              = [];
+tsg.DAYD_EXT              = [];
+tsg.LATX_EXT              = [];
+tsg.LONX_EXT              = [];
+
+% External data variables
+tsg.SSTP_EXT              = []; 
+tsg.SSTP_EXT_QC           = []; 
+tsg.SSTP_EXT_TYPE         = [];
+tsg.SSPS_EXT              = []; 
+tsg.SSPS_EXT_QC           = []; 
+tsg.SSPS_EXT_TYPE         = [];
+
+% Save structure tsg
+setappdata( hTsgGUI, 'tsg_data', tsg);
+
 end
-- 
GitLab