Changeset 3507 for trunk/LMDZ.PLUTO


Ignore:
Timestamp:
Nov 8, 2024, 10:57:31 AM (3 weeks ago)
Author:
afalco
Message:

Pluto: more info on variables

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.PLUTO/libf/phypluto/comsaison_h.F90

    r3184 r3507  
    22       module comsaison_h
    33
    4        implicit none 
     4       implicit none
    55
    66!       integer,save :: isaison
    … …  
    88!!$OMP THREADPRIVATE(isaison,callsais)
    99
    10        real,save :: dist_star,declin,right_ascen
     10       real,save :: dist_star   ! Distance Star-Planet in UA
     11       real,save :: declin      ! Solar declination (rad)
     12       real,save :: right_ascen ! Right ascension (rad)
    1113!$OMP THREADPRIVATE(dist_star,declin,right_ascen)
    1214
Note: See TracChangeset for help on using the changeset viewer.