Last change
on this file since 99 was
57,
checked in by aslmd, 15 years ago
|
mineur LMD_MM_MARS: ajout du GCM ancienne physique, systeme maintenant complet sur SVN (ne manque que la base de donnees d'etats initiaux)
|
File size:
496 bytes
|
Rev | Line | |
---|
[57] | 1 | c----------------------------------------------------------------------- |
---|
| 2 | c INCLUDE 'comvert.h' |
---|
| 3 | |
---|
| 4 | COMMON/comvert/ap(llm+1),bp(llm+1),presnivs(llm),dpres(llm) , |
---|
| 5 | . pa,preff,nivsigs(llm),nivsig(llm+1), |
---|
| 6 | . sig(llm+1),ds(llm),aps(llm),bps(llm),pseudoalt(llm) |
---|
| 7 | |
---|
| 8 | REAL ap,bp,presnivs,dpres,pa,preff,nivsigs,nivsig |
---|
| 9 | c Mars Ce qui suit vient de gcm |
---|
| 10 | REAL sig,ds,aps,bps,pseudoalt |
---|
| 11 | |
---|
| 12 | c----------------------------------------------------------------------- |
---|
Note: See
TracBrowser
for help on using the repository browser.