Changeset 258 for palm


Ignore:
Timestamp:
Mar 13, 2009 12:36:03 PM (16 years ago)
Author:
heinze
Message:

Output of messages replaced by message handling routine.

Location:
palm/trunk
Files:
13 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/DOC/tec/message_identifiers

    r257 r258  
    169169                       and data_output_user exceeds the limit of 100
    170170    PA0103            output of "..." requires constant_diffusion = .FALSE.
    171     PA0104           output of "..." requires a "particles_par"-NAMELIST
    172                       in the parameter file (PARIN)
    173     PA0105           output of "..." requires humidity = .TRUE.
    174     PA0106           output of "" requires cloud_physics = .TRUE. or
    175                       cloud_droplets = .TRUE.'
    176     PA0107           output of "..." requires cloud_droplets = .TRUE.
    177     PA0108           output of "..." requires cloud_physics = .TRUE.
    178     PA0109           output of "..." requires ocean = .TRUE.
    179     PA0110           output of "..." requires passive_scalar = .TRUE.
    180     PA0111           illegal value for data_output: "..." only
    181                       2d-horizontal cross sections are allowed for this value
    182     PA0112           output of "..." requires precipitation = .TRUE.
    183     PA0113           temporal averaging of precipitation amount "..."
    184                       is not possible'       
    185     PA0114           illegal value for data_output or data_output_user = "..."
    186     PA0115           illegal value for data_output = "..."
    187     PA0116           z_max_do2d = ', z_max_do2d must be >= ... (zu(nzb+1))
    188                       and <= ... (zu(nzt))
    189     PA0117           do3d_compress = .TRUE. not allowed on host ""
    190     PA0118           illegal precision: do3d_comp_prec ( ...) = "..."
    191     PA0119           unknown variable "..." given for do3d_comp_prec(...)   
    192     PA0120           unknown value for data_output_format "..."
    193     PA0121           km_constant = ... < 0.0
    194     PA0122           prandtl_number = ... < 0.0
    195     PA0123           prandtl_layer is not allowed with fixed value of km
    196     PA0124           outflow_damping width out of range
    197     PA0125           rif_min = ...  must be less than rif_max = ...
    198     PA0126           disturbance_level_b = ... must be >= ... (zu(3))
    199     PA0127           disturbance_level_b = ... must be <= ... (zu(nzt-2))
    200     PA0128           disturbance_level_t = ... must be <= ... (zu(nzt-2))
    201     PA0129           disturbance_level_t = ... must
    202                       be >= disturbance_level_b = ...
    203     PA0130           disturbance_level_ind_t =...  must
    204                       be >= disturbance_level_b = ...
    205     PA0131           inflow_disturbance_begin out of range
    206     PA0132           inflow_disturbance_end out of range
    207     PA0133           turbulent_inflow = .T. requires a Dirichlet
    208                       condition at the inflow boundary
    209     PA0134           illegal value for recycling_width: ...
    210     PA0135           unknown random generator: random_generator = "..."
    211     PA0136           damp_level_1d = ...  must be > 0.0 and < ... (zu(nzt+1))
    212     PA0137           mixing_length_1d = "..." is unknown
    213     PA0138           dissipation_1d = "..." is unknown
    214     PA0139           termination_time_needed = ...  must be > 30.0 on host ..."
    215     PA0140           termination_time_needed = ... should be >= 300.0
    216                       on host "..."     
    217     PA0141           coupling requires PALM to be called with
    218                       ''mrun -K parallel''
    219     PA0142           absolute temperature < 0.0 at zu(...) = ...
    220     PA0143           k=... j=... i=... ql_c=... part(...)%wf=... 
    221                       delta_r=...
    222     PA0144           #1 k=... j=... i=... e_s=...  e_a=... t_int=...
    223                       d_radius=... delta_r=... particle_radius=... 
    224     PA0145           collision_efficiency out of range: ...
    225     PA0146           maximum_number_of_particles needs to be increased
    226                       but this is not allowed with NetCDF output switched on
    227     PA0147           maximum_number_of_tails needs to be increased
    228                       but this is not allowed with NetCDF output switched on
    229     PA0148           particle too fast.  n = ...
    230     PA0149           particle out of range: i=... j=... k=...
    231                       nxl=... nxr=... nys=... nyn=... nzb=... nzt=...
    232     PA0150           Both dp_external and conserve_volume_flow are .TRUE.
    233                       but one of them must be .FALSE.
    234     PA0151           dp_level_b = ... is out of range
    235     PA0152           dp_external is .TRUE. but dpdxy is zero, i.e. the external
    236                       pressure gradient will not be applied
    237     PA0153           dpdxy is nonzero but dp_external is .FALSE., i.e. the
    238                       external pressure gradient will not be applied
    239     PA0154           unknown conserve_volume_flow_mode: ...
    240     PA0155           noncyclic boundary conditions require
    241                       conserve_volume_flow_mode = ''inflow_profile''
    242     PA0156           cyclic boundary conditions require conserve_volume_flow_mode =
    243                       ''initial_profiles'' or ''bulk_velocity''
    244                       requires noncyclic boundary conditions
    245     PA0157           nonzero bulk velocity requires conserve_volume_flow = .T. and
    246                       conserve_volume_flow_mode = ''bulk_velocity''
    247     PA0158           no vertical boundary condition for variable "..."
    248     PA0159           no term for component "..."
    249     PA0160           non-cyclic lateral boundaries along x do not allow
    250                       calculation of spectra along x
    251     PA0161           sorry, calculation of spectra in non parallel mode is
    252                       still not realized
    253     PA0162           non-cyclic lateral boundaries along y do not allow
    254                       calculation of spectra along y
    255     PA0163           run will be terminated because it is running out of
    256                       job cpu limit remaining time: ... s
    257                       termination time needed: ... s
    258     PA0164           run will be terminated due to user settings of
    259                       restart_time / dt_restart new restart time is: ... s
    260     PA0165           re-open of unit 14 is not verified. Please check results!
    261     PA0166           re-opening of file-id ... is not allowed
    262     PA0167           opening file-id ... not allowed for PE ...
    263     PA0168           opening file-id ... is not allowed since it is used otherwise
    264     PA0169           no filename for AVS-data-file found in MRUN-config-file
    265                       filename in FLD-file set to "unknown"
    266     PA0170           no path for batch_scp on host "..." 
    267     PA0171           NetCDF: no 64-bit offset allowed on this machine
    268     PA0172           no OPEN-statement for file-id ...
    269     PA0173           wrong component: ...
    270     PA0174           wrong argument  expected: ... given: ...
    271     PA0175           no time measurement defined on this host
    272     PA0176           negative time interval occured
    273                       PE ... L=PAUSE "..." new=...  last=...
    274     PA0177           negative time interval occured
    275                       PE ... L=STOP "..." new=... last=... isum=...
    276     PA0178           negative time interval occured
    277                       PE ... L=STOP "..." sum=...  mtime=...
    278     PA0179           unknown modus of time measurement: ...
    279     PA0180           unknown cross-section: ...
    280     PA0181           no output provided for: ...
    281     PA0182           no output available for: ...
    282     PA0183           if humidity/passive_scalar = FALSE output of ... is not provided
    283     PA0184           if cloud_physics = FALSE output of ... is not provided
    284     PA0185           data_output_profiles: normalizing cross ...
    285                       is not possible since one of the  normalizing factors is zero!
    286                       cross_normx_factor(...,...) = ...
    287                       cross_normy_factor(...,...) = ...
    288     PA0186           no spectra data available
    289     PA0187           fft method "..." currently does not work on NEC
    290     PA0188           no system-specific fft-call available
    291     PA0189           fft method "..." not available
    292     PA0190           flow_statistics is called two times within one timestep
    293     PA0191           unknown action(s): ...
    294     PA0192           timestep has exceeded the lower limit dt_1d = ... s   
    295                       simulation stopped!
    296     PA0193           unknown initializing problem
    297     PA0194           number of time series quantities exceeds its maximum
    298                       of dots_max = ... Please increase dots_max in modules.f90.
    299     PA0195           dvrp_username is undefined
    300     PA0196           dvrp_output="..." not allowed
    301     PA0197           dvrp_file="..." not allowed
    302     PA0198           mode_dvrp="..." not allowed
    303     PA0199           split of communicator not realized with  MPI1 coupling
    304                       atmosphere-ocean'
    305     PA0200           missing dz
    306     PA0201           dz=... <= 0.0
    307     PA0202           grid anisotropy exceeds threshold given by only local
    308                       horizontal reduction of near_wall mixing length l_wall
    309                       starting from height level k = ... .
    310     PA0203           inconsistent building parameters: bxl=... bxr=... bys=...
    311                       byn=... nx=... ny=...
    312     PA0204           no street canyon width given
    313     PA0205           inconsistent canyon parameters: cxl=... cxr=...
    314                       cwx=... ch=... nx=... ny=...
    315     PA0206           inconsistent canyon parameters:... cys=... cyn=...
    316                       cwy=... ch=... nx=... ny=...
    317     PA0207           inconsistent canyon parameters: street canyon can
    318                       only be oriented either in x- or in y-direction
    319     PA0208           file TOPOGRAPHY_DATA does not exist
    320     PA0209           errors in file TOPOGRAPHY_DATA
    321     PA0210           nzb_local values are outside the model domain
    322                      MINVAL( nzb_local ) = ...
    323                       MAXVAL( nzb_local ) = ...
    324     PA0211           nzb_local does not fulfill cyclic boundary condition
    325                       in x-direction
    326     PA0212           nzb_local does not fulfill cyclic boundary condition
    327                       in y-direction   
    328     PA0213           max_number_of_particle_groups =...
    329                       number_of_particle_groups reset to ...
    330     PA0214           version mismatch concerning data from prior run
    331                       version on file    = ...
    332                       version in program = ...
    333     PA0215           particle group # ...  has a density ratio /= 0
    334                       but radius = 0
    335     PA0216           number of initial particles (...) exceeds
    336                       maximum_number_of_particles (...) on PE ...
    337     PA0217           unknown boundary condition bc_par_b = "..."
    338     PA0218           unknown boundary condition bc_par_t = "..."
    339     PA0219           unknown boundary condition bc_par_lr = "..."
    340     PA0220           unknown boundary condition bc_par_ns = "..."
    341     PA0221           number of PEs of the prescribed topology (...) does not match
    342                       the number of PEs available to the job ()
    343     PA0222           if the processor topology is prescribed by the user,
    344                       both values of "npex" and "npey" must be given
    345                       in the NAMELIST-parameter file
    346     PA0223           psolver = "poisfft_hybrid" can only be used in case of
    347                       a 1d-decomposition along x
    348     PA0224           no matching grid for transpositions found
    349     PA0225           x-direction: gridpoint number (...)is not an
    350                       integral divisor of the number of procesors (...)
    351     PA0226           x-direction: nx does not match the requirements given
    352                       by the number of PEs used
    353                       please use nx = ... instead of nx =...
    354     PA0227           y-direction: gridpoint number (...) is not an
    355                       integral divisor of the number of processors (...)
    356     PA0228           y-direction: ny does not match the requirements given
    357                       by the number of PEs used
    358                       please use ny = ... instead of ny =...
    359     PA0229           1d-decomposition along x chosen but nz restrictions
    360                       may occur since ups-scheme is activated
    361     PA0230           transposition z --> x:
    362                       nz=... is not an integral divisior of pdims(1)= ...
    363     PA0231           transposition x --> y:
    364                       nx+1=... is not an integral divisor of pdims(2)= ...
    365     PA0232           transposition y --> z:
    366                       ny+1=... is not an integral divisor of pdims(1)=...
    367     PA0233           transposition x --> y:
    368                       ny+1=... is not an integral divisor of pdims(1)=...
    369     PA0234           direct transposition z --> y (needed for spectra):
     171    PA0104            output of "..." requires a "particles_par"-NAMELIST
     172                       in the parameter file (PARIN)
     173    PA0105            output of "..." requires humidity = .TRUE.
     174    PA0106            output of "" requires cloud_physics = .TRUE. or
     175                       cloud_droplets = .TRUE.'
     176    PA0107            output of "..." requires cloud_droplets = .TRUE.
     177    PA0108            output of "..." requires cloud_physics = .TRUE.
     178    PA0109            output of "..." requires ocean = .TRUE.
     179    PA0110            output of "..." requires passive_scalar = .TRUE.
     180    PA0111            illegal value for data_output: "..." only
     181                       2d-horizontal cross sections are allowed for this value
     182    PA0112            output of "..." requires precipitation = .TRUE.
     183    PA0113            temporal averaging of precipitation amount "..."
     184                       is not possible'       
     185    PA0114            illegal value for data_output or data_output_user = "..."
     186    PA0115            illegal value for data_output = "..."
     187    PA0116            z_max_do2d = ', z_max_do2d must be >= ... (zu(nzb+1))
     188                       and <= ... (zu(nzt))
     189    PA0117            do3d_compress = .TRUE. not allowed on host ""
     190    PA0118            illegal precision: do3d_comp_prec ( ...) = "..."
     191    PA0119            unknown variable "..." given for do3d_comp_prec(...)   
     192    PA0120            unknown value for data_output_format "..."
     193    PA0121            km_constant = ... < 0.0
     194    PA0122            prandtl_number = ... < 0.0
     195    PA0123            prandtl_layer is not allowed with fixed value of km
     196    PA0124            outflow_damping width out of range
     197    PA0125            rif_min = ...  must be less than rif_max = ...
     198    PA0126            disturbance_level_b = ... must be >= ... (zu(3))
     199    PA0127            disturbance_level_b = ... must be <= ... (zu(nzt-2))
     200    PA0128            disturbance_level_t = ... must be <= ... (zu(nzt-2))
     201    PA0129            disturbance_level_t = ... must
     202                       be >= disturbance_level_b = ...
     203    PA0130            disturbance_level_ind_t =...  must
     204                       be >= disturbance_level_b = ...
     205    PA0131            inflow_disturbance_begin out of range
     206    PA0132            inflow_disturbance_end out of range
     207    PA0133            turbulent_inflow = .T. requires a Dirichlet
     208                       condition at the inflow boundary
     209    PA0134            illegal value for recycling_width: ...
     210    PA0135            unknown random generator: random_generator = "..."
     211    PA0136            damp_level_1d = ...  must be > 0.0 and < ... (zu(nzt+1))
     212    PA0137            mixing_length_1d = "..." is unknown
     213    PA0138            dissipation_1d = "..." is unknown
     214    PA0139            termination_time_needed = ...  must be > 30.0 on host ..."
     215    PA0140            termination_time_needed = ... should be >= 300.0
     216                       on host "..."     
     217    PA0141            coupling requires PALM to be called with
     218                       ''mrun -K parallel''
     219    PA0142            absolute temperature < 0.0 at zu(...) = ...
     220    PA0143            k=... j=... i=... ql_c=... part(...)%wf=... 
     221                       delta_r=...
     222    PA0144            #1 k=... j=... i=... e_s=...  e_a=... t_int=...
     223                       d_radius=... delta_r=... particle_radius=... 
     224    PA0145            collision_efficiency out of range: ...
     225    PA0146            maximum_number_of_particles needs to be increased
     226                       but this is not allowed with NetCDF output switched on
     227    PA0147            maximum_number_of_tails needs to be increased
     228                       but this is not allowed with NetCDF output switched on
     229    PA0148            particle too fast.  n = ...
     230    PA0149            particle out of range: i=... j=... k=...
     231                       nxl=... nxr=... nys=... nyn=... nzb=... nzt=...
     232    PA0150            Both dp_external and conserve_volume_flow are .TRUE.
     233                       but one of them must be .FALSE.
     234    PA0151            dp_level_b = ... is out of range
     235    PA0152            dp_external is .TRUE. but dpdxy is zero, i.e. the external
     236                       pressure gradient will not be applied
     237    PA0153            dpdxy is nonzero but dp_external is .FALSE., i.e. the
     238                       external pressure gradient will not be applied
     239    PA0154            unknown conserve_volume_flow_mode: ...
     240    PA0155            noncyclic boundary conditions require
     241                       conserve_volume_flow_mode = ''inflow_profile''
     242    PA0156            cyclic boundary conditions require conserve_volume_flow_mode =
     243                       ''initial_profiles'' or ''bulk_velocity''
     244                       requires noncyclic boundary conditions
     245    PA0157            nonzero bulk velocity requires conserve_volume_flow = .T. and
     246                       conserve_volume_flow_mode = ''bulk_velocity''
     247    PA0158            no vertical boundary condition for variable "..."
     248    PA0159            no term for component "..."
     249    PA0160            non-cyclic lateral boundaries along x do not allow
     250                       calculation of spectra along x
     251    PA0161            sorry, calculation of spectra in non parallel mode is
     252                       still not realized
     253    PA0162            non-cyclic lateral boundaries along y do not allow
     254                       calculation of spectra along y
     255    PA0163            run will be terminated because it is running out of
     256                       job cpu limit remaining time: ... s
     257                       termination time needed: ... s
     258    PA0164            run will be terminated due to user settings of
     259                       restart_time / dt_restart new restart time is: ... s
     260    PA0165            re-open of unit 14 is not verified. Please check results!
     261    PA0166            re-opening of file-id ... is not allowed
     262    PA0167            opening file-id ... not allowed for PE ...
     263    PA0168            opening file-id ... is not allowed since it is used otherwise
     264    PA0169            no filename for AVS-data-file found in MRUN-config-file
     265                       filename in FLD-file set to "unknown"
     266    PA0170            no path for batch_scp on host "..." 
     267    PA0171            NetCDF: no 64-bit offset allowed on this machine
     268    PA0172            no OPEN-statement for file-id ...
     269    PA0173            wrong component: ...
     270    PA0174            wrong argument  expected: ... given: ...
     271    PA0175            no time measurement defined on this host
     272    PA0176            negative time interval occured
     273                       PE ... L=PAUSE "..." new=...  last=...
     274    PA0177            negative time interval occured
     275                       PE ... L=STOP "..." new=... last=... isum=...
     276    PA0178            negative time interval occured
     277                       PE ... L=STOP "..." sum=...  mtime=...
     278    PA0179            unknown modus of time measurement: ...
     279    PA0180            unknown cross-section: ...
     280    PA0181            no output provided for: ...
     281    PA0182            no output available for: ...
     282    PA0183            if humidity/passive_scalar = FALSE output of ...
     283                       is not provided
     284    PA0184            if cloud_physics = FALSE output of ... is not provided
     285    PA0185            data_output_profiles: normalizing cross ...
     286                       is not possible since one of the normalizing factors is zero!
     287                       cross_normx_factor(...,...) = ...
     288                       cross_normy_factor(...,...) = ...
     289    PA0186            no spectra data available
     290    PA0187            fft method "..." currently does not work on NEC
     291    PA0188            no system-specific fft-call available
     292    PA0189            fft method "..." not available
     293    PA0190            flow_statistics is called two times within one timestep
     294    PA0191            unknown action(s): ...
     295    PA0192            timestep has exceeded the lower limit dt_1d = ... s   
     296                       simulation stopped!
     297    PA0193            unknown initializing problem
     298    PA0194            number of time series quantities exceeds its maximum
     299                       of dots_max = ... Please increase dots_max in modules.f90.
     300    PA0195            dvrp_username is undefined
     301    PA0196            dvrp_output="..." not allowed
     302    PA0197            dvrp_file="..." not allowed
     303    PA0198            mode_dvrp="..." not allowed
     304    PA0199            split of communicator not realized with  MPI1 coupling
     305                       atmosphere-ocean'
     306    PA0200            missing dz
     307    PA0201            dz=... <= 0.0
     308    PA0202            grid anisotropy exceeds threshold given by only local
     309                       horizontal reduction of near_wall mixing length l_wall
     310                       starting from height level k = ... .
     311    PA0203            inconsistent building parameters: bxl=... bxr=... bys=...
     312                       byn=... nx=... ny=...
     313    PA0204            no street canyon width given
     314    PA0205            inconsistent canyon parameters: cxl=... cxr=...
     315                       cwx=... ch=... nx=... ny=...
     316    PA0206            inconsistent canyon parameters:... cys=... cyn=...
     317                       cwy=... ch=... nx=... ny=...
     318    PA0207            inconsistent canyon parameters: street canyon can
     319                       only be oriented either in x- or in y-direction
     320    PA0208            file TOPOGRAPHY_DATA does not exist
     321    PA0209            errors in file TOPOGRAPHY_DATA
     322    PA0210            nzb_local values are outside the model domain
     323                      MINVAL( nzb_local ) = ...
     324                       MAXVAL( nzb_local ) = ...
     325    PA0211            nzb_local does not fulfill cyclic boundary condition
     326                       in x-direction
     327    PA0212            nzb_local does not fulfill cyclic boundary condition
     328                       in y-direction   
     329    PA0213            max_number_of_particle_groups =...
     330                       number_of_particle_groups reset to ...
     331    PA0214            version mismatch concerning data from prior run
     332                       version on file    = ...
     333                       version in program = ...
     334    PA0215            particle group # ...  has a density ratio /= 0
     335                       but radius = 0
     336    PA0216            number of initial particles (...) exceeds
     337                       maximum_number_of_particles (...) on PE ...
     338    PA0217            unknown boundary condition bc_par_b = "..."
     339    PA0218            unknown boundary condition bc_par_t = "..."
     340    PA0219            unknown boundary condition bc_par_lr = "..."
     341    PA0220            unknown boundary condition bc_par_ns = "..."
     342    PA0221            number of PEs of the prescribed topology (...) does not match
     343                       the number of PEs available to the job ()
     344    PA0222            if the processor topology is prescribed by the user,
     345                       both values of "npex" and "npey" must be given
     346                       in the NAMELIST-parameter file
     347    PA0223            psolver = "poisfft_hybrid" can only be used in case of
     348                       a 1d-decomposition along x
     349    PA0224            no matching grid for transpositions found
     350    PA0225            x-direction: gridpoint number (...)is not an
     351                       integral divisor of the number of procesors (...)
     352    PA0226            x-direction: nx does not match the requirements given
     353                       by the number of PEs used
     354                       please use nx = ... instead of nx =...
     355    PA0227            y-direction: gridpoint number (...) is not an
     356                       integral divisor of the number of processors (...)
     357    PA0228            y-direction: ny does not match the requirements given
     358                       by the number of PEs used
     359                       please use ny = ... instead of ny =...
     360    PA0229            1d-decomposition along x chosen but nz restrictions
     361                       may occur since ups-scheme is activated
     362    PA0230            transposition z --> x:
     363                       nz=... is not an integral divisior of pdims(1)= ...
     364    PA0231            transposition x --> y:
     365                       nx+1=... is not an integral divisor of pdims(2)= ...
     366    PA0232            transposition y --> z:
     367                       ny+1=... is not an integral divisor of pdims(1)=...
     368    PA0233            transposition x --> y:
     369                       ny+1=... is not an integral divisor of pdims(1)=...
     370    PA0234            direct transposition z --> y (needed for spectra):
    370371                       nz=... is not an integral divisor of pdims(2)=...
    371     PA0235           mg_switch_to_pe0_level out of range and reset to default (=0)     
    372     PA0236           not enough memory for storing gathered multigrid data on PE0
    373     PA0237           multigrid gather/scatter impossible in non parallel mode
    374     PA0238           more than 10 multigrid levels
    375     PA0239           The value for "topography_grid_convention" is not set.
    376                       Its default value is only valid for
    377                       "topography" = ''single_building'',
    378                       ''single_street_canyon'' or ''read_from_file''
    379                       Choose ''cell_edge'' or ''cell_center''.
    380     PA0240           The value for "topography_grid_convention" is not
    381                       recognized. Choose ''cell_edge'' or ''cell_center''.
    382     PA0241           netcdf_precision must contain a "_"
    383                       netcdf_precision(...)="..."
    384     PA0242           illegal netcdf precision: netcdf_precision( ...)="..."
    385     PA0243           unknown variable in inipar assignment:
    386                       netcdf_precision(', i, ')="..."
    387     PA0244           no grid defined for variable ...
    388     PA0245           NetCDF file for volume data ... from previuos run found,
    389                       but this file cannot be extended due to  variable mismatch.
    390                       New file is created instead.
    391     PA0246           NetCDF file for volume data ... from previuos run found,
    392                       but this file cannot be extended due to mismatch in
    393                       number of vertical grid points (nz_do3d).
    394                       New file is created instead.
    395     PA0247           NetCDF file for volume data ... from previuos run found,
    396                       but this file cannot be extended because the current
    397                       output time is less or equal than the last output time
    398                       on this file. New file is created instead.
    399     PA0248           NetCDF file for volume data ... from previous run found.
    400                       This file will be extended.
    401     PA0249           NetCDF file for cross-sections ... from previuos run found,
    402                       but this file cannot be extended due to variable mismatch.
    403                       New file is created instead.
    404     PA0250           NetCDF file for cross-sections ... from previuos run found,
    405                       but this file cannot be extended due to mismatch in
    406                       number of cross sections. New file is created instead.
    407     PA0251           NetCDF file for cross-sections ... from previuos run found
    408                      but this file cannot be extended due to mismatch in cross
    409                       section levels. New file is created instead.
    410     PA0252           NetCDF file for cross sections ... from previuos run found,
    411                       but this file cannot be extended because the current output time
    412                       is less or equal than the last output time on this file.
    413                       New file is created instead.
    414     PA0253           NetCDF file for cross-sections ... from previous run found.
    415                       This file will be extended.
    416     PA0254           NetCDF file for vertical profiles from previuos run found,
    417                       but this file cannot be extended due to variable mismatch.
    418                       New file is created instead.
    419     PA0255           NetCDF file for vertical profiles from previuos run found,
    420                       but this file cannot be extended because the current
    421                       output time is less or equal than the last output time
    422                       on this file. New file is created instead.
    423     PA0256           NetCDF file for vertical profiles from previous run found.
    424                       This file will be extended.
    425     PA0257           NetCDF file for time series from previuos run found
    426                       but this file cannot be extended due tovariable mismatch.
    427                       New file is created instead.
    428     PA0258           NetCDF file for time series from previuos run found,
    429                       but this file cannot be extended because the current
    430                       output time is less or equal than the last output time
    431                       on this file. New file is created instead.
    432     PA0259           NetCDF file for time series from previous run found.
    433                       This file will be extended.
    434     PA0260           NetCDF file for spectra from previuos run found,
    435                       but this file cannot be extended due to variable mismatch.
    436                       New file is created instead.
    437     PA0261           NetCDF file for spectra from previuos run found,
    438                       but this file cannot be extended due to mismatch in
    439                       number of vertical levels. New file is created instead.
    440     PA0262           NetCDF file for spectra from previuos run found,
    441                       but this file cannot be extended due to mismatch in
    442                       heights of vertical levels. New file is created instead.
    443     PA0263           NetCDF file for spectra from previuos run found,
    444                       but this file cannot be extended because the current
    445                       output time is less or equal than the last output time
    446                       on this file. New file is created instead.
    447     PA0264           NetCDF file for spectra from previous run found.
    448                       This file will be extended.
    449     PA0265           NetCDF file for particles from previuos run found,
    450                       but this file cannot be extended because the current
    451                       output time is less or equal than the last output time
    452                       on this file. New file is created instead.
    453     PA0266           NetCDF file for particles from previous run found.
    454                       This file will be extended.
    455     PA0267           NetCDF file for particle time series from previuos run found,
    456                       but this file cannot be extended due to variable mismatch.
    457                       New file is created instead.
    458     PA0268           NetCDF file for particle time series from previuos run found,
    459                       but this file cannot be extended because the current
    460                       output time is less or equal than the last output time
    461                       on this file. New file is created instead.
    462     PA0269           NetCDF file for particle time series from previous run found.
    463                       This file will be extended.
    464     PA0270           mode "..." not supported
    465     PA0271           errors in \$inipar &or no \$inipar-namelist found (CRAY-machines only)
    466     PA0272           no \$inipar-namelist found
    467     PA0273           no value or wrong value given for nx: nx=...
    468     PA0274           no value or wrong value given for ny: ny=...
    469     PA0275           no value or wrong value given for nz: nz=...
    470     PA0276           local file ENVPAR not found
     372    PA0235            mg_switch_to_pe0_level out of range and reset to
     373                       default (=0)     
     374    PA0236            not enough memory for storing gathered multigrid data on PE0
     375    PA0237             multigrid gather/scatter impossible in non parallel mode
     376    PA0238            more than 10 multigrid levels
     377    PA0239            The value for "topography_grid_convention" is not set.
     378                       Its default value is only valid for
     379                       "topography" = ''single_building'',
     380                       ''single_street_canyon'' or ''read_from_file''
     381                       Choose ''cell_edge'' or ''cell_center''.
     382    PA0240            The value for "topography_grid_convention" is not
     383                       recognized. Choose ''cell_edge'' or ''cell_center''.
     384    PA0241            netcdf_precision must contain a "_"
     385                       netcdf_precision(...)="..."
     386    PA0242            illegal netcdf precision: netcdf_precision( ...)="..."
     387    PA0243            unknown variable in inipar assignment:
     388                       netcdf_precision(', i, ')="..."
     389    PA0244            no grid defined for variable ...
     390    PA0245            NetCDF file for volume data ... from previuos run found,
     391                       but this file cannot be extended due to  variable mismatch.
     392                       New file is created instead.
     393    PA0246            NetCDF file for volume data ... from previuos run found,
     394                       but this file cannot be extended due to mismatch in
     395                       number of vertical grid points (nz_do3d).
     396                       New file is created instead.
     397    PA0247            NetCDF file for volume data ... from previuos run found,
     398                       but this file cannot be extended because the current
     399                       output time is less or equal than the last output time
     400                       on this file. New file is created instead.
     401    PA0248            NetCDF file for volume data ... from previous run found.
     402                       This file will be extended.
     403    PA0249            NetCDF file for cross-sections ... from previuos run found,
     404                       but this file cannot be extended due to variable mismatch.
     405                       New file is created instead.
     406    PA0250            NetCDF file for cross-sections ... from previuos run found,
     407                       but this file cannot be extended due to mismatch in
     408                       number of cross sections. New file is created instead.
     409    PA0251            NetCDF file for cross-sections ... from previuos run found
     410                      but this file cannot be extended due to mismatch in cross
     411                       section levels. New file is created instead.
     412    PA0252            NetCDF file for cross sections ... from previuos run found,
     413                       but this file cannot be extended because the current
     414                       output time is less or equal than the last output time
     415                       on this file.
     416                       New file is created instead.
     417    PA0253            NetCDF file for cross-sections ... from previous run found.
     418                       This file will be extended.
     419    PA0254            NetCDF file for vertical profiles from previuos run found,
     420                       but this file cannot be extended due to variable mismatch.
     421                       New file is created instead.
     422    PA0255            NetCDF file for vertical profiles from previuos run found,
     423                       but this file cannot be extended because the current
     424                       output time is less or equal than the last output time
     425                       on this file. New file is created instead.
     426    PA0256            NetCDF file for vertical profiles from previous run found.
     427                       This file will be extended.
     428    PA0257            NetCDF file for time series from previuos run found
     429                       but this file cannot be extended due tovariable mismatch.
     430                       New file is created instead.
     431    PA0258            NetCDF file for time series from previuos run found,
     432                       but this file cannot be extended because the current
     433                       output time is less or equal than the last output time
     434                       on this file. New file is created instead.
     435    PA0259            NetCDF file for time series from previous run found.
     436                       This file will be extended.
     437    PA0260            NetCDF file for spectra from previuos run found,
     438                       but this file cannot be extended due to variable mismatch.
     439                       New file is created instead.
     440    PA0261            NetCDF file for spectra from previuos run found,
     441                       but this file cannot be extended due to mismatch in
     442                       number of vertical levels. New file is created instead.
     443    PA0262            NetCDF file for spectra from previuos run found,
     444                       but this file cannot be extended due to mismatch in
     445                       heights of vertical levels. New file is created instead.
     446    PA0263            NetCDF file for spectra from previuos run found,
     447                       but this file cannot be extended because the current
     448                       output time is less or equal than the last output time
     449                       on this file. New file is created instead.
     450    PA0264            NetCDF file for spectra from previous run found.
     451                       This file will be extended.
     452    PA0265            NetCDF file for particles from previuos run found,
     453                       but this file cannot be extended because the current
     454                       output time is less or equal than the last output time
     455                       on this file. New file is created instead.
     456    PA0266            NetCDF file for particles from previous run found.
     457                       This file will be extended.
     458    PA0267            NetCDF file for particle time series from previuos run found,
     459                       but this file cannot be extended due to variable mismatch.
     460                       New file is created instead.
     461    PA0268            NetCDF file for particle time series from previuos run found,
     462                       but this file cannot be extended because the current
     463                       output time is less or equal than the last output time
     464                       on this file. New file is created instead.
     465    PA0269            NetCDF file for particle time series from previous run found.
     466                       This file will be extended.
     467    PA0270            mode "..." not supported
     468    PA0271            errors in \$inipar &or no \$inipar-namelist found
     469                       (CRAY-machines only)
     470    PA0272            no \$inipar-namelist found
     471    PA0273            no value or wrong value given for nx: nx=...
     472    PA0274            no value or wrong value given for ny: ny=...
     473    PA0275            no value or wrong value given for nz: nz=...
     474    PA0276            local file ENVPAR not found
     475                       some variables for steering may not be properly set
     476    PA0277            errors in local file ENVPAR
     477                       some variables for steering may not be properly set
     478    PA0278            no envpar-NAMELIST found in local file ENVPAR
    471479                      some variables for steering may not be properly set
    472     PA0277           errors in local file ENVPAR
    473                       some variables for steering may not be properly set
    474     PA0278           no envpar-NAMELIST found in local file ENVPAR
    475                       some variables for steering may not be properly set
    476     PA0279           wrong component: ...
    477     PA0280           Number of OpenMP threads = ...
    478     PA0281           running optimized multinode version
    479                       switch_per_lpar        = ...
    480                       tasks_per_lpar         = ...
    481                       tasks_per_logical_node = ...
    482     PA0282           parallel environment (MPI) required
    483     PA0283           no sufficient convergence within 1000 cycles
    484     PA0284           data from subdomain of previous run mapped more
    485                       than 1000 times
    486     PA0285           number of PEs or virtual PE-grid changed in restart run
    487                       PE ... will read from files ...
    488     PA0286           version mismatch concerning data from prior run
    489                       version on file    = "..."
    490                       version in program = "..."
    491     PA0287           problem with index bound nxl on restart file "..."
    492                       nxl = ... but it should be = ... from the index bound
    493                       information array
    494     PA0288           problem with index bound nxr on restart file "..."
    495                       nxr = ... but it should be = ... from the index bound
    496                       information array
    497     PA0289           problem with index bound nys on restart file "..."
    498                       nys = .. but it should be = ... from the index bound
    499                       information array 
    500     PA0290           problem with index bound nyn on restart file "..."
    501                       nyn = ... but it should be = ... from the index bound
    502                       information array
    503     PA0291           mismatch between actual data and data
    504                       from prior run on PE ...
    505                       nzb on file = ...
    506                       nzb         = ...
    507     PA0292           mismatch between actual data and data
    508                       from prior run on PE ...
    509                       nzt on file = ...
    510                       nzt         = ...
    511     PA0293           read_3d_binary: spectrum_x
    512                       on restart file ignored because total numbers of
    513                       grid points (nx) do not match
    514     PA0294           read_3d_binary: spectrum_y
    515                       on restart file ignored because total numbers of
    516                       grid points (ny) do not match
    517     PA0295           unknown field named "..." found in data from
    518                       prior run on PE ...
    519     PA0296           version mismatch concerning control variables
    520                       version on file    = "..."
    521                       version on program = "..."
    522     PA0297           numprocs not found in data from prior run on PE ...
    523     PA0298           hor_index_bounds not found in data from prior
    524                       run on PE ...
    525     PA0299           nz not found in data from prior run on PE ...
    526     PA0300           max_pr_user not found in data from prior run on PE ...
    527     PA0301           statistic_regions not found in data from prior
    528                       run on PE ...
    529     PA0302           unknown variable named "..." found in data from
    530                       prior run on PE ... 
    531     PA0303           nz not found in restart data file
    532     PA0304           mismatch concerning number of gridpoints along z
    533                       nz on file    = "..."
    534                       nz from run   = "..."
    535     PA0305           max_pr_user not found in restart data file
    536     PA0306           number of user profiles on restart data file differs
    537                       from the current run
    538                       max_pr_user on file    = "..."
    539                       max_pr_user from run   = "..."
    540     PA0307           statistic_regions not found in restart data file
    541     PA0308           statistic regions on restart data file differ
    542                       from the current run
    543                       statistic regions on file    = "..."
    544                       statistic regions from run   = "..."
     480    PA0279            wrong component: ...
     481    PA0280            Number of OpenMP threads = ...
     482    PA0281            running optimized multinode version
     483                       switch_per_lpar        = ...
     484                       tasks_per_lpar         = ...
     485                       tasks_per_logical_node = ...
     486    PA0282            parallel environment (MPI) required
     487    PA0283            no sufficient convergence within 1000 cycles
     488    PA0284            data from subdomain of previous run mapped more
     489                       than 1000 times
     490    PA0285            number of PEs or virtual PE-grid changed in restart run
     491                       PE ... will read from files ...
     492    PA0286            version mismatch concerning data from prior run
     493                       version on file    = "..."
     494                       version in program = "..."
     495    PA0287            problem with index bound nxl on restart file "..."
     496                       nxl = ... but it should be = ... from the index bound
     497                       information array
     498    PA0288            problem with index bound nxr on restart file "..."
     499                       nxr = ... but it should be = ... from the index bound
     500                       information array
     501    PA0289            problem with index bound nys on restart file "..."
     502                       nys = .. but it should be = ... from the index bound
     503                       information array 
     504    PA0290            problem with index bound nyn on restart file "..."
     505                       nyn = ... but it should be = ... from the index bound
     506                       information array
     507    PA0291            mismatch between actual data and data
     508                       from prior run on PE ...
     509                       nzb on file = ...
     510                       nzb         = ...
     511    PA0292            mismatch between actual data and data
     512                       from prior run on PE ...
     513                       nzt on file = ...
     514                       nzt         = ...
     515    PA0293            read_3d_binary: spectrum_x
     516                       on restart file ignored because total numbers of
     517                       grid points (nx) do not match
     518    PA0294            read_3d_binary: spectrum_y
     519                       on restart file ignored because total numbers of
     520                       grid points (ny) do not match
     521    PA0295            unknown field named "..." found in data from
     522                       prior run on PE ...
     523    PA0296            version mismatch concerning control variables
     524                       version on file    = "..."
     525                       version on program = "..."
     526    PA0297            numprocs not found in data from prior run on PE ...
     527    PA0298            hor_index_bounds not found in data from prior
     528                       run on PE ...
     529    PA0299            nz not found in data from prior run on PE ...
     530    PA0300            max_pr_user not found in data from prior run on PE ...
     531    PA0301            statistic_regions not found in data from prior
     532                       run on PE ...
     533    PA0302            unknown variable named "..." found in data from
     534                       prior run on PE ... 
     535    PA0303            nz not found in restart data file
     536    PA0304            mismatch concerning number of gridpoints along z
     537                       nz on file    = "..."
     538                       nz from run   = "..."
     539    PA0305            max_pr_user not found in restart data file
     540    PA0306            number of user profiles on restart data file differs
     541                       from the current run
     542                       max_pr_user on file    = "..."
     543                       max_pr_user from run   = "..."
     544    PA0307            statistic_regions not found in restart data file
     545    PA0308            statistic regions on restart data file differ
     546                       from the current run
     547                       statistic regions on file    = "..."
     548                       statistic regions from run   = "..."
    545549                      statistic data may be lost!
    546     PA0309           inflow profiles not temporally averaged.
    547                       Averaging will be done now using ... samples. 
     550    PA0309            inflow profiles not temporally averaged.
     551                       Averaging will be done now using ... samples. 
     552    PA0310            remote model "..." terminated with
     553                       terminate_coupled_remote = ...
     554                       local model  "..." has terminate_coupled = ...
     555    PA0311            number of gridpoints along x or/and y contain illegal 
     556                       factors only factors 8,6,5,4,3,2 are allowed
     557    PA0312            Time step has reached minimum limit.',        &
     558                       dt      = ... s  Simulation is terminated.
     559                       old_dt  = ... s                           
     560                       dt_u    = ... s                             
     561                       dt_v    = ... s                           
     562                       dt_w    = ... s                             
     563                       dt_diff = ... s                         
     564                       u_max   = ... m/s   k=... j=...  i=...           
     565                       v_max   = ... m/s   k=... j=...  i=...           
     566                       w_max   = ... m/s   k=... j=...  i=...
    548567   
     568
     569    UI0001            unknown location "..."
     570    UI0002            location "..." is not allowed to be called with
     571                       parameters "i" and "j"
     572    UI0003            no output possible for: ...
     573    UI0004            unknown mode "..."
     574    UI0005            topography "..." not available yet
     575    UI0006            unknown topography "..."
     576    UI0007            canopy_mode "..." not available yet
     577    UI0008            unknown canopy_mode "..."
     578    UI0009            the number of user-defined profiles given in
     579                       data_output_pr (...) does not match the one
     580                       found in the restart file (...)
     581    UI0010            Spectra of ... can not be calculated
     582    UI0011            Spectra of ... are not defined
     583    UI0012            unknown variable named "..." found in data from prior
     584                       run on PE
     585   
  • palm/trunk/SOURCE/CURRENT_MODIFICATIONS

    r257 r258  
    2929init_1d_model, init_3d_model, init_dvrp, init_grid, init_particles, init_pegrid,
    3030netcdf, parin, plant_canopy_model, poisfft_hybrid, poismg, read_3d_binary,
    31 read_var_list)
     31read_var_list, surface_coupler, temperton_fft, timestep, user_actions,
     32user_data_output_dvrp, user_dvrp_coltab, user_init_grid, user_init_plant_canopy,
     33user_parin, user_read_restart_data, user_spectra )
    3234
    3335First constant in array den also defined as type double. (eqn_state_seawater)
     
    3739user_init_grid, user_parin, write_var_list)
    3840
    39 advec_particles, advec_s_bc, buoyancy, calc_spectra, check_for_restart, check_open, check_parameters, coriolis, cpu_log, data_output_2d, data_output_3d, data_output_dvrp, data_output_profiles, data_output_spectra,  eqn_state_seawater, fft_xy, flow_statistics, header, init_1d_model, init_3d_model, init_dvrp, init_grid, init_particles, init_pegrid, netcdf, parin, plant_canopy_model, poisfft_hybrid, poismg, read_3d_binary, read_var_list, sort_particles, user_check_parameters, user_header, user_init_grid, user_parin, write_var_list
     41advec_particles, advec_s_bc, buoyancy, calc_spectra, check_for_restart, check_open, check_parameters, coriolis, cpu_log, data_output_2d, data_output_3d, data_output_dvrp, data_output_profiles, data_output_spectra,  eqn_state_seawater, fft_xy, flow_statistics, header, init_1d_model, init_3d_model, init_dvrp, init_grid, init_particles, init_pegrid, netcdf, parin, plant_canopy_model, poisfft_hybrid, poismg, read_3d_binary, read_var_list, sort_particles, user_check_parameters, user_header, user_init_grid, user_parin, surface_coupler, temperton_fft, timestep, user_actions, user_data_output_dvrp, user_dvrp_coltab, user_init_grid, user_init_plant_canopy, user_parin, user_read_restart_data, user_spectra, write_var_list
    4042
    4143
  • palm/trunk/SOURCE/surface_coupler.f90

    r226 r258  
    22
    33!------------------------------------------------------------------------------!
    4 ! Actual revisions:
     4! Current revisions:
    55! -----------------
    6 !
     6! Output of messages replaced by message handling routine.
     7!
    78!
    89! Former revisions:
     
    5253                       0, comm_inter, status, ierr )
    5354    IF ( terminate_coupled_remote > 0 )  THEN
    54        IF ( myid == 0 )  THEN
    55           PRINT*, '+++ surface_coupler:'
    56           PRINT*, '    remote model "', TRIM( coupling_mode_remote ), &
    57                '" terminated'
    58           PRINT*, '    with terminate_coupled_remote = ', &
    59                terminate_coupled_remote
    60           PRINT*, '    local model  "', TRIM( coupling_mode ), &
    61                '" has'
    62           PRINT*, '    terminate_coupled = ', &
    63                terminate_coupled
    64        ENDIF
    65        CALL local_stop
     55       WRITE( message_string, * ) 'remote model "', TRIM( coupling_mode_remote ), &
     56                                  '" terminated',                                 &
     57                                  '&with terminate_coupled_remote = ',            &
     58                                  terminate_coupled_remote,                       &
     59                                  '&local model  "', TRIM( coupling_mode ),       &
     60                                  '" has',                                        &
     61                                  '&terminate_coupled = ',                        &
     62                                  terminate_coupled
     63       CALL message( 'surface_coupler', 'PA0310', 1, 2, 0, 6, 0 )
    6664       RETURN
    6765    ENDIF
  • palm/trunk/SOURCE/temperton_fft.f90

    r4 r258  
    22
    33!------------------------------------------------------------------------------!
    4 ! Actual revisions:
     4! Current revisions:
    55! -----------------
    6 !
     6! Output of messages replaced by message handling routine.
     7!
    78!
    89! Former revisions:
     
    18841885
    18851886
     1887    USE control_parameters
    18861888    USE pegrid
    18871889
     
    19451947
    19461948!    WRITE (nout,'(A,I4,A)') ' n =',n,' - Contains illegal factors'
    1947     IF ( myid == 0 )  THEN
    1948        PRINT*, '+++ temperton_fft:'
    1949        PRINT*, '    number of gridpoints along x or/and y contain illegal ', &
    1950                     'factors'
    1951        PRINT*, '    only factors 8,6,5,4,3,2 are allowed'
    1952     ENDIF
    1953     CALL local_stop
    1954 
     1949    message_string = 'number of gridpoints along x or/and y ' // &
     1950                     'contain illegal  factors' //               &
     1951                     '&only factors 8,6,5,4,3,2 are allowed'
     1952    CALL message( 'temperton_fft', 'PA0311', 1, 2, 0, 6, 0 )
    19551953
    19561954    RETURN
  • palm/trunk/SOURCE/timestep.f90

    r226 r258  
    22
    33!------------------------------------------------------------------------------!
    4 ! Actual revisions:
     4! Current revisions:
    55! -----------------
    6 !
     6! Output of messages replaced by message handling routine.
     7!
    78!
    89! Former revisions:
     
    201202          stop_dt = .TRUE.
    202203
    203           IF ( myid == 0 )  THEN
    204              PRINT*,'+++ time_step: Time step has reached minimum limit.'
    205              PRINT*,'    dt      = ', dt_3d, ' s   Simulation is terminated.'
    206              PRINT*,'    old_dt  = ', old_dt, ' s'
    207              PRINT*,'    dt_u    = ', dt_u, ' s'
    208              PRINT*,'    dt_v    = ', dt_v, ' s'
    209              PRINT*,'    dt_w    = ', dt_w, ' s'
    210              PRINT*,'    dt_diff = ', dt_diff, ' s'
    211              PRINT*,'    u_max   = ', u_max, ' m/s   k=', u_max_ijk(1), &
    212                     '  j=', u_max_ijk(2), '  i=', u_max_ijk(3)
    213              PRINT*,'    v_max   = ', v_max, ' m/s   k=', v_max_ijk(1), &
    214                     '  j=', v_max_ijk(2), '  i=', v_max_ijk(3)
    215              PRINT*,'    w_max   = ', w_max, ' m/s   k=', w_max_ijk(1), &
    216                     '  j=', w_max_ijk(2), '  i=', w_max_ijk(3)
    217           ENDIF
     204          WRITE( message_string, * ) 'Time step has reached minimum limit.',        &
     205                             '&dt      = ', dt_3d, ' s  Simulation is terminated.', &
     206                             '&old_dt  = ', old_dt, ' s',                           &
     207                             '&dt_u    = ', dt_u, ' s',                             &
     208                             '&dt_v    = ', dt_v, ' s',                             &
     209                             '&dt_w    = ', dt_w, ' s',                             &
     210                             '&dt_diff = ', dt_diff, ' s',                          &
     211                             '&u_max   = ', u_max, ' m/s   k=', u_max_ijk(1),       &
     212                             '  j=', u_max_ijk(2), '  i=', u_max_ijk(3),            &
     213                             '&v_max   = ', v_max, ' m/s   k=', v_max_ijk(1),       &
     214                             '  j=', v_max_ijk(2), '  i=', v_max_ijk(3),            &
     215                             '&w_max   = ', w_max, ' m/s   k=', w_max_ijk(1),       &
     216                             '  j=', w_max_ijk(2), '  i=', w_max_ijk(3)
     217          CALL message( 'timestep', 'PA0312', 0, 1, 0, 6, 0 )
    218218!
    219219!--       In case of coupled runs inform the remote model of the termination
  • palm/trunk/SOURCE/user_actions.f90

    r226 r258  
    22
    33!------------------------------------------------------------------------------!
    4 ! Actual revisions:
     4! Current revisions:
    55! -----------------
    6 !
     6! Output of messages replaced by message handling routine.
     7!
    78!
    89! Former revisions:
     
    113114
    114115          CASE DEFAULT
    115              IF ( myid == 0 )  PRINT*, '+++ user_actions: unknown location "', &
    116                                        location, '"'
    117              CALL local_stop
     116             message_string = 'unknown location "' // location // '"'
     117             CALL message( 'user_actions', 'UI0001', 1, 2, 0, 6, 0 )
    118118
    119119       END SELECT
     
    168168
    169169          CASE ( 'before_timestep', 'after_integration', 'after_timestep' )
    170              IF ( myid == 0 )  THEN
    171                 PRINT*, '+++ user_actions: location "', location, '" is not ', &
     170             message_string = 'location "' // location // '" is not ' // &
    172171                             'allowed to be called with parameters "i" and "j"'
    173              ENDIF
    174              CALL local_stop
     172             CALL message( 'user_actions', 'UI0002', 1, 2, 0, 6, 0 )
    175173
    176174
    177175          CASE DEFAULT
    178              IF ( myid == 0 )  PRINT*, '+++ user_actions: unknown location "', &
    179                                        location, '"'
    180              CALL local_stop
    181 
     176             message_string = 'unknown location "' // location // '"'
     177             CALL message( 'user_actions', 'UI0001', 1, 2, 0, 6, 0 )
     178             
    182179
    183180       END SELECT
  • palm/trunk/SOURCE/user_data_output_dvrp.f90

    r246 r258  
    22
    33!------------------------------------------------------------------------------!
    4 ! Actual revisions:
     4! Current revisions:
    55! -----------------
     6! Output of messages replaced by message handling routine.
    67! Clipping implemented
    78!
     
    5859!--       wrong character string that is neither recognized in data_output_dvrp
    5960!--       nor here in user_data_output_dvrp.
    60           IF ( myid == 0 )  THEN
    61              PRINT*,'+++ (user_)data_output_dvrp: no output possible for: ', &
    62                   output_variable
    63           ENDIF
     61          WRITE( message_string, * ) 'no output possible for: ', &
     62                                     output_variable
     63          CALL message( 'user_data_output_dvrp', 'UI0003', 0, 0, 0, 6, 0 )
     64         
    6465
    6566    END SELECT
  • palm/trunk/SOURCE/user_dvrp_coltab.f90

    r226 r258  
    22
    33!------------------------------------------------------------------------------!
    4 ! Actual revisions:
     4! Current revisions:
    55! -----------------
    6 !
     6! Output of messages replaced by message handling routine.
     7!
    78!
    89! Former revisions:
     
    1718! Definition of the colour table to be used by the dvrp software.
    1819!------------------------------------------------------------------------------!
    19 
     20   
     21    USE control_parameters
    2022    USE dvrp_variables
    2123    USE pegrid
     
    3739
    3840       CASE DEFAULT
    39           IF ( myid == 0 )  PRINT*, '+++ user_dvrp_coltab: unknown mode "', &
    40                                     mode, '"'
    41           CALL local_stop
     41          message_string = 'unknown mode "' // mode // '"'
     42          CALL message( 'user_dvrp_coltab', 'UI0004', 1, 2, 0, 6, 0 )
     43
    4244
    4345    END SELECT
  • palm/trunk/SOURCE/user_init_grid.f90

    r256 r258  
    22
    33!------------------------------------------------------------------------------!
    4 ! Actual revisions:
     4! Current revisions:
    55! -----------------
     6! Output of messages replaced by message handling routine.
    67! add 'single_street_canyon' as standard topography case
    78! -topography_grid_convention
     
    4849!--       Here the user can define his own topography.
    4950!--       After definition, please remove the following three lines!
    50           PRINT*, '+++ user_init_grid: topography "', &
    51                topography, '" not available yet'
    52           CALL local_stop
     51          message_string = 'topography "' // topography // '" not available yet'
     52          CALL message( 'user_init_grid', 'UI0005', 1, 2, 0, 6, 0 )
    5353
    5454       CASE DEFAULT
     
    5757!--       wrong character string that is neither recognized in init_grid nor
    5858!--       here in user_init_grid.
    59           PRINT*, '+++ (user_)init_grid: unknown topography "', &
    60                topography, '"'
    61           CALL local_stop
     59          message_string = 'unknown topography "' // topography // '"'
     60          CALL message( 'user_init_grid', 'UI0006', 1, 2, 0, 6, 0 )
    6261
    6362    END SELECT
  • palm/trunk/SOURCE/user_init_plant_canopy.f90

    r226 r258  
    22
    33!------------------------------------------------------------------------------!
    4 ! Actual revisions:
     4! Current revisions:
    55! -----------------
    6 !
     6! Output of messages replaced by message handling routine.
     7!
    78!
    89! Former revisions:
     
    5960!--       After definition, please
    6061!--       remove the following three lines!
    61           PRINT*, '+++ user_init_plant_canopy: canopy_mode "', &
    62                canopy_mode, '" not available yet'
    63 
     62          message_string = 'canopy_mode "' // canopy_mode // '" not available yet'
     63          CALL message( 'user_init_plant_canopy', 'UI0007', 0, 1, 0, 6, 0 )
     64         
    6465       CASE DEFAULT
    6566!
     
    6768!--       wrong character string that is neither recognized in init_3d_model nor
    6869!--       here in user_init_plant_canopy.
    69           PRINT*, '+++ user_init_plant_canopy: unknown canopy_mode "', &
    70                canopy_mode, '"'
    71           CALL local_stop
     70          message_string = 'unknown canopy_mode "' // canopy_mode // '"'
     71          CALL message( 'user_init_plant_canopy', 'UI0008', 1, 2, 0, 6, 0 )
    7272
    7373    END SELECT
  • palm/trunk/SOURCE/user_parin.f90

    r256 r258  
    22
    33!------------------------------------------------------------------------------!
    4 ! Actual revisions:
     4! Current revisions:
    55! -----------------
     6! Output of messages replaced by message handling routine.
    67! topography_grid_convention moved to inipar
    78!
     
    7475    IF ( TRIM( initializing_actions ) == 'read_restart_data' )  THEN
    7576       IF ( max_pr_user /= max_pr_user_tmp )  THEN
    76           PRINT*, '+++ user_parin: the number of user-defined profiles given in'
    77           PRINT*, '                data_output_pr (', max_pr_user_tmp, ' doe', &
    78                                    's not match the one'
    79           PRINT*, '                found in the restart file (', max_pr_user, &
    80                                    ')'
    81           CALL local_stop
     77          WRITE( message_string, * ) 'the number of user-defined profiles given in ', &
     78                                     '&data_output_pr (', max_pr_user_tmp, ') doe',    &
     79                                     'snot match the one ',                           &
     80                                     '&found in the restart file (', max_pr_user,    &
     81                                     ')'
     82          CALL message( 'user_parin', 'UI0009', 1, 2, 0, 6, 0 )
    8283       ENDIF
    8384    ELSE
  • palm/trunk/SOURCE/user_read_restart_data.f90

    r226 r258  
    55
    66!------------------------------------------------------------------------------!
    7 ! Actual revisions:
     7! Current revisions:
    88! -----------------
    9 !
     9! Output of messages replaced by message handling routine.
     10!
    1011!
    1112! Former revisions:
     
    8182!
    8283!                CASE DEFAULT
    83 !                   PRINT*, '+++ user_init: unknown variable named "', &
    84 !                           TRIM( field_char ), '" found in'
    85 !                   PRINT*, '               data from prior run on PE ', myid
    86 !                   CALL local_stop
     84!                   WRITE( message_string, * ) 'unknown variable named "',        &
     85!                                               TRIM( field_char ), '" found in', &
     86!                                              '&data from prior run on PE ', myid
     87!                   CALL message( 'user_spectra', 'UI0012', 1, 2, 0, 6, 0 )
    8788!
    8889!             END SELECT
  • palm/trunk/SOURCE/user_spectra.f90

    r226 r258  
    22
    33!------------------------------------------------------------------------------!
    4 ! Actual revisions:
     4! Current revisions:
    55! -----------------
    6 !
     6! Output of messages replaced by message handling routine.
    77!
    88! Former revisions:
     
    2121
    2222    USE arrays_3d
     23    USE control_parameters
    2324    USE indices
    2425    USE spectrum
     
    5253       
    5354          CASE DEFAULT
    54              PRINT*, '+++ user_spectra/preprocess: Spectra of ', &
    55                   TRIM( data_output_sp(m) ), ' can not be calculated'
    56          
     55             message_string = 'Spectra of ' // &
     56                              TRIM( data_output_sp(m) ) // ' can not be calculated'
     57             CALL message( 'user_spectra', 'UI0010', 0, 0, 0, 6, 0 )
     58           
    5759       END SELECT
    5860
     
    6971
    7072          CASE DEFAULT
    71              PRINT*, '+++ user_spectra/data_output: Spectra of ', &
    72                           TRIM( data_output_sp(m) ), ' are not defined'
    73 
     73             message_string = 'Spectra of ' //  &
     74                              TRIM( data_output_sp(m) ) // ' are not defined'
     75             CALL message( 'user_spectra', 'UI0011', 0, 0, 0, 6, 0 )
     76             
    7477          END SELECT
    7578
Note: See TracChangeset for help on using the changeset viewer.