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

Remaining error messages revised, comments extended

File:
1 edited

Legend:

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

    r3045 r3046  
    2020! Current revisions:
    2121! ------------------
    22 !
     22! Error messages revised
    2323!
    2424! Former revisions:
     
    41104110       IF ( end_time /= end_time_root )  THEN
    41114111          WRITE( message_string, * )  'mismatch between root model and ',      &
    4112                'child settings: end_time(root) = ', end_time_root,             &
    4113                ' end_time(child) = ', end_time, ' child value is set',         &
     4112               'child settings:& end_time(root) = ', end_time_root,            &
     4113               '& end_time(child) = ', end_time, '& child value is set',       &
    41144114               ' to root value'
    41154115          CALL message( 'pmci_check_setting_mismatches', 'PA0419', 0, 1, 0, 6, &
     
    41264126       IF ( restart_time /= restart_time_root )  THEN
    41274127          WRITE( message_string, * )  'mismatch between root model and ',      &
    4128                'child settings: restart_time(root) = ', restart_time_root,     &
    4129                ' restart_time(child) = ', restart_time, ' child ',             &
     4128               'child settings: & restart_time(root) = ', restart_time_root,   &
     4129               '& restart_time(child) = ', restart_time, '& child ',           &
    41304130               'value is set to root value'
    41314131          CALL message( 'pmci_check_setting_mismatches', 'PA0419', 0, 1, 0, 6, &
     
    41424142       IF ( dt_restart /= dt_restart_root )  THEN
    41434143          WRITE( message_string, * )  'mismatch between root model and ',      &
    4144                'child settings: dt_restart(root) = ', dt_restart_root,          &
    4145                ' dt_restart(child) = ', dt_restart, ' child ',                 &
     4144               'child settings: & dt_restart(root) = ', dt_restart_root,       &
     4145               '& dt_restart(child) = ', dt_restart, '& child ',               &
    41464146               'value is set to root value'
    41474147          CALL message( 'pmci_check_setting_mismatches', 'PA0419', 0, 1, 0, 6, &
     
    41584158       IF ( time_restart /= time_restart_root )  THEN
    41594159          WRITE( message_string, * )  'mismatch between root model and ',      &
    4160                'child settings: time_restart(root) = ', time_restart_root,  &
    4161                ' time_restart(child) = ', time_restart, ' child ',             &
     4160               'child settings: & time_restart(root) = ', time_restart_root,   &
     4161               '& time_restart(child) = ', time_restart, '& child ',           &
    41624162               'value is set to root value'
    41634163          CALL message( 'pmci_check_setting_mismatches', 'PA0419', 0, 1, 0, 6, &
Note: See TracChangeset for help on using the changeset viewer.