[Dart-dev] DART/branches Revision: 12562

[dart at ucar.edu]

nancy at ucar.edu
2018-04-26 11:37:33 -0600 (Thu, 26 Apr 2018)
40
can't have return in the main program.




Modified: DART/branches/rma_fill_inf/assimilation_code/programs/fill_inflation_restart/fill_inflation_restart.f90
===================================================================
--- DART/branches/rma_fill_inf/assimilation_code/programs/fill_inflation_restart/fill_inflation_restart.f90	2018-04-26 16:55:53 UTC (rev 12561)
+++ DART/branches/rma_fill_inf/assimilation_code/programs/fill_inflation_restart/fill_inflation_restart.f90	2018-04-26 17:37:33 UTC (rev 12562)
@@ -216,7 +216,6 @@
 
 if(single_file) then
    call nc_insert_variable('filter_input.nc', varname='prior_inf_mean', copynum=1)
-   return
 else