Changeset 3685 for palm/trunk/SOURCE/surface_layer_fluxes_mod.f90
- Timestamp:
- Jan 21, 2019 1:02:11 AM (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/surface_layer_fluxes_mod.f90
r3668 r3685 26 26 ! ----------------- 27 27 ! $Id$ 28 ! Some interface calls moved to module_interface + cleanup 29 ! 30 ! 3668 2019-01-14 12:49:24Z maronga 28 31 ! Removed methods "circular" and "lookup" 29 32 ! … … 729 732 730 733 734 CALL location_message( 'initializing surface layer', .FALSE. ) 731 735 732 736 … … 739 743 IF ( surf_usm_h%ns >= 1 ) surf_usm_h%ol = 1.0E10_wp 740 744 ENDIF 745 746 CALL location_message( 'finished', .TRUE. ) 741 747 742 748 END SUBROUTINE init_surface_layer_fluxes
Note: See TracChangeset
for help on using the changeset viewer.