include file: C_LAPSE 10
C*L------------------COMDECK C_LAPSE ----------------------------------    C_LAPSE.2      
      REAL LAPSE,LAPSE_TROP                                                C_LAPSE.3      
      PARAMETER(LAPSE=0.0065)     !  NEAR SURFACE LAPSE RATE               C_LAPSE.4      
      PARAMETER(LAPSE_TROP=0.002) !  TROPOPAUSE LAPSE RATE                 C_LAPSE.5      
C*----------------------------------------------------------------------   C_LAPSE.6