Set PCD bit 2 (NRT/Offline) when reading UCAR atmPhs files [1 h]

[Ian Culverwell]

https://trac.romsaf.org/ropp/changeset/5427/ropp_src/branches/dev/Share/dmi_trunk_9.0/ropp_io/ropp/ropp_io.f90 https://trac.romsaf.org/ropp/changeset/5427/ropp_src/branches/dev/Share/dmi_trunk_9.0/ropp_io/ropp/ropp_io_read.f90 https://trac.romsaf.org/ropp/changeset/5427/ropp_src/branches/dev/Share/dmi_trunk_9.0/ropp_io/ropp/ropp_io_read_ncdf_get.f90 https://trac.romsaf.org/ropp/changeset/5427/ropp_src/branches/dev/Share/dmi_trunk_9.0/ropp_io/tools/eum2bufr_ec.f90 https://trac.romsaf.org/ropp/changeset/5427/ropp_src/branches/dev/Share/dmi_trunk_9.0/ropp_io/tools/eum2ropp.f90 https://trac.romsaf.org/ropp/changeset/5427/ropp_src/branches/dev/Share/dmi_trunk_9.0/ropp_io/tools/ropp2bufr_ec.f90 (similar/consistent updates to ropp2bufr_mo.f90 has not been made since https://trac.romsaf.org/ropp/changeset/3430)

Original changesets:

Set PCD bit 2 (NRT/Offline) when reading UCAR atmPhs files: https://trac.romsaf.org/ropp/changeset/5067/ropp_src/branches/dev/Share/dmi_trunk_8.1/ropp_io/ropp/ropp_io_read_ncdf_get.f90

[Ian Culverwell]

Fairy nuff. Changes the output from

  data:
    pcd = 4 ;

to

  data:
    pcd = 6 ;

when atmPhs_C004.2011.001.22.12.G28_0001.0001_nc is passed through ucar2ropp. Since

  INTEGER, PARAMETER :: PCD_offline      =  1  ! NRT / offline product

in ropp_io/ropp/ropp_io_types.f90, the increase in PCD by 2¹ = 2 is what is expected. No other changes.

Change committed at r6238. (Also take the opportunity to USE PCD_summary, PCD_phase and PCD_rising as well as PCD_offline in subroutine ropp_io_read_ucardata_atmPhs in ropp_io/ropp/ropp_io_read_ncdf_get.f90. For some reason these parameters were absent. I don't know if this caused any problems before because (for example) they were assumed to be zero, or whether they were inherited from somewhere earlier in the code. Anyway, they should definitely be there.

Closing ticket.