source: LMDZ4/branches/V3_test/libf/phylmd/inc_sipc.h @ 746

Last change on this file since 746 was 704, checked in by Laurent Fairhead, 18 years ago

Inclusion des modifs de Y. Meurdesoif pour la version V3
LF

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 945 bytes
Line 
1!
2! $Header$
3!
4C
5C -- inc_sipc.h   97-08-11   Version 2.0   Author: S&A
6C    **********
7C@
8C@  Contents : variables describing pools formed of shared memory segments
9C@  --------
10C@
11C@ -- mpoolinit(r/w) : handles associated to model pools for passing initial info
12C@
13C@ -- mpoolwrit : handles associated to pools used to pass fields exchanged
14C@               from model to coupler (see libsipc/SIPC_Write_Model.f)
15C@
16C@ -- mpoolread : handles associated to pools used to pass fields exchanged
17C@               from model to coupler (see libsipc/SIPC_Read_Model.f) 
18C@ 
19C     -------------------------------------------------------------------
20C
21      INTEGER  mpoolinitr
22      INTEGER  mpoolinitw
23      INTEGER  mpoolwrit(jpmaxfld)
24      INTEGER  mpoolread(jpmaxfld)
25      COMMON / compool / mpoolinitr, mpoolinitw, mpoolwrit, mpoolread
26c$OMP THREADPRIVATE(/compool/)
27C     -------------------------------------------------------------------
Note: See TracBrowser for help on using the repository browser.