Changeset e199b83 in flexpart.git


Ignore:
Timestamp:
Jun 26, 2019, 2:24:27 PM (5 years ago)
Author:
Ignacio Pisso <ip@…>
Branches:
master, 10.4.1_pesei, GFS_025, bugfixes+enhancements, dev, release-10, release-10.4.1, scaling-bug
Children:
8057778
Parents:
ce8480d
Message:

avoid warning message reading winds for lnsp (ParamID=152)

Location:
src
Files:
3 edited

Legend:

Unmodified
Added
Removed

  • src/readwind_ecmwf.f90

    r61e07ba re199b83  
    246246         (typSurf.eq.1)) then ! LSM
    247247      isec1(6)=172         ! indicatorOfParameter
     248    elseif (parNum.eq.152) then
     249      isec1(6)=152         ! avoid warning for lnsp   
    248250    else
    249251      print*,'***WARNING: undefined GRiB2 message found!',discipl, &

  • src/readwind_ecmwf_mpi.f90

    r20963b1 re199b83  
    256256         (typSurf.eq.1)) then ! LSM
    257257      isec1(6)=172         ! indicatorOfParameter
     258    elseif (parNum.eq.152) then
     259      isec1(6)=152         ! avoid warning for lnsp         
    258260    else
    259261      print*,'***WARNING: undefined GRiB2 message found!',discipl, &

  • src/readwind_nests.f90

    rdb712a8 re199b83  
    222222       (typSurf.eq.1)) then ! LSM
    223223    isec1(6)=172         ! indicatorOfParameter
     224  elseif (parNum.eq.152) then
     225      isec1(6)=152         ! avoid warning for lnsp       
    224226  else
    225227    print*,'***WARNING: undefined GRiB2 message found!',discipl, &
Note: See TracChangeset for help on using the changeset viewer.
hosted by ZAMG