module mod_observations
   use mod_states
   type observations
      real d                ! measurement value
      real var              ! measurement variance
      integer k             ! depth position (grid point)
      character(len=3) ch   ! Here (N  ,P  ,H  )
      logical action        ! True/false (used/not used)
   end type observations
end module mod_observations