Changeset 23255
- Timestamp:
- 09/11/18 13:07:03 (7 years ago)
- Location:
- issm/trunk-jpl/src/c
- Files:
-
- 12 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/c/classes/IoModel.cpp
r23252 r23255 1762 1762 if(X) Xcount=*pXcount; 1763 1763 1764 #ifdef _HAVE_AD OLC_ //cannot come here unless you are running AD mode, from DeclaredIndependents:1764 #ifdef _HAVE_AD_ //cannot come here unless you are running AD mode, from DeclaredIndependents: 1765 1765 1766 1766 /*Intermediaries*/ -
issm/trunk-jpl/src/c/cores/controlad_core.cpp
r23066 r23255 11 11 #include "../solutionsequences/solutionsequences.h" 12 12 13 /*This file is probably never used!*/ 13 14 #if defined (_HAVE_M1QN3_) & defined (_HAVE_ADOLC_) 14 15 /*m1qn3 prototypes {{{*/ -
issm/trunk-jpl/src/c/modules/FloatingiceMeltingRatePicox/FloatingiceMeltingRatePicox.cpp
r23066 r23255 78 78 IssmDouble val=sqrt(dmax_basin[i]/dist_max)*(maxbox-1); 79 79 80 #ifdef _HAVE_ADOLC_ 80 #ifdef _HAVE_AD_ 81 _error_("Check the implementation of floor below"); 81 82 /*Do not use floor when AD is on*/ 82 83 int k=0; while(k<val+.5){k++;} -
issm/trunk-jpl/src/c/modules/ModelProcessorx/Control/UpdateElementsAndMaterialsControl.cpp
r23240 r23255 135 135 void UpdateElementsAndMaterialsControlAD(Elements* elements,Parameters* parameters,Materials* materials, IoModel* iomodel){ 136 136 137 #if defined(_HAVE_AD OLC_)137 #if defined(_HAVE_AD_) 138 138 /*Intermediaries*/ 139 139 int num_independent_objects,M,N,M_par,N_par; -
issm/trunk-jpl/src/c/shared/Elements/PrintArrays.cpp
r23043 r23255 12 12 _printf_("\n"); 13 13 } 14 #ifdef _HAVE_AD OLC_14 #ifdef _HAVE_AD_ 15 15 void printarray(IssmDouble* array,int lines,int cols){ 16 16 _printf_("\n"); -
issm/trunk-jpl/src/c/shared/Elements/elements.h
r23048 r23255 42 42 /*Print arrays*/ 43 43 void printarray(IssmPDouble* array,int lines,int cols=1); 44 #if _HAVE_AD OLC_ && !defined(_WRAPPERS_)44 #if _HAVE_AD_ && !defined(_WRAPPERS_) 45 45 void printarray(IssmDouble* array,int lines,int cols=1); 46 46 #endif -
issm/trunk-jpl/src/c/toolkits/mpi/issmmpi.h
r23254 r23255 98 98 template <class T> ISSM_MPI_Datatype TypeToMPIType(){assert(false);}; 99 99 template <> inline ISSM_MPI_Datatype TypeToMPIType<IssmDouble>(){return ISSM_MPI_DOUBLE;}; 100 #if defined(_HAVE_AD OLC_) && !defined(_WRAPPERS_)100 #if defined(_HAVE_AD_) && !defined(_WRAPPERS_) 101 101 template <> inline ISSM_MPI_Datatype TypeToMPIType<IssmPDouble>(){return ISSM_MPI_PDOUBLE;}; 102 102 #endif -
issm/trunk-jpl/src/c/toolkits/mumps/MumpsSolve.cpp
r23251 r23255 616 616 dataHandler->addData(parameters); // we assume here that parameters is still intact when the reverse run is called 617 617 618 tape.pushExternalFunction(&MumpsSolve_codi_b, dataHandler, &MumpsSolve_codi_delete); 618 tape.pushExternalFunction(&MumpsSolve_codi_b, dataHandler, &MumpsSolve_codi_delete); 619 //tape.pushExternalFunctionHandle(&MumpsSolve_codi_b, dataHandler, &MumpsSolve_codi_delete); 619 620 } else { 620 621 // if the tape is active valueB is stored in the dataHandler and deleted in the reverse sweep -
issm/trunk-jpl/src/c/toolkits/petsc/objects/PetscMat.cpp
r19178 r23255 21 21 PetscMat::PetscMat(){/*{{{*/ 22 22 this->matrix=NULL; 23 #ifdef _HAVE_AD OLC_23 #ifdef _HAVE_AD_ 24 24 this->amatrix=NULL; 25 25 #endif -
issm/trunk-jpl/src/c/toolkits/petsc/objects/PetscMat.h
r14915 r23255 27 27 Mat matrix; 28 28 29 #ifdef _HAVE_AD OLC_29 #ifdef _HAVE_AD_ 30 30 IssmDouble* amatrix; 31 31 #endif -
issm/trunk-jpl/src/c/toolkits/petsc/objects/PetscVec.cpp
r19977 r23255 21 21 PetscVec::PetscVec(){/*{{{*/ 22 22 this->vector=NULL; 23 #ifdef _HAVE_AD OLC_23 #ifdef _HAVE_AD_ 24 24 this->avector=NULL; 25 25 #endif -
issm/trunk-jpl/src/c/toolkits/petsc/objects/PetscVec.h
r19977 r23255 25 25 Vec vector; 26 26 27 #ifdef _HAVE_AD OLC_27 #ifdef _HAVE_AD_ 28 28 IssmDouble* avector; 29 29 #endif
Note:
See TracChangeset
for help on using the changeset viewer.