1 |
|
C $Header$ |
2 |
|
C $Name$ |
3 |
|
|
4 |
#include "AUTODIFF_OPTIONS.h" |
#include "AUTODIFF_OPTIONS.h" |
5 |
|
|
16 |
c The following input veriables are used throughout in the argument |
c The following input veriables are used throughout in the argument |
17 |
c lists: |
c lists: |
18 |
c |
c |
19 |
c name - character |
c name - character |
20 |
c On entry, name is the extended tape name. |
c On entry, name is the extended tape name. |
21 |
c len - integer |
c len - integer |
22 |
c On entry, len is the number of characters in name. |
c On entry, len is the number of characters in name. |
23 |
c tid - integer |
c tid - integer |
24 |
c On entry, tid identifies the tape. |
c On entry, tid identifies the tape. |
25 |
c vid - integer |
c vid - integer |
26 |
c On entry, vid identifies the variable to be stored on |
c On entry, vid identifies the variable to be stored on |
27 |
c the tape. |
c the tape. |
28 |
c var - real array of dimension length |
c var - real array of dimension length |
29 |
c On entry, var contains the values to be stored. |
c On entry, var contains the values to be stored. |
30 |
c var must not be changed. |
c var must not be changed. |
31 |
c size - integer |
c size - integer |
32 |
c On entry, size is the size in bytes of the type of |
c On entry, size is the size in bytes of the type of |
33 |
c variable var. |
c variable var. |
34 |
c length - integer |
c length - integer |
35 |
c On entry, length is the dimension of the variable |
c On entry, length is the dimension of the variable |
36 |
c stored on the tape. |
c stored on the tape. |
37 |
c irec - integer |
c irec - integer |
38 |
c On entry, irec is the record number to be written. |
c On entry, irec is the record number to be written. |
39 |
c mythid - integer |
c mythid - integer |
40 |
c On entry, mythid is the number of the thread or |
c On entry, mythid is the number of the thread or |