Changeset 3428 for palm


Ignore:
Timestamp:
Oct 25, 2018 12:32:05 PM (6 years ago)
Author:
gronemeier
Message:

Rename td_XXX_lpt to td_XXX_thetal

File:
1 edited

Legend:

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

    r3347 r3428  
    2525! -----------------
    2626! $Id$
     27! Rename td_XXX_lpt to td_XXX_thetal
     28!
     29! 3347 2018-10-15 14:21:08Z suehring
    2730! Offline nesting parts are moved to an independent module nesting_offl_mod
    2831!
     
    249252       
    250253
    251           CASE ( 'td_lsa_lpt' )
     254          CASE ( 'td_lsa_thetal' )
    252255             IF (  .NOT.  large_scale_forcing )  THEN
    253256                message_string = 'data_output_pr = ' //                        &
     
    278281                hom(:,2,82,:) = SPREAD( zu, 2, statistic_regions+1 )
    279282             ENDIF
    280           CASE ( 'td_sub_lpt' )
     283          CASE ( 'td_sub_thetal' )
    281284             IF (  .NOT.  large_scale_forcing )  THEN
    282285                message_string = 'data_output_pr = ' //                        &
     
    308311             ENDIF
    309312
    310           CASE ( 'td_nud_lpt' )
     313          CASE ( 'td_nud_thetal' )
    311314             IF (  .NOT.  nudging )  THEN
    312315                message_string = 'data_output_pr = ' //                        &
Note: See TracChangeset for help on using the changeset viewer.