Ignore:
Timestamp:
Dec 20, 2018 1:51:36 AM (3 years ago)
Author:
knoop
Message:

M Makefile

File:
1 edited

Legend:

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

    r3636 r3637  
    2626! -----------------
    2727! $Id$
     28! Implementation of the PALM module interface
     29!
     30! 3636 2018-12-19 13:48:34Z raasch
    2831! nopointer option removed
    2932!
     
    9194
    9295    USE control_parameters
    93        
     96
    9497    USE indices,                                                               &
    9598        ONLY:  nbgp, nx, nxl, nxlg, nxr, nxrg, ny, nyn, nyng, nys, nysg, nzb,  &
     
    19561959    INTEGER(iwp) ::  g  !<
    19571960
     1961    IF ( simulated_time >= time_since_reference_point )  THEN
    19581962
    19591963    SELECT CASE ( mod_count )
     
    20102014
    20112015    END SELECT
     2016
     2017    ENDIF
    20122018
    20132019 END SUBROUTINE salsa_swap_timelevel
Note: See TracChangeset for help on using the changeset viewer.