gribmod.f

Go to the documentation of this file.

 
 
 
 
      module grib_mod
 
      character(len=12) :: G2_VERSION="g2lib-3.1.0"
 
      type gribfield
          integer :: version,discipline
          integer,pointer,dimension(:) :: idsect         => null ()
          integer :: idsectlen
          character(len=1),pointer,dimension(:) :: local => null ()
          integer :: locallen
          integer :: ifldnum
          integer :: griddef,ngrdpts
          integer :: numoct_opt,interp_opt,num_opt
          integer,pointer,dimension(:) :: list_opt       => null ()
          integer :: igdtnum,igdtlen
          integer,pointer,dimension(:) :: igdtmpl        => null ()
          integer :: ipdtnum,ipdtlen
          integer,pointer,dimension(:) :: ipdtmpl        => null ()
          integer :: num_coord
          real,pointer,dimension(:) :: coord_list        => null ()
          integer :: ndpts,idrtnum,idrtlen
          integer,pointer,dimension(:) :: idrtmpl        => null ()
          logical :: unpacked
          logical :: expanded
          integer :: ibmap
          logical*1,pointer,dimension(:) :: bmap         => null ()
          real,pointer,dimension(:) :: fld               => null ()
      end type gribfield
 
      end module