Ignore:
Timestamp:
Feb 7, 2019 10:11:02 AM (3 years ago)
Author:
raasch
Message:

modifications to avoid compiler warnings about unused variables, temperton-fft: GOTO statements replaced, file re-formatted corresponding to coding standards, ssh-calls for compilations on remote systems modified to avoid output of login messages on specific systems changed again (palmbuild, reverted as before r3549), error messages for failed restarts extended (palmrun)

File:
1 edited

Legend:

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

    r3655 r3725  
    2525! -----------------
    2626! $Id$
     27! preprocessor directives removed to avoid compiler warnings
     28!
     29! 3655 2019-01-07 16:51:22Z knoop
    2730! Corrected "Former revisions" section
    2831!
     
    6164 SUBROUTINE data_log( array, i1, i2, j1, j2, k1, k2 )
    6265 
    63 #if defined( __logging )
    64 
    6566    USE control_parameters,                                                    &
    6667        ONLY:  log_message, simulated_time
     
    9899    WRITE ( 20 )  array
    99100
    100 #endif
    101101 END SUBROUTINE data_log
    102102
     
    110110 
    111111 SUBROUTINE data_log_2d( array, i1, i2, j1, j2)
    112 
    113 #if defined( __logging )
    114112
    115113    USE control_parameters,                                                    &
     
    146144    WRITE ( 20 )  array
    147145
    148 #endif
    149146 END SUBROUTINE data_log_2d
    150147
     
    158155 
    159156 SUBROUTINE data_log_2d_int( array, i1, i2, j1, j2)
    160 
    161 #if defined( __logging )
    162157
    163158    USE control_parameters,                                                    &
     
    194189    WRITE ( 20 )  array
    195190
    196 #endif
    197191 END SUBROUTINE data_log_2d_int
Note: See TracChangeset for help on using the changeset viewer.