[Dart-dev] DART/branches Revision: 11084

[dart at ucar.edu]

hendric at ucar.edu
2017-02-09 16:12:10 -0700 (Thu, 09 Feb 2017)
60
fixing error message to be consistant with the subroutine.




Modified: DART/branches/rma_single_file/io/state_space_diag_mod.f90
===================================================================
--- DART/branches/rma_single_file/io/state_space_diag_mod.f90	2017-02-09 22:49:32 UTC (rev 11083)
+++ DART/branches/rma_single_file/io/state_space_diag_mod.f90	2017-02-09 23:12:10 UTC (rev 11084)
@@ -695,7 +695,7 @@
    !#! write(*        ,'(a,"_",a)') trim(varname), trim(cname)
 
    ret = nf90_inq_varid(my_ncid, extraname, var_id)
-   call nc_check(ret, 'aooutput_variable', 'inq_varid '//trim(extraname))
+   call nc_check(ret, 'write_extra_variable', 'inq_varid '//trim(extraname))
 
    ret = nf90_put_var(my_ncid, var_id, model_state(istart:iend), &
                 count=dim_lengths(1:ncount+2), start=start_point(1:ncount+2))