[Dart-dev] DART/branches Revision: 12878
dart at ucar.edu
dart at ucar.edu
Tue Oct 2 15:05:26 MDT 2018
thoar at ucar.edu
2018-10-02 15:05:26 -0600 (Tue, 02 Oct 2018)
31
Fixing copyright information.
Modified: DART/branches/rma_trunk/developer_tests/mpi_utilities/tests/ftest_sendrecv.f90
===================================================================
--- DART/branches/rma_trunk/developer_tests/mpi_utilities/tests/ftest_sendrecv.f90 2018-10-02 18:43:45 UTC (rev 12877)
+++ DART/branches/rma_trunk/developer_tests/mpi_utilities/tests/ftest_sendrecv.f90 2018-10-02 21:05:26 UTC (rev 12878)
@@ -1,5 +1,5 @@
-! DART software - Copyright 2004 - 2013 UCAR. This open source software is
-! provided by UCAR, "as is", without charge, subject to all terms of use at
+! 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
!
! $Id$
Modified: DART/branches/rma_trunk/developer_tests/obs_sequence/obs_rwtest.f90
===================================================================
--- DART/branches/rma_trunk/developer_tests/obs_sequence/obs_rwtest.f90 2018-10-02 18:43:45 UTC (rev 12877)
+++ DART/branches/rma_trunk/developer_tests/obs_sequence/obs_rwtest.f90 2018-10-02 21:05:26 UTC (rev 12878)
@@ -1,5 +1,5 @@
-! DART software - Copyright 2004 - 2013 UCAR. This open source software is
-! provided by UCAR, "as is", without charge, subject to all terms of use at
+! 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
!
! $Id$
@@ -43,10 +43,10 @@
implicit none
! version controlled file description for error handling, do not edit
-character(len=256), parameter :: source = &
+character(len=*), parameter :: source = &
"$URL$"
-character(len=32 ), parameter :: revision = "$Revision$"
-character(len=128), parameter :: revdate = "$Date$"
+character(len=*), parameter :: revision = "$Revision$"
+character(len=*), parameter :: revdate = "$Date$"
type(obs_sequence_type) :: seq_in
logical :: is_this_last
Modified: DART/branches/rma_trunk/models/clm/clm_to_dart.f90
===================================================================
--- DART/branches/rma_trunk/models/clm/clm_to_dart.f90 2018-10-02 18:43:45 UTC (rev 12877)
+++ DART/branches/rma_trunk/models/clm/clm_to_dart.f90 2018-10-02 21:05:26 UTC (rev 12878)
@@ -1,8 +1,8 @@
-! DART software - Copyright 2004 - 2013 UCAR. This open source software is
-! provided by UCAR, "as is", without charge, subject to all terms of use at
+! 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
!
-! $Id$
+! DART $Id$
program clm_to_dart
@@ -31,16 +31,16 @@
implicit none
! version controlled file description for error handling, do not edit
-character(len=256), parameter :: source = &
+character(len=*), parameter :: source = &
"$URL$"
-character(len=32 ), parameter :: revision = "$Revision$"
-character(len=128), parameter :: revdate = "$Date$"
+character(len=*), parameter :: revision = "$Revision$"
+character(len=*), parameter :: revdate = "$Date$"
!-----------------------------------------------------------------------
! namelist parameters with default values.
!-----------------------------------------------------------------------
-character(len=512) :: clm_to_dart_output_file = 'clm_restart.nc'
+character(len=256) :: clm_to_dart_output_file = 'clm_restart.nc'
namelist /clm_to_dart_nml/ clm_to_dart_output_file
Modified: DART/branches/rma_trunk/models/clm/dart_to_clm.f90
===================================================================
--- DART/branches/rma_trunk/models/clm/dart_to_clm.f90 2018-10-02 18:43:45 UTC (rev 12877)
+++ DART/branches/rma_trunk/models/clm/dart_to_clm.f90 2018-10-02 21:05:26 UTC (rev 12878)
@@ -1,5 +1,5 @@
-! DART software - Copyright 2004 - 2013 UCAR. This open source software is
-! provided by UCAR, "as is", without charge, subject to all terms of use at
+! 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
!
! $Id$
@@ -10,16 +10,7 @@
! purpose: interface between DART and the CLM model
!
! method: Read DART state vector and overwrite values in a CLM restart file.
-! If the DART state vector has an 'advance_to_time' present,
-! it is read ... but nothing happens with it at this time.
-! DART is NEVER expected to advance CLM.
!
-! The dart_to_clm_nml namelist setting for advance_time_present
-! determines whether or not the input file has an 'advance_to_time'.
-! Typically, only temporary files like 'assim_model_state_ic' have
More information about the Dart-dev
mailing list