	  r      k820309    Y
          11.1        ³ÌQ                                                                                                           
       tropopause_mod.F TROPOPAUSE_MOD              CLEANUP_TROPOPAUSE CHECK_VAR_TROP COPY_FULL_TROP DIAG_TROPOPAUSE GET_MIN_TPAUSE_LEVEL GET_MAX_TPAUSE_LEVEL GET_TPAUSE_LEVEL ITS_IN_THE_TROP ITS_IN_THE_STRAT READ_TROPOPAUSE SAVE_FULL_TROP #         @                                                     #CLEANUP_TROPOPAUSE%ALLOCATED                  @                                 ALLOCATED #         @                                                     #CHECK_VAR_TROP%REPEAT    #CHECK_VAR_TROP%MAXVAL    #CHECK_VAR_TROP%MINVAL                                                                                                                           @                                 REPEAT               @                                 MAXVAL               @                                 MINVAL #         @                                                                                                                                                               #         @                                                     #DIAG_TROPOPAUSE%SUM 	                                                                                                                              @                            	     SUM %         @                                 
                            %         @                                                             %         @                                                          #GET_TPAUSE_LEVEL%REPEAT    #I    #J                                                                                                                                   @                                 REPEAT           
  @@                                                   
  @@                                         %         @                                                           #I    #J    #L              
  @@                                                   
  @@                                                   
  @@                                         %         @                                                            #I    #J    #L              
  @@                                                   
  @@                                                   
  @@                                         #         @                                                     #READ_TROPOPAUSE%SUM    #READ_TROPOPAUSE%TRIM    #READ_TROPOPAUSE%REPEAT    #READ_TROPOPAUSE%MAXVAL    #READ_TROPOPAUSE%MINVAL                                                                                                                               @                                 SUM               @                                 TRIM               @                                 REPEAT               @                                 MAXVAL               @                                 MINVAL #         @                                                                                                                                                                      (      fn#fn $   È   Ì   b   uapp(TROPOPAUSE_MOD #   ”  j       CLEANUP_TROPOPAUSE -   þ  B      CLEANUP_TROPOPAUSE%ALLOCATED    @        CHECK_VAR_TROP &   B  ?      CHECK_VAR_TROP%REPEAT &   �  ?      CHECK_VAR_TROP%MAXVAL &   À  ?      CHECK_VAR_TROP%MINVAL    ÿ  ±       COPY_FULL_TROP     °  Î       DIAG_TROPOPAUSE $   ~  <      DIAG_TROPOPAUSE%SUM %   º  P       GET_MIN_TPAUSE_LEVEL %   
  P       GET_MAX_TPAUSE_LEVEL !   Z  ì       GET_TPAUSE_LEVEL (   F  ?      GET_TPAUSE_LEVEL%REPEAT #   …  @   a   GET_TPAUSE_LEVEL%I #   Å  @   a   GET_TPAUSE_LEVEL%J       e       ITS_IN_THE_TROP "   j  @   a   ITS_IN_THE_TROP%I "   ª  @   a   ITS_IN_THE_TROP%J "   ê  @   a   ITS_IN_THE_TROP%L !   *	  e       ITS_IN_THE_STRAT #   �	  @   a   ITS_IN_THE_STRAT%I #   Ï	  @   a   ITS_IN_THE_STRAT%J #   
  @   a   ITS_IN_THE_STRAT%L     O
  <      READ_TROPOPAUSE $   ‹  <      READ_TROPOPAUSE%SUM %   Ç  =      READ_TROPOPAUSE%TRIM '     ?      READ_TROPOPAUSE%REPEAT '   C  ?      READ_TROPOPAUSE%MAXVAL '   ‚  ?      READ_TROPOPAUSE%MINVAL    Á  ±       SAVE_FULL_TROP 