Ignore:
Timestamp:
Jul 21, 2017 12:47:43 PM (4 years ago)
Author:
suehring
Message:

large-scale forcing and nudging modularized

File:
1 edited

Legend:

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

    r2296 r2320  
    2525! -----------------
    2626! $Id$
     27! Modularize large-scale forcing and nudging
     28!
     29! 2296 2017-06-28 07:53:56Z maronga
    2730! Enabled output of radiation quantities for radiation_scheme = 'constant'
    2831!
     
    243246               momentumflux_output_conversion, nc, nr, p, prho, prr, pt, q,    &
    244247               qc, ql, qr, rho_air, rho_air_zw, rho_ocean, s,                  &
    245                sa, td_lsa_lpt, td_lsa_q, td_sub_lpt, td_sub_q, time_vert, u,   &
    246                ug, v, vg, vpt, w, w_subs, waterflux_output_conversion, zw
     248               sa, u, ug, v, vg, vpt, w, w_subs, waterflux_output_conversion, zw
    247249       
    248250    USE cloud_parameters,                                                      &
     
    272274    USE land_surface_model_mod,                                                &
    273275        ONLY:   m_soil_h, nzb_soil, nzt_soil, t_soil_h
     276
     277    USE lsf_nudging_mod,                                                       &
     278        ONLY:   td_lsa_lpt, td_lsa_q, td_sub_lpt, td_sub_q, time_vert
    274279
    275280    USE netcdf_interface,                                                      &
Note: See TracChangeset for help on using the changeset viewer.