ECC-13: partially reverted

2015-01-08 13:24:05 +00:00 · 2015-01-08 13:24:05 +00:00 · 03ed90914e
parent 6f0b96dd7a
commit 03ed90914e
33 changed files with 33 additions and 33 deletions
--- a/examples/F90/clone.f90
+++ b/examples/F90/clone.f90
@ -14,7 +14,7 @@
 !
 !
 program clone
-  use eccodes
+  use grib_api
  implicit none
  integer                                       :: err,i,iret
  integer                                       :: nx, ny
--- a/examples/F90/copy_message.f90
+++ b/examples/F90/copy_message.f90
@ -13,7 +13,7 @@
 !
 !
 program copy
-  use eccodes
+  use grib_api
  implicit none
  integer                            :: err, centre
  integer(kind=kindOfSize)           :: byte_size
--- a/examples/F90/copy_namespace.f90
+++ b/examples/F90/copy_namespace.f90
@ -12,7 +12,7 @@
 !               
 !
 program copy_namespace
-  use eccodes
+  use grib_api
  implicit none  
  integer  :: file1, file2, file3
  integer  :: igrib1,igrib2,igrib3
--- a/examples/F90/count_messages.f90
+++ b/examples/F90/count_messages.f90
@ -10,7 +10,7 @@
 !
 !
 program get
-  use eccodes
+  use grib_api
  implicit none

  integer                            ::  ifile
--- a/examples/F90/get.f90
+++ b/examples/F90/get.f90
@ -11,7 +11,7 @@
 !
 !
 program get
-  use eccodes
+  use grib_api
  implicit none
  
  integer                            ::  ifile
--- a/examples/F90/get_data.f90
+++ b/examples/F90/get_data.f90
@ -12,7 +12,7 @@
 !
 !
 program get_data
-use eccodes
+use grib_api
 implicit none
  integer            :: ifile
  integer            :: iret,i
--- a/examples/F90/get_fortran.f90
+++ b/examples/F90/get_fortran.f90
@ -6,7 +6,7 @@
 !
 !
 program get
-use eccodes
+use grib_api
 implicit none
 
  integer                                         ::  ifile
--- a/examples/F90/get_pl.f90
+++ b/examples/F90/get_pl.f90
@ -12,7 +12,7 @@
 !
 !
 program get_pl
-  use eccodes
+  use grib_api
  implicit none
  integer                         :: infile
  integer                         :: igrib
--- a/examples/F90/get_pv.f90
+++ b/examples/F90/get_pv.f90
@ -13,7 +13,7 @@
 !
 !
 program get_pv
-  use eccodes
+  use grib_api
  implicit none
  integer                         :: infile
  integer                         :: igrib
--- a/examples/F90/get_set_uuid.f90
+++ b/examples/F90/get_set_uuid.f90
@ -12,7 +12,7 @@
 !  Original authors: Harald Anlauf, Doerte Liermann (DWD), Luis Kornblueh (MPIfM).
 !
 program get_set_uuid
-  use eccodes
+  use grib_api
  implicit none
  integer              :: infile, outfile
  integer              :: igrib, ogrib
--- a/examples/F90/index.f90
+++ b/examples/F90/index.f90
@ -13,7 +13,7 @@
 !
 !
 program index
-  use eccodes
+  use grib_api
  implicit none
  
  integer              :: iret
--- a/examples/F90/iterator_fortran.f90
+++ b/examples/F90/iterator_fortran.f90
@ -8,7 +8,7 @@
 !
 !
 program iterator
-use eccodes
+use grib_api
 implicit none
  integer            :: ifile
  integer            :: iret,iter
--- a/examples/F90/keys_iterator.f90
+++ b/examples/F90/keys_iterator.f90
@ -14,7 +14,7 @@
 !
 !
 program keys_iterator
-  use eccodes
+  use grib_api
  implicit none
  character(len=20)  :: name_space
  integer            :: kiter,ifile,igrib,iret
--- a/examples/F90/keys_iterator_fortran.f90
+++ b/examples/F90/keys_iterator_fortran.f90
@ -14,7 +14,7 @@
 !
 !
 program keys_iterator
-  use eccodes
+  use grib_api
  implicit none
  integer            :: kiter,ifile,igrib,iret
  character(len=256) :: key
--- a/examples/F90/multi.f90
+++ b/examples/F90/multi.f90
@ -16,7 +16,7 @@
 !
 !
 program multi
-  use eccodes
+  use grib_api
  implicit none
  
  integer              :: iret
--- a/examples/F90/multi_fortran.f90
+++ b/examples/F90/multi_fortran.f90
@ -14,7 +14,7 @@
 !
 !
 program multi
-  use eccodes
+  use grib_api
  implicit none
  
  integer              :: iret
--- a/examples/F90/multi_write.f90
+++ b/examples/F90/multi_write.f90
@ -15,7 +15,7 @@
 !
 !
 program multi_write
-  use eccodes
+  use grib_api
  implicit none
  integer                            :: infile,outfile
  integer                            :: in_gribid,iret
--- a/examples/F90/nearest.f90
+++ b/examples/F90/nearest.f90
@ -13,7 +13,7 @@
 !
 !
 program find
-  use eccodes
+  use grib_api
  implicit none
  integer                                      :: npoints
  integer                                      :: infile
--- a/examples/F90/new_from_file.f90
+++ b/examples/F90/new_from_file.f90
@ -11,7 +11,7 @@
 !
 !
 program new_from_file
-use eccodes
+use grib_api
  implicit none
  integer            :: ifile
  integer            :: iret
--- a/examples/F90/precision.f90
+++ b/examples/F90/precision.f90
@ -13,7 +13,7 @@
 !
 !
 program precision
-  use eccodes
+  use grib_api
  implicit none
  integer(kind = 4)                             :: size1
  integer                                       :: infile,outfile
--- a/examples/F90/precision_fortran.f90
+++ b/examples/F90/precision_fortran.f90
@ -11,7 +11,7 @@
 !
 !
 program precision
-  use eccodes
+  use grib_api
  implicit none
  integer(kind = 4)                             :: size
  integer                                       :: infile,outfile
--- a/examples/F90/print_data.f90
+++ b/examples/F90/print_data.f90
@ -12,7 +12,7 @@
 !
 !
 program print_data
-use eccodes
+use grib_api
 implicit none
 integer            :: ifile
 integer            :: iret
--- a/examples/F90/print_data_fortran.f90
+++ b/examples/F90/print_data_fortran.f90
@ -13,7 +13,7 @@
 !
 !
 program print_data_fortran
-use eccodes
+use grib_api
 implicit none
 integer            :: ifile
 integer            :: iret
--- a/examples/F90/read_from_file.f90
+++ b/examples/F90/read_from_file.f90
@ -10,7 +10,7 @@
 ! See GRIB-292
 !
 program read_from_file
-use eccodes
+use grib_api
  implicit none
  character(len=32) :: input_grib_file
  integer,dimension(26) :: message_lengths  ! expected message lengths
--- a/examples/F90/read_message.f90
+++ b/examples/F90/read_message.f90
@ -10,7 +10,7 @@
 ! Description: how to get values using keys.
 !
 program read_message
-use eccodes
+use grib_api
 implicit none
  integer                      ::  ifile,ofile
  integer                      ::  iret,igrib
--- a/examples/F90/samples.f90
+++ b/examples/F90/samples.f90
@ -11,7 +11,7 @@
 !               
 !
 program sample
-  use eccodes
+  use grib_api
  implicit none  
  integer  :: err
  integer  :: outfile, infile, datafile
--- a/examples/F90/set.f90
+++ b/examples/F90/set.f90
@ -13,7 +13,7 @@
 !
 !
 program set
-  use eccodes
+  use grib_api
  implicit none
  integer(kind = 4)    :: centre, date1
  integer              :: infile,outfile
--- a/examples/F90/set_bitmap.f90
+++ b/examples/F90/set_bitmap.f90
@ -13,7 +13,7 @@
 !
 !
 program set_bitmap
-  use eccodes
+  use grib_api
  implicit none
  integer                         :: infile,outfile
  integer                         :: igrib, iret
--- a/examples/F90/set_fortran.f90
+++ b/examples/F90/set_fortran.f90
@ -10,7 +10,7 @@
 !
 !
 program set
-  use eccodes
+  use grib_api
  implicit none
  integer              :: err
  integer(kind = 4)    :: centre
--- a/examples/F90/set_gvc.f90
+++ b/examples/F90/set_gvc.f90
@ -13,7 +13,7 @@
 !
 !
 program set
-  use eccodes
+  use grib_api
  implicit none
  integer(kind = 4)    :: NV
  integer              :: infile,outfile
--- a/examples/F90/set_missing.f90
+++ b/examples/F90/set_missing.f90
@ -13,7 +13,7 @@
 !
 !
 program set
-  use eccodes
+  use grib_api
  implicit none
  integer              :: infile,outfile
  integer              :: igrib, Ni, is_missing
--- a/examples/F90/set_missing_fortran.f90
+++ b/examples/F90/set_missing_fortran.f90
@ -10,7 +10,7 @@
 !
 !
 program set
-  use eccodes
+  use grib_api
  implicit none
  integer              :: err
  integer              :: len
--- a/examples/F90/set_pv.f90
+++ b/examples/F90/set_pv.f90
@ -13,7 +13,7 @@
 !
 !
 program set_pv
-  use eccodes
+  use grib_api
  implicit none
  integer                         :: numberOfLevels
  integer                         :: numberOfCoefficients