Last change
on this file since 4109 was
3880,
checked in by idelkadi, 3 years ago
|
Online implementation of the radiative transfer code ECRAD in LMDZ.
- Inclusion of the ecrad directory containing the sources of the ECRAD code
- Adaptation of compilation scripts (CPP_ECRAD keys)
- Call of ecrad in radlwsw_m.F90 under the logical key iflag_rrtm = 2
|
File size:
913 bytes
|
Rev | Line | |
---|
[3880] | 1 | /** |
---|
| 2 | * (C) Copyright 2014- ECMWF. |
---|
| 3 | * |
---|
| 4 | * This software is licensed under the terms of the Apache Licence Version 2.0 |
---|
| 5 | * which can be obtained at http://www.apache.org/licenses/LICENSE-2.0. |
---|
| 6 | * |
---|
| 7 | * In applying this licence, ECMWF does not waive the privileges and immunities |
---|
| 8 | * granted to it by virtue of its status as an intergovernmental organisation |
---|
| 9 | * nor does it submit to any jurisdiction. |
---|
| 10 | */ |
---|
| 11 | |
---|
| 12 | |
---|
| 13 | /* statm format: (/proc/self/mem under LINUX) |
---|
| 14 | |
---|
| 15 | in units of pages (4096 bytes) |
---|
| 16 | |
---|
| 17 | size total program size |
---|
| 18 | resident size of in memory portions |
---|
| 19 | shared number of the pages that are shared |
---|
| 20 | trs number of pages that are 'code' |
---|
| 21 | drs number of pages of data/stack |
---|
| 22 | lrs number of pages of library |
---|
| 23 | dt number of dirty pages |
---|
| 24 | |
---|
| 25 | */ |
---|
| 26 | |
---|
| 27 | struct statm |
---|
| 28 | { |
---|
| 29 | int size; |
---|
| 30 | int resident; |
---|
| 31 | int shared; |
---|
| 32 | int trs; |
---|
| 33 | int drs; |
---|
| 34 | int lrs; |
---|
| 35 | int dt; |
---|
| 36 | }; |
---|
| 37 | |
---|
| 38 | extern int getstatm(struct statm *sm); |
---|
| 39 | |
---|
Note: See
TracBrowser
for help on using the repository browser.