source:
branches/nemo_v3_3_beta/NEMOGCM/EXTERNAL/XMLIO_SERVER/src/XMLIO/vector_node_def.inc
@
2847
Last change on this file since 2847 was 2281, checked in by smasson, 14 years ago | |
---|---|
|
|
File size: 314 bytes |
Rev | Line | |
---|---|---|
[1897] | 1 | |
2 | TYPE Pt_node__ | |
3 | TYPE (node),POINTER :: Pt | |
4 | LOGICAL :: owned | |
5 | END TYPE Pt_node__ | |
6 | ||
7 | TYPE vector_node | |
8 | ||
9 | TYPE (Pt_node__), POINTER, DIMENSION(:) :: at => NULL() | |
10 | INTEGER :: size | |
11 | ||
12 | INTEGER :: size_max | |
13 | REAL :: grow_factor | |
14 | INTEGER :: chunk | |
15 | ||
16 | END TYPE vector_node | |
17 |
Note: See TracBrowser
for help on using the repository browser.