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