Go to the source code of this file.
 | 
| !$Id mode_top_bound COMMON comconstr omeg dissip_zref ihf INTEGER lcl REAL dtvr!dynamical time  | step (in s) REAL daysec!length(in s) of a standard day REAL pi!something like 3.14159....REAL dtphys!(s) time step for the physics REAL dtdiss!(s) time step for the dissipation REAL rad!(m) radius of the planet REAL r!Reduced Gas const ant r | 
|   | 
 | 
| !$Id  | __pad20__ | 
|   | 
| !$Id  | jm | 
|   | 
| !$Id  | lllm | 
|   | 
| !$Id  | imp1 | 
|   | 
| !$Id  | jmp1 | 
|   | 
| !$Id  | lllmm1 | 
|   | 
| !$Id  | lllmp1 | 
|   | 
| !$Id  | lcl | 
|   | 
| !$Id &&  | iflag_top_bound | 
|   | 
| !$Id mode_top_bound COMMON comconstr  | dtvr | 
|   | 
| !$Id mode_top_bound COMMON comconstr  | daysec | 
|   | 
| !$Id mode_top_bound COMMON comconstr &&  | pi | 
|   | 
| !$Id mode_top_bound COMMON comconstr  | dtphys | 
|   | 
| !$Id mode_top_bound COMMON comconstr  | dtdiss | 
|   | 
| !$Id mode_top_bound COMMON comconstr  | rad | 
|   | 
| !$Id mode_top_bound COMMON comconstr  | r | 
|   | 
| !$Id mode_top_bound COMMON comconstr  | cpp | 
|   | 
| !$Id mode_top_bound COMMON comconstr  | kappa | 
|   | 
| !$Id mode_top_bound COMMON comconstr  | cotot | 
|   | 
| !$Id mode_top_bound COMMON comconstr  | unsim | 
|   | 
| !$Id mode_top_bound COMMON comconstr  | g | 
|   | 
| !$Id mode_top_bound COMMON comconstr omeg  | dissip_factz | 
|   | 
| !$Id mode_top_bound COMMON comconstr omeg  | dissip_deltaz | 
|   | 
| !$Id mode_top_bound COMMON comconstr omeg dissip_zref  | tau_top_bound | 
|   | 
| !$Id mode_top_bound COMMON comconstr omeg dissip_zref &&  | daylen | 
|   | 
| !$Id mode_top_bound COMMON comconstr omeg dissip_zref  | year_day | 
|   | 
| !$Id mode_top_bound COMMON comconstr omeg dissip_zref  | molmass | 
|   | 
| !$Id mode_top_bound COMMON comconstr omeg dissip_zref ihf INTEGER  | im | 
|   | 
| !$Id mode_top_bound COMMON comconstr omeg dissip_zref ihf INTEGER lcl REAL dtvr!dynamical time  | mu | 
|   | 
| !$Id mode_top_bound COMMON comconstr omeg dissip_zref ihf INTEGER lcl REAL dtvr!dynamical time dissip_zref!top_bound  | sponge | 
|   | 
      
        
          | ! $Id mode_top_bound COMMON comconstr omeg dissip_zref ihf INTEGER lcl REAL dtvr ! dynamical time step  | 
          ( | 
          in  | 
          s | ) | 
           const | 
        
      
 
 
      
        
          | ! $Id mode_top_bound COMMON comconstr cotot | 
        
      
 
 
      
        
          | ! $Id mode_top_bound COMMON comconstr cpp | 
        
      
 
 
      
        
          | ! $Id mode_top_bound COMMON comconstr omeg dissip_zref & & daylen | 
        
      
 
 
      
        
          | ! $Id mode_top_bound COMMON comconstr daysec | 
        
      
 
 
      
        
          | ! $Id mode_top_bound COMMON comconstr omeg dissip_zref ihf INTEGER lcl REAL dtvr ! dynamical time dissip_deltaz | 
        
      
 
 
      
        
          | ! $Id mode_top_bound COMMON comconstr omeg dissip_factz | 
        
      
 
 
      
        
          | ! $Id mode_top_bound COMMON comconstr dtdiss | 
        
      
 
 
      
        
          | ! $Id mode_top_bound COMMON comconstr dtphys | 
        
      
 
 
      
        
          | ! $Id mode_top_bound COMMON comconstr dtvr | 
        
      
 
 
      
        
          | ! $Id mode_top_bound COMMON comconstr g | 
        
      
 
 
      
        
          | ! $Id & & iflag_top_bound | 
        
      
 
 
      
        
          | ! $Id mode_top_bound COMMON comconstr omeg dissip_zref ihf INTEGER im | 
        
      
 
 
      
        
          | ! $Id mode_top_bound COMMON comconstr omeg dissip_zref ihf INTEGER imp1 | 
        
      
 
 
      
        
          | ! $Id mode_top_bound COMMON comconstr omeg dissip_zref ihf INTEGER jm | 
        
      
 
 
      
        
          | ! $Id mode_top_bound COMMON comconstr omeg dissip_zref ihf INTEGER jmp1 | 
        
      
 
 
      
        
          | ! $Id mode_top_bound COMMON comconstr kappa | 
        
      
 
 
      
        
          | ! $Id mode_top_bound COMMON comconstr omeg dissip_zref ihf INTEGER lllm | 
        
      
 
 
      
        
          | ! $Id mode_top_bound COMMON comconstr omeg dissip_zref ihf INTEGER lllmm1 | 
        
      
 
 
      
        
          | ! $Id mode_top_bound COMMON comconstr omeg dissip_zref ihf INTEGER lllmp1 | 
        
      
 
 
      
        
          | ! $Id mode_top_bound COMMON comconstr omeg dissip_zref molmass | 
        
      
 
 
      
        
          | ! $Id mode_top_bound COMMON comconstr omeg dissip_zref ihf INTEGER lcl REAL dtvr ! dynamical time mu | 
        
      
 
 
      
        
          | ! $Id mode_top_bound COMMON comconstr & & pi | 
        
      
 
 
      
        
          | ! $Id mode_top_bound COMMON comconstr r | 
        
      
 
 
      
        
          | ! $Id mode_top_bound COMMON comconstr rad | 
        
      
 
 
      
        
          | ! $Id mode_top_bound COMMON comconstr omeg dissip_zref tau_top_bound | 
        
      
 
 
      
        
          | ! $Id mode_top_bound COMMON comconstr unsim | 
        
      
 
 
      
        
          | ! $Id mode_top_bound COMMON comconstr omeg dissip_zref year_day |