Ignore:
Timestamp:
May 30, 2017 5:47:52 PM (4 years ago)
Author:
suehring
Message:

Adjustments according new topography and surface-modelling concept implemented

File:
1 edited

Legend:

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

    r2179 r2232  
    2020! Current revisions:
    2121! -----------------
    22 !
     22! Renamed wall_flags_0 and wall_flags_00 into advc_flags_1 and advc_flags_2,
     23! respectively, within copyin statement. Moreover, introduced further flag
     24! array wall_flags_0.
     25! Remove unused variables from ONLY list.
    2326!
    2427! Former revisions:
     
    165168
    166169    USE control_parameters,                                                    &
     170
    167171        ONLY:  cloud_physics, constant_diffusion, coupling_char, coupling_mode,&
    168172               do2d_at_begin, do3d_at_begin, humidity, initializing_actions,   &
    169                io_blocks, io_group,                                            &
     173               land_surface, io_blocks, io_group,                              &
    170174               large_scale_forcing, message_string, microphysics_seifert,      &
    171175               nest_domain, neutral,                                           &
     
    179183        ONLY:  cpu_log, log_point, cpu_statistics
    180184
    181     USE grid_variables,                                                        &
    182         ONLY:  fxm, fxp, fym, fyp, fwxm, fwxp, fwym, fwyp, wall_e_x, wall_e_y, &
    183                wall_u, wall_v, wall_w_x, wall_w_y
    184 
    185185    USE indices,                                                               &
    186         ONLY:  nbgp, ngp_2dh, ngp_2dh_s_inner, nzb_diff_s_inner, nzb_diff_s_outer,   &
    187                nzb_diff_u, nzb_diff_v, nzb_s_inner, nzb_s_outer, nzb_u_inner,  &
    188                nzb_u_outer, nzb_v_inner, nzb_v_outer, nzb_w_inner,             &
    189                nzb_w_outer, rflags_invers, rflags_s_inner, wall_flags_0,       &
    190                wall_flags_00
     186        ONLY:  nbgp
    191187
    192188    USE kinds
    193189
    194190    USE land_surface_model_mod,                                                &
    195         ONLY:  land_surface, lsm_last_actions
     191        ONLY:  lsm_last_actions
    196192
    197193    USE ls_forcing_mod,                                                        &
     
    213209    USE radiation_model_mod,                                                   &
    214210        ONLY:  radiation, radiation_last_actions
    215 
    216     USE statistics,                                                            &
    217         ONLY:  hom, rmask, weight_pres, weight_substep
    218 
    219     USE surface_layer_fluxes_mod,                                              &
    220         ONLY:  pt1, qv1, uv_total
    221        
     211       
    222212    USE urban_surface_mod,                                                     &
    223213        ONLY:  usm_write_restart_data       
Note: See TracChangeset for help on using the changeset viewer.