[Dart-dev] DART/branches Revision: 11303

[dart at ucar.edu]

thoar at ucar.edu
2017-03-13 15:11:10 -0600 (Mon, 13 Mar 2017)
117
Removing one ancient matlab script of no value, putting some helper
functions in the private directory for clarity.




Deleted: DART/branches/rma_trunk/diagnostics/matlab/ens_plot.m
===================================================================
--- DART/branches/rma_trunk/diagnostics/matlab/ens_plot.m	2017-03-13 21:03:06 UTC (rev 11302)
+++ DART/branches/rma_trunk/diagnostics/matlab/ens_plot.m	2017-03-13 21:11:10 UTC (rev 11303)
@@ -1,44 +0,0 @@
-%% Do some demo plots
-
-%% DART software - Copyright UCAR. This open source software is provided
-% by UCAR, "as is", without charge, subject to all terms of use at
-% http://www.image.ucar.edu/DAReS/DART/DART_download
-%
-% DART $Id$
-
-% Do ensemble scatter as function of time for a given variable
-figure(1);
-hold on;
-ens_mean = sum(posterior_state(:, :, 1), 2) / copies_per_time;
-for i = 1:copies_per_time,
-   plot(posterior_state(:, i, 1));
-end
-plot(ens_mean, 'r');
-plot(true_state(:, 1, 1), 'g');
-
-
-
-% Do a plot of the ensemble of states at a given time
-figure(2);
-hold on;
-ens_mean = sum(posterior_state(10, :, :), 2) / copies_per_time;
-plot(location, squeeze(true_state(10, 1, :)), 'g');
-
-% Plot the ensemble mean, too
-plot(location, squeeze(ens_mean), 'r');
-
-for i = 1:copies_per_time,
-   plot(location, squeeze(posterior_state(10, i, :)));
-end
-xlabel('Location');
-legend('Ensemble mean', 'Truth', 'Ensembles');
-title 'Spatial representation of state at fixed time';
-
-
-
-% Look at posterior, prior and truth in mean
-
-% <next few lines under version control, do not edit>
-% $URL$
-% $Revision$
-% $Date$

Deleted: DART/branches/rma_trunk/diagnostics/matlab/get_varnames.m
===================================================================
--- DART/branches/rma_trunk/diagnostics/matlab/get_varnames.m	2017-03-13 21:03:06 UTC (rev 11302)
+++ DART/branches/rma_trunk/diagnostics/matlab/get_varnames.m	2017-03-13 21:11:10 UTC (rev 11303)
@@ -1,68 +0,0 @@
-function bob = get_varnames(fname)
-%% get_varnames returns NON-coordinate variables.
-%
-% the result is a cell array of strings ... must use {} notation to address elements.
-%
-% EXAMPLE:
-% fname    = 'obs_seq.final.nc';
-% varnames = get_varnames(fname);
-% varnames{:}
-% nvars = length(varnames);
-% disp(sprintf('first atmospheric variable (of %d) is %s',nvars,varnames{1}))
-
-%% DART software - Copyright UCAR. This open source software is provided
-% by UCAR, "as is", without charge, subject to all terms of use at
-% http://www.image.ucar.edu/DAReS/DART/DART_download
-%
-% DART $Id$
-
-fileinfo    = ncinfo(fname);
-Nvarnames   = length(fileinfo.Variables);
-
-inds = [];
-
-for i = 1:Nvarnames
-    
-    varname    = fileinfo.Variables(i).Name;
-    isatmosvar = 1;
-    
-    % Reject the obvious coordinate variables and some that are
-    % specific to DART
-    rank = length(fileinfo.Variables(i).Size);
-
-    if (rank == 1)
-        dimname = fileinfo.Variables(i).Dimensions(1).Name;
-    else
-        dimname = [];
-    end
-    
-    if (strcmp( varname ,            dimname)), isatmosvar = 0; end
-    if (strcmp( varname ,         'inputnml')), isatmosvar = 0; end
-    if (strcmp( varname ,      'time_bounds')), isatmosvar = 0; end
-    if (strcmp( varname ,     'region_names')), isatmosvar = 0; end
-    if (strcmp( varname ,     'CopyMetaData')), isatmosvar = 0; end
-    if (strcmp( varname ,   'MemberMetadata')), isatmosvar = 0; end
-    if (strcmp( varname , 'ObservationTypes')), isatmosvar = 0; end
-