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