[Dart-dev] [3609] DART/trunk/obs_sequence/merge_obs_seq.f90:
replacing illegal tab chars with whitespace
nancy at ucar.edu
nancy at ucar.edu
Mon Sep 8 15:33:21 MDT 2008
An HTML attachment was scrubbed...
URL: http://mailman.ucar.edu/pipermail/dart-dev/attachments/20080908/da99a392/attachment.html
-------------- next part --------------
Modified: DART/trunk/obs_sequence/merge_obs_seq.f90
===================================================================
--- DART/trunk/obs_sequence/merge_obs_seq.f90 2008-09-08 21:29:26 UTC (rev 3608)
+++ DART/trunk/obs_sequence/merge_obs_seq.f90 2008-09-08 21:33:21 UTC (rev 3609)
@@ -255,11 +255,11 @@
if (first_seq < 0) then
call init_obs_sequence(seq_out, num_copies_out, num_qc_out, size_seq_out)
do j=1, num_copies_out
- meta_data = get_copy_meta_data(seq_in, j)
+ meta_data = get_copy_meta_data(seq_in, j)
call set_copy_meta_data(seq_out, j, meta_data)
enddo
do j=1, num_qc_out
- meta_data = get_qc_meta_data(seq_in, j)
+ meta_data = get_qc_meta_data(seq_in, j)
call set_qc_meta_data(seq_out, j, meta_data)
enddo
first_seq = i
More information about the Dart-dev
mailing list