!
! $Header$
!
      real tau_min_u,tau_max_u
      real tau_min_v,tau_max_v
      real tau_min_T,tau_max_T
      real tau_min_q,tau_max_q
      real tau_min_P,tau_max_P
      real aire_min,aire_max


      logical guide_u,guide_v,guide_T,guide_Q,guide_P,guide_modele
      logical guide_BL,guide_hr,gamma4

      real lat_min_guide,lat_max_guide


c     data tau_min_u,tau_max_u/0.02,10./
c     data tau_min_v,tau_max_v/0.02,10./
c     data tau_min_T,tau_max_T/0.02,10./
c     data tau_min_q,tau_max_q/0.02,10./
c     data tau_min_P,tau_max_P/0.02,10./
c
      LOGICAL ncep,ini_anal,ok_invertp
      integer online

c     data online/1/
c     data ncep,ini_anal/.false.,.true./

      common/comguide/
     s tau_min_u,tau_max_u,
     s tau_min_v,tau_max_v,
     s tau_min_T,tau_max_T,
     s tau_min_q,tau_max_q,
     s tau_min_P,tau_max_P,
     s aire_min,aire_max,
     s lat_min_guide,lat_max_guide,
     s ncep,ini_anal,
     s online,
     s guide_u,guide_v,guide_T,guide_Q,guide_P,
     s guide_modele,ok_invertp,
     s guide_hr,guide_BL,gamma4