da_tools1.f90

1 module da_tools1
2    
3    !---------------------------------------------------------------------------
4    ! Purpose: Contains general tools.
5    !---------------------------------------------------------------------------
6       
7    use da_control, only : unit_used,use_radiance, stderr, oi_use, unit_end, &
8       unit_start
9    use da_define_structures, only: ob_type, y_type
10    use da_reporting, only : da_error
11 
12    implicit none
13 
14 contains
15 
16 #include "da_get_unit.inc"
17 #include "da_free_unit.inc"
18 #include "da_oi.inc"
19    
20 end module da_tools1
21