Ignore:
Timestamp:
May 29, 2018 8:02:15 AM (3 years ago)
Author:
Giersch
Message:

Remaining error messages revised, comments extended

File:
1 edited

Legend:

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

    r3045 r3046  
    2121! Current revisions:
    2222! -----------------
    23 !
     23! Error messages revised
    2424!
    2525! Former revisions:
     
    283283                TRIM( coupling_mode_remote ),                                  &
    284284                '" terminated',                                                &
    285                 ' with terminate_coupled_remote = ',                           &
     285                '&with terminate_coupled_remote = ',                           &
    286286                terminate_coupled_remote,                                      &
    287                 ' local model  "', TRIM( coupling_mode ),                      &
     287                '&local model  "', TRIM( coupling_mode ),                      &
    288288                '" has',                                                       &
    289                 ' terminate_coupled = ',                                       &
     289                '&terminate_coupled = ',                                       &
    290290                terminate_coupled
    291291            CALL message( 'vnest_init_fine', 'PA0310', 1, 2, 0, 6, 0 )
     
    27832783                TRIM( coupling_mode_remote ),                                  &
    27842784                '" terminated',                                                &
    2785                 ' with terminate_coupled_remote = ',                           &
     2785                '&with terminate_coupled_remote = ',                           &
    27862786                terminate_coupled_remote,                                      &
    2787                 ' local model  "', TRIM( coupling_mode ),                      &
     2787                '&local model  "', TRIM( coupling_mode ),                      &
    27882788                '" has',                                                       &
    2789                 ' terminate_coupled = ',                                       &
     2789                '&terminate_coupled = ',                                       &
    27902790                terminate_coupled
    27912791            CALL message( 'vnest_anterpolate', 'PA0310', 1, 2, 0, 6, 0 )
     
    33313331                TRIM( coupling_mode_remote ),                                  &
    33323332                '" terminated',                                                &
    3333                 ' with terminate_coupled_remote = ',                           &
     3333                '&with terminate_coupled_remote = ',                           &
    33343334                terminate_coupled_remote,                                      &
    3335                 ' local model  "', TRIM( coupling_mode ),                      &
     3335                '&local model  "', TRIM( coupling_mode ),                      &
    33363336                '" has',                                                       &
    3337                 ' terminate_coupled = ',                                       &
     3337                '&terminate_coupled = ',                                       &
    33383338                terminate_coupled
    33393339            CALL message( 'vnest_anterpolate_e', 'PA0310', 1, 2, 0, 6, 0 )
Note: See TracChangeset for help on using the changeset viewer.