source:
XMLIO_SERVER/trunk/src/XMLIO/vector_field_def.inc
@
218
Last change on this file since 218 was 17, checked in by ymipsl, 16 years ago | |
---|---|
File size: 320 bytes |
Line | |
---|---|
1 | |
2 | TYPE Pt_field__ |
3 | TYPE (field),POINTER :: Pt |
4 | LOGICAL :: owned |
5 | END TYPE Pt_field__ |
6 | |
7 | TYPE vector_field |
8 | |
9 | TYPE (Pt_field__), POINTER, DIMENSION(:) :: at => NULL() |
10 | INTEGER :: size |
11 | |
12 | INTEGER :: size_max |
13 | REAL :: grow_factor |
14 | INTEGER :: chunk |
15 | |
16 | END TYPE vector_field |
17 |
Note: See TracBrowser
for help on using the repository browser.