[Dart-dev] DART/branches Revision: 13072

dart at ucar.edu dart at ucar.edu
Mon Mar 25 15:56:04 MDT 2019


nancy at ucar.edu
2019-03-25 15:56:04 -0600 (Mon, 25 Mar 2019)
102
made it error out immediately with a message
to contact us. it wouldn't take long to make
this work.




Modified: DART/branches/recam/assimilation_code/programs/obs_utils/obs_data_denial.f90
===================================================================
--- DART/branches/recam/assimilation_code/programs/obs_utils/obs_data_denial.f90	2019-03-25 21:50:58 UTC (rev 13071)
+++ DART/branches/recam/assimilation_code/programs/obs_utils/obs_data_denial.f90	2019-03-25 21:56:04 UTC (rev 13072)
@@ -304,6 +304,9 @@
 call register_module(source,revision,revdate)
 call static_init_obs_sequence()
 
+call error_handler(E_ERR, 'obs_data_denial', 'this program is not finished yet', &
+     source, revision, revdate, text2='contact dart at ucar.edu for more info')
+
 end subroutine setup
 
 


More information about the Dart-dev mailing list