Ignore:
Timestamp:
Jul 27, 2018 1:36:03 PM (6 years ago)
Author:
suehring
Message:

New Inifor features: grid stretching, improved command-interface, support start dates in different formats in both YYYYMMDD and YYYYMMDDHH, Ability to manually control input file prefixes (--radiation-prefix, --soil-preifx, --flow-prefix, --soilmoisture-prefix) for compatiblity with DWD forcast naming scheme; GNU-style short and long option; Prepared output of large-scale forcing profiles (no computation yet); Added preprocessor flag netcdf4 to switch output format between netCDF 3 and 4; Updated netCDF variable names and attributes to comply with PIDS v1.9; Inifor bugfixes: Improved compatibility with older Intel Intel compilers by avoiding implicit array allocation; Added origin_lon/_lat values and correct reference time in dynamic driver global attributes; corresponding PALM changes: adjustments to revised Inifor; variables names in dynamic driver adjusted; enable geostrophic forcing also in offline nested mode; variable names in LES-LES and COSMO offline nesting changed; lateral boundary flags for nesting, in- and outflow conditions renamed

File:
1 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SOURCE/pmc_parent_mod.f90

    r3049 r3182  
    203203    INTEGER(iwp) ::  istat     !<
    204204
    205 
    206205    DO  i = 1, SIZE( pmc_parent_for_child )-1
    207206
     
    219218       CALL MPI_COMM_REMOTE_SIZE( children(childid)%inter_comm,                &
    220219                                  children(childid)%inter_npes, istat )
    221 
    222220!
    223221!--    Intra communicator is used for MPI_GET
     
    228226
    229227       ALLOCATE( children(childid)%pes(children(childid)%inter_npes))
    230 
    231228!
    232229!--    Allocate array of TYPE arraydef for all child PEs to store information
     
    865862    DO
    866863       CALL pmc_bcast( myname%couple_index, 0, comm=m_to_child_comm(childid) )
     864
    867865       IF ( myname%couple_index == -1 )  EXIT
     866
    868867       CALL pmc_bcast( myname%parentdesc,   0, comm=m_to_child_comm(childid) )
    869868       CALL pmc_bcast( myname%nameonparent, 0, comm=m_to_child_comm(childid) )
Note: See TracChangeset for help on using the changeset viewer.