Ignore:
Timestamp:
Sep 24, 2018 3:42:55 PM (6 years ago)
Author:
knoop
Message:

Modularization of all bulk cloud physics code components

File:
1 edited

Legend:

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

    r3135 r3274  
    2525! -----------------
    2626! $Id$
     27! Modularization of all bulk cloud physics code components
     28!
     29! 3135 2018-07-16 14:43:04Z gronemeier
    2730! Bugfix: add +1 to c_3 according to Sogachev et al. (2012)
    2831!
     
    173176        ONLY:  dd2zu, ddzu, ddzw, dzu, dzw, pt_init, q_init, ug, u_init,       &
    174177               vg, v_init, zu
     178
     179    USE basic_constants_and_equations_mod,                                     &
     180        ONLY:  g, kappa, pi
    175181   
    176182    USE control_parameters,                                                    &
    177         ONLY:  constant_diffusion, constant_flux_layer, dissipation_1d, f, g,  &
     183        ONLY:  constant_diffusion, constant_flux_layer, dissipation_1d, f,     &
    178184               humidity, ibc_e_b, intermediate_timestep_count,                 &
    179                intermediate_timestep_count_max, kappa, km_constant,            &
     185               intermediate_timestep_count_max, km_constant,                   &
    180186               message_string, mixing_length_1d, prandtl_number,               &
    181187               roughness_length, run_description_header, simulated_time_chr,   &
     
    989995
    990996
    991     USE constants,                                                             &
    992         ONLY:  pi
    993 
    994997    IMPLICIT NONE
    995998
Note: See TracChangeset for help on using the changeset viewer.