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

Some interface calls moved to module_interface + cleanup

File:
1 edited

Legend:

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

    r3655 r3685  
    2626! -----------------
    2727! $Id$
     28! Some interface calls moved to module_interface + cleanup
     29!
     30! 3655 2019-01-07 16:51:22Z knoop
    2831! Implementation of the PALM module interface
    2932!
     
    11821185    INTEGER(iwp) :: j
    11831186   
     1187    CALL location_message( 'initializing SALSA model', .TRUE. )
     1188   
    11841189    bin_low_limits = 0.0_wp
    11851190    nsect          = 0.0_wp
     
    13171322       CALL salsa_set_source
    13181323    ENDIF
     1324   
     1325    CALL location_message( 'finished', .TRUE. )
    13191326   
    13201327 END SUBROUTINE salsa_init
Note: See TracChangeset for help on using the changeset viewer.