source: LMDZ4/branches/LMDZ4-dev/libf/dyn3d/comconst.h @ 1106

Last change on this file since 1106 was 1106, checked in by lguez, 16 years ago

"comconst.h", and "comgeom2.h" are now both fixed and free form.
Removed calls to procedure "flush".
Corrected kinds of constants which appeared as arguments to "min" or
"max" (all arguments are now of the same type and kind).

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 542 bytes
RevLine 
[524]1!
2! $Header$
3!
[1106]4!-----------------------------------------------------------------------
5! INCLUDE comconst.h
[524]6
[1106]7      COMMON/comconst/im,jm,lllm,imp1,jmp1,lllmm1,lllmp1,lcl,           &
8     & dtvr,daysec,                                                     &
9     & pi,dtphys,dtdiss,rad,r,cpp,kappa,cotot,unsim,g,omeg
[524]10
11      INTEGER im,jm,lllm,imp1,jmp1,lllmm1,lllmp1,lcl
12      REAL dtvr,daysec
13      REAL pi,dtphys,dtdiss,rad,r,cpp,kappa
14      REAL cotot,unsim,g,omeg
15
[1106]16!-----------------------------------------------------------------------
Note: See TracBrowser for help on using the repository browser.