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