Ignore:
Timestamp:
Jan 21, 2019 1:02:11 AM (3 years ago)
Author:
knoop
Message:

Some interface calls moved to module_interface + cleanup

File:
1 edited

Legend:

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

    r3677 r3685  
    2525! -----------------
    2626! $Id$
     27! Some interface calls moved to module_interface + cleanup
     28!
     29! 3677 2019-01-17 09:07:06Z moh.hefny
    2730! Removed most_method
    2831!
     
    24952498       REAL(wp), DIMENSION(:), ALLOCATABLE ::  bound, bound_root_fr  !< temporary arrays for storing index bounds
    24962499       REAL(wp), DIMENSION(:), ALLOCATABLE ::  pr_soil_init !< temporary array used for averaging soil profiles
     2500
     2501       CALL location_message( 'initializing land surface model', .FALSE. )
    24972502!
    24982503!--    If no cloud physics is used, rho_surface has not been calculated before
     
    47604765             ENDIF
    47614766          ENDDO
    4762        ENDDO     
     4767       ENDDO
     4768
     4769       CALL location_message( 'finished', .TRUE. )
    47634770
    47644771    END SUBROUTINE lsm_init
Note: See TracChangeset for help on using the changeset viewer.