Ignore:
Timestamp:
Feb 27, 2019 8:18:02 AM (5 years ago)
Author:
raasch
Message:

unused variables removed from rrd-subroutines parameter list

File:
1 edited

Legend:

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

    r3724 r3767  
    2525! -----------------
    2626! $Id$
     27! unused variable for file index removed from rrd-subroutines parameter list
     28!
     29! 3724 2019-02-06 16:28:23Z kanani
    2730! Correct double-used log_point_s unit
    2831!
     
    17101713!> This routine reads the respective restart data for the bulk cloud module.
    17111714!------------------------------------------------------------------------------!
    1712     SUBROUTINE bcm_rrd_local( i, k, nxlf, nxlc, nxl_on_file, nxrf, nxrc,       &
     1715    SUBROUTINE bcm_rrd_local( k, nxlf, nxlc, nxl_on_file, nxrf, nxrc,          &
    17131716                              nxr_on_file, nynf, nync, nyn_on_file, nysf,      &
    17141717                              nysc, nys_on_file, tmp_2d, tmp_3d, found )
     
    17241727       IMPLICIT NONE
    17251728
    1726        INTEGER(iwp) ::  i               !<
    17271729       INTEGER(iwp) ::  k               !<
    17281730       INTEGER(iwp) ::  nxlc            !<
Note: See TracChangeset for help on using the changeset viewer.