[Dart-dev] DART/branches Revision: 11094

dart at ucar.edu dart at ucar.edu
Fri Feb 10 14:38:56 MST 2017


hendric at ucar.edu
2017-02-10 14:38:54 -0700 (Fri, 10 Feb 2017)
47
fixing print statement to match new namelist.




Modified: DART/branches/rma_single_file/io/io_filenames_mod.f90
===================================================================
--- DART/branches/rma_single_file/io/io_filenames_mod.f90	2017-02-10 20:56:03 UTC (rev 11093)
+++ DART/branches/rma_single_file/io/io_filenames_mod.f90	2017-02-10 21:38:54 UTC (rev 11094)
@@ -372,16 +372,15 @@
 
   if (file_info%root_name == 'null') then
      write(msgstring,*) 'Unable to construct file names.', &
-                        ' No root_name or restart_file_list'
+                        ' No root_name or input_state_file_list'
      call error_handler(E_ERR,'set_member_file_metadata', &
                  msgstring, source, revision, revdate)
   endif
 
   ! Construct file names
-  write(msgstring,*) 'no restart_file_list for root "'//trim(file_info%root_name), &
-                     '" provided using default names'
+  write(msgstring,*) 'no input_state_file_list for root "'//trim(file_info%root_name)//'"'
   call error_handler(E_MSG,'set_member_file_metadata', &
-                     msgstring, source, revision, revdate)
+                     msgstring, source, revision, revdate, text2='using default names')
   
   stage_name = file_info%root_name
   if (file_info%single_file) then


More information about the Dart-dev mailing list