[Dart-dev] [3603] DART/trunk/models/MITgcm_ocean/ocean_obs_mod.f90:
missed one debug print statement
nancy at ucar.edu
nancy at ucar.edu
Fri Sep 5 17:01:31 MDT 2008
An HTML attachment was scrubbed...
URL: http://mailman.ucar.edu/pipermail/dart-dev/attachments/20080905/dfeea5a7/attachment.html
-------------- next part --------------
Modified: DART/trunk/models/MITgcm_ocean/ocean_obs_mod.f90
===================================================================
--- DART/trunk/models/MITgcm_ocean/ocean_obs_mod.f90 2008-09-05 22:55:31 UTC (rev 3602)
+++ DART/trunk/models/MITgcm_ocean/ocean_obs_mod.f90 2008-09-05 23:01:31 UTC (rev 3603)
@@ -169,8 +169,8 @@
if(obstype < 1) then
print*, 'unknown observation type [',trim(obs_kind_name),'] ... skipping ...'
cycle obsloop
- else
- print*,trim(obs_kind_name),' is ',obstype
+ !else
+ ! print*,trim(obs_kind_name),' is ',obstype
endif
obs_num = obs_num + 1
@@ -242,6 +242,7 @@
call print_time(time,' last time in sequence is ')
call print_date(time,' last date in sequence is ')
endif
+print*, ''
end function real_obs_sequence
More information about the Dart-dev
mailing list