Revision 692 branches/merge-trunk-davef/src/linad99/gradstrc.cpp

gradstrc.cpp (revision 692)
68 68
// *************************************************************
69 69
// *************************************************************
70 70
int ctlc_flag = 0;
71
int gradient_structure::Hybrid_bounded_flag=0;
72
DF_FILE * gradient_structure::fp=NULL;
73
char gradient_structure::cmpdif_file_name[61];
74
//char gradient_structure::var_store_file_name[61];
71
__ADMBTHREAD__ int gradient_structure::Hybrid_bounded_flag=0;
72
__ADMBTHREAD__ DF_FILE * gradient_structure::fp=NULL;
73
__ADMBTHREAD__ char gradient_structure::cmpdif_file_name[101];
74
//char gradient_structure::var_store_file_name[101];
75 75
int gradient_structure::NUM_RETURN_ARRAYS = 25;
76
double * gradient_structure::hessian_ptr=NULL;
76
__ADMBTHREAD__ double * gradient_structure::hessian_ptr=NULL;
77 77
int gradient_structure::NUM_DEPENDENT_VARIABLES = 2000;
78 78
#if (defined(NO_DERIVS))
79 79
  int gradient_structure::no_derivatives = 0;
80 80
#endif
81
long int gradient_structure::max_last_offset = 0;
82
long int gradient_structure::NVAR = 0;
83
long int gradient_structure::TOTAL_BYTES = 0;
84
long int gradient_structure::PREVIOUS_TOTAL_BYTES = 0;
81
__ADMBTHREAD__ long int gradient_structure::max_last_offset = 0;
82
__ADMBTHREAD__ long int gradient_structure::NVAR = 0;
83
__ADMBTHREAD__ long int gradient_structure::TOTAL_BYTES = 0;
84
__ADMBTHREAD__ long int gradient_structure::PREVIOUS_TOTAL_BYTES = 0;
85 85
long int gradient_structure::USE_FOR_HESSIAN = 0;
86
dvariable** gradient_structure::RETURN_ARRAYS = NULL;
87
int gradient_structure::RETURN_ARRAYS_PTR;
88
dvariable ** gradient_structure::RETURN_PTR_CONTAINER = NULL;
89
int gradient_structure::RETURN_ARRAYS_SIZE = 70;
90
int gradient_structure::instances = 0;
86
__ADMBTHREAD__ dvariable** gradient_structure::RETURN_ARRAYS = NULL;
87
__ADMBTHREAD__ int gradient_structure::RETURN_ARRAYS_PTR;
88
__ADMBTHREAD__ dvariable ** gradient_structure::RETURN_PTR_CONTAINER = NULL;
89
__ADMBTHREAD__ int gradient_structure::RETURN_ARRAYS_SIZE = 70;
90
__ADMBTHREAD__ int gradient_structure::instances = 0;
91 91
//int gradient_structure::RETURN_INDEX = 0;
92 92
//dvariable * gradient_structure::FRETURN = NULL;
93
dvariable * gradient_structure::MAX_RETURN = NULL;
94
dvariable * gradient_structure::MIN_RETURN = NULL;
95
dvariable * gradient_structure::RETURN_PTR = NULL;
93
__ADMBTHREAD__ dvariable * gradient_structure::MAX_RETURN = NULL;
94
__ADMBTHREAD__ dvariable * gradient_structure::MIN_RETURN = NULL;
95
__ADMBTHREAD__ dvariable * gradient_structure::RETURN_PTR = NULL;
96 96
#ifdef __BORLANDC__
97 97
long int gradient_structure::GRADSTACK_BUFFER_SIZE = 4000000L;
98 98
long int gradient_structure::CMPDIF_BUFFER_SIZE=140000000L;
......
101 101
long long int gradient_structure::CMPDIF_BUFFER_SIZE=140000000L;
102 102
#endif
103 103

  
104
dependent_variables_information * gradient_structure::DEPVARS_INFO=NULL;
104
__ADMBTHREAD__ dependent_variables_information * gradient_structure::DEPVARS_INFO=NULL;
105 105

  
106 106
int gradient_structure::save_var_flag=0;
107 107
int gradient_structure::save_var_file_flag=0;
......
110 110
//int gradient_structure::_GRADFILE_PTR2 = NULL; // should be int gradfile_handle;
111 111
//int gradient_structure::_VARSSAV_PTR = 0; // should be int gradfile_handle;
112 112

  
113
unsigned int gradient_structure::MAX_NVAR_OFFSET = 5000;
114
unsigned long gradient_structure::ARRAY_MEMBLOCK_SIZE = 0L; //js
115
dlist * gradient_structure::GRAD_LIST;
116
grad_stack * gradient_structure::GRAD_STACK1;
117
indvar_offset_list * gradient_structure::INDVAR_LIST = NULL;
118
arr_list * gradient_structure::ARR_LIST1 = NULL;
119
arr_list * gradient_structure::ARR_FREE_LIST1 = NULL;
113
__ADMBTHREAD__ unsigned int gradient_structure::MAX_NVAR_OFFSET = 5000;
114
__ADMBTHREAD__ unsigned long gradient_structure::ARRAY_MEMBLOCK_SIZE = 0L; //js
115
__ADMBTHREAD__ dlist * gradient_structure::GRAD_LIST;
116
__ADMBTHREAD__ grad_stack * gradient_structure::GRAD_STACK1;
117
__ADMBTHREAD__ indvar_offset_list * gradient_structure::INDVAR_LIST = NULL;
118
__ADMBTHREAD__ arr_list * gradient_structure::ARR_LIST1 = NULL;
119
__ADMBTHREAD__ arr_list * gradient_structure::ARR_FREE_LIST1 = NULL;
120 120
int gradient_structure::MAX_DLINKS = 5000;
121 121

  
122 122
// note: ARRAY_MEMBLOCK stuff is set by tpl2cpp for historical reasons
......
124 124
//       - Ian Taylor 5/3/2012
125 125

  
126 126
//unsigned long int gradient_structure::ARRAY_MEMBLOCK_BASE = 0L;
127
humungous_pointer gradient_structure::ARRAY_MEMBLOCK_BASE;
128
humungous_pointer gradient_structure::ARRAY_MEMBLOCK_BASEA;
129
humungous_pointer gradient_structure::ARRAY_MEMBLOCK_SAVE;
130
double * gradient_structure::variables_save=NULL;
127
//humungous_pointer gradient_structure::ARRAY_MEMBLOCK_BASE;
128
//humungous_pointer gradient_structure::ARRAY_MEMBLOCK_BASEA;
129
//humungous_pointer gradient_structure::ARRAY_MEMBLOCK_SAVE;
130
__ADMBTHREAD__ char * gradient_structure::ARRAY_MEMBLOCK_BASE;
131
__ADMBTHREAD__ char * gradient_structure::ARRAY_MEMBLOCK_BASEA;
132
__ADMBTHREAD__ char * gradient_structure::ARRAY_MEMBLOCK_SAVE;
133
__ADMBTHREAD__ double * gradient_structure::variables_save=NULL;
131 134
void * farptr_norm(void *);
132 135
long int farptr_tolong(void *) ;
133 136
void memory_allocate_error(const char * s, void * ptr);
... This diff was truncated because it exceeds the maximum size that can be displayed.

Also available in: Unified diff