1 #if !defined(__PETSCSYSTYPES_H) 2 #define __PETSCSYSTYPES_H 3 4 #include <petscconf.h> 5 #include <petscfix.h> 6 7 /*MC 8 PetscErrorCode - datatype used for return error code from almost all PETSc functions 9 10 Level: beginner 11 12 .seealso: CHKERRQ, SETERRQ 13 M*/ 14 typedef int PetscErrorCode; 15 16 /*MC 17 18 PetscClassId - A unique id used to identify each PETSc class. 19 20 Notes: 21 Use PetscClassIdRegister() to obtain a new value for a new class being created. Usually 22 XXXInitializePackage() calls it for each class it defines. 23 24 Developer Notes: 25 Internal integer stored in the _p_PetscObject data structure. 26 These are all computed by an offset from the lowest one, PETSC_SMALLEST_CLASSID. 27 28 Level: developer 29 30 .seealso: PetscClassIdRegister(), PetscLogEventRegister(), PetscHeaderCreate() 31 M*/ 32 typedef int PetscClassId; 33 34 /*MC 35 PetscMPIInt - datatype used to represent 'int' parameters to MPI functions. 36 37 Level: intermediate 38 39 Notes: 40 usually this is the same as PetscInt, but if PETSc was built with --with-64-bit-indices but 41 standard C/Fortran integers are 32 bit then this is NOT the same as PetscInt; it remains 32 bit. 42 43 PetscMPIIntCast(a,&b) checks if the given PetscInt a will fit in a PetscMPIInt, if not it 44 generates a PETSC_ERR_ARG_OUTOFRANGE error. 45 46 .seealso: PetscBLASInt, PetscInt, PetscMPIIntCast() 47 48 M*/ 49 typedef int PetscMPIInt; 50 51 /*MC 52 PetscEnum - datatype used to pass enum types within PETSc functions. 53 54 Level: intermediate 55 56 .seealso: PetscOptionsGetEnum(), PetscOptionsEnum(), PetscBagRegisterEnum() 57 M*/ 58 typedef enum { ENUM_DUMMY } PetscEnum; 59 60 typedef short PetscShort; 61 typedef char PetscChar; 62 typedef float PetscFloat; 63 64 /*MC 65 PetscInt - PETSc type that represents an integer, used primarily to 66 represent size of arrays and indexing into arrays. Its size can be configured with the option --with-64-bit-indices to be either 32-bit (default) or 64-bit. 67 68 Notes: 69 For MPI calls that require datatypes, use MPIU_INT as the datatype for PetscInt. It will automatically work correctly regardless of the size of PetscInt. 70 71 Level: beginner 72 73 .seealso: PetscBLASInt, PetscMPIInt, PetscReal, PetscScalar, PetscComplex, PetscInt, MPIU_REAL, MPIU_SCALAR, MPIU_COMPLEX, MPIU_INT 74 M*/ 75 76 #if defined(PETSC_HAVE_STDINT_H) 77 # include <stdint.h> 78 #endif 79 #if defined (PETSC_HAVE_INTTYPES_H) 80 # if !defined(__STDC_FORMAT_MACROS) 81 # define __STDC_FORMAT_MACROS /* required for using PRId64 from c++ */ 82 # endif 83 # include <inttypes.h> 84 # if !defined(PRId64) 85 # define PRId64 "ld" 86 # endif 87 #endif 88 89 #if defined(PETSC_HAVE_STDINT_H) && defined(PETSC_HAVE_INTTYPES_H) && defined(PETSC_HAVE_MPI_INT64_T) /* MPI_INT64_T is not guaranteed to be a macro */ 90 typedef int64_t PetscInt64; 91 #elif (PETSC_SIZEOF_LONG_LONG == 8) 92 typedef long long PetscInt64; 93 #elif defined(PETSC_HAVE___INT64) 94 typedef __int64 PetscInt64; 95 #else 96 # error "cannot determine PetscInt64 type" 97 #endif 98 99 #if defined(PETSC_USE_64BIT_INDICES) 100 typedef PetscInt64 PetscInt; 101 #else 102 typedef int PetscInt; 103 #endif 104 105 /*MC 106 PetscBLASInt - datatype used to represent 'int' parameters to BLAS/LAPACK functions. 107 108 Notes: 109 Usually this is the same as PetscInt, but if PETSc was built with --with-64-bit-indices but 110 standard C/Fortran integers are 32 bit then this is NOT the same as PetscInt it remains 32 bit 111 (except on very rare BLAS/LAPACK implementations that support 64 bit integers see the note below). 112 113 PetscErrorCode PetscBLASIntCast(a,&b) checks if the given PetscInt a will fit in a PetscBLASInt, if not it 114 generates a PETSC_ERR_ARG_OUTOFRANGE error 115 116 Installation Notes: 117 The 64bit versions of MATLAB ship with BLAS and LAPACK that use 64 bit integers for sizes etc, 118 if you run ./configure with the option 119 --with-blaslapack-lib=[/Applications/MATLAB_R2010b.app/bin/maci64/libmwblas.dylib,/Applications/MATLAB_R2010b.app/bin/maci64/libmwlapack.dylib] 120 but you need to also use --known-64-bit-blas-indices. 121 122 MKL also ships with 64 bit integer versions of the BLAS and LAPACK, if you select those you must also ./configure with 123 --known-64-bit-blas-indices 124 125 OpenBLAS can also be built to use 64 bit integers. The ./configure options --download-openblas -download-openblas-64-bit-blas-indices 126 will build a 64 bit integer version 127 128 Developer Notes: 129 Eventually ./configure should automatically determine the size of the integers used by BLAS/LAPACK. 130 131 External packages such as hypre, ML, SuperLU etc do not provide any support for passing 64 bit integers to BLAS/LAPACK so cannot 132 be used with PETSc if you have set PetscBLASInt to long int. 133 134 Level: intermediate 135 136 .seealso: PetscMPIInt, PetscInt, PetscBLASIntCast() 137 138 M*/ 139 #if defined(PETSC_HAVE_64BIT_BLAS_INDICES) 140 typedef PetscInt64 PetscBLASInt; 141 #else 142 typedef int PetscBLASInt; 143 #endif 144 145 /*E 146 PetscBool - Logical variable. Actually an int in C and a logical in Fortran. 147 148 Level: beginner 149 150 Developer Note: 151 Why have PetscBool , why not use bool in C? The problem is that K and R C, C99 and C++ all have different mechanisms for 152 boolean values. It is not easy to have a simple macro that that will work properly in all circumstances with all three mechanisms. 153 154 .seealso: PETSC_TRUE, PETSC_FALSE, PetscNot() 155 E*/ 156 typedef enum { PETSC_FALSE,PETSC_TRUE } PetscBool; 157 158 /*MC 159 PetscReal - PETSc type that represents a real number version of PetscScalar 160 161 162 Notes: 163 For MPI calls that require datatypes, use MPIU_REAL as the datatype for PetscScalar and MPIU_SUM, MPIU_MAX, etc. for operations. 164 They will automatically work correctly regardless of the size of PetscReal. 165 166 See PetscScalar for details on how to ./configure the size of PetscReal. 167 168 Level: beginner 169 170 .seealso: PetscScalar, PetscComplex, PetscInt, MPIU_REAL, MPIU_SCALAR, MPIU_COMPLEX, MPIU_INT 171 M*/ 172 173 #if defined(PETSC_USE_REAL_SINGLE) 174 typedef float PetscReal; 175 #elif defined(PETSC_USE_REAL_DOUBLE) 176 typedef double PetscReal; 177 #elif defined(PETSC_USE_REAL___FLOAT128) 178 # if defined(__cplusplus) 179 extern "C" { 180 # endif 181 # include <quadmath.h> 182 # if defined(__cplusplus) 183 } 184 # endif 185 typedef __float128 PetscReal; 186 #elif defined(PETSC_USE_REAL___FP16) 187 typedef __fp16 PetscReal; 188 #endif /* PETSC_USE_REAL_* */ 189 190 /*MC 191 PetscComplex - PETSc type that represents a complex number with precision matching that of PetscReal. 192 193 Synopsis: 194 #include <petscsys.h> 195 PetscComplex number = 1. + 2.*PETSC_i; 196 197 Notes: 198 For MPI calls that require datatypes, use MPIU_COMPLEX as the datatype for PetscComplex and MPIU_SUM etc for operations. 199 They will automatically work correctly regardless of the size of PetscComplex. 200 201 See PetscScalar for details on how to ./configure the size of PetscReal 202 203 Complex numbers are automatically available if PETSc was able to find a working complex implementation 204 205 Level: beginner 206 207 .seealso: PetscReal, PetscScalar, PetscComplex, PetscInt, MPIU_REAL, MPIU_SCALAR, MPIU_COMPLEX, MPIU_INT, PETSC_i 208 M*/ 209 210 #if defined(__cplusplus) && defined(PETSC_HAVE_CXX_COMPLEX) && !defined(PETSC_USE_REAL___FLOAT128) 211 # if !defined(PETSC_SKIP_COMPLEX) 212 /* C++ support of complex number */ 213 # define PETSC_HAVE_COMPLEX 1 214 # if defined(PETSC_HAVE_CUDA) && __CUDACC_VER_MAJOR__ > 6 215 /* complex headers in thrust only available in CUDA 7.0 and above */ 216 # define petsccomplexlib thrust 217 # include <thrust/complex.h> 218 # else 219 # define petsccomplexlib std 220 # include <complex> 221 # endif 222 # if defined(PETSC_USE_REAL_SINGLE) 223 typedef petsccomplexlib::complex<float> PetscComplex; 224 # elif defined(PETSC_USE_REAL_DOUBLE) 225 typedef petsccomplexlib::complex<double> PetscComplex; 226 # elif defined(PETSC_USE_REAL___FLOAT128) 227 typedef petsccomplexlib::complex<__float128> PetscComplex; /* Notstandard and not expected to work, use __complex128 */ 228 # endif /* PETSC_USE_REAL_ */ 229 # endif /* ! PETSC_SKIP_COMPLEX */ 230 #elif defined(PETSC_HAVE_C99_COMPLEX) && !defined(PETSC_USE_REAL___FP16) 231 # if !defined(PETSC_SKIP_COMPLEX) 232 # define PETSC_HAVE_COMPLEX 1 233 # include <complex.h> 234 # if defined(PETSC_USE_REAL_SINGLE) || defined(PETSC_USE_REAL___FP16) 235 typedef float _Complex PetscComplex; 236 # elif defined(PETSC_USE_REAL_DOUBLE) 237 typedef double _Complex PetscComplex; 238 # elif defined(PETSC_USE_REAL___FLOAT128) 239 typedef __complex128 PetscComplex; 240 # endif /* PETSC_USE_REAL_* */ 241 # endif /* !PETSC_SKIP_COMPLEX */ 242 #elif (defined(PETSC_USE_COMPLEX) && !defined(PETSC_SKIP_COMPLEX)) 243 # error "PETSc was configured --with-scalar-type=complex, but a language-appropriate complex library is not available" 244 #endif /* !PETSC_SKIP_COMPLEX */ 245 246 /*MC 247 PetscScalar - PETSc type that represents either a double precision real number, a double precision 248 complex number, a single precision real number, a __float128 real or complex or a __fp16 real - if the code is configured 249 with --with-scalar-type=real,complex --with-precision=single,double,__float128,__fp16 250 251 Notes: 252 For MPI calls that require datatypes, use MPIU_SCALAR as the datatype for PetscScalar and MPIU_SUM, MPIU_MAX etc for operations. They will automatically work correctly regardless of the size of PetscScalar. 253 254 Level: beginner 255 256 .seealso: PetscReal, PetscComplex, PetscInt, MPIU_REAL, MPIU_SCALAR, MPIU_COMPLEX, MPIU_INT, PetscRealPart(), PetscImaginaryPart() 257 M*/ 258 259 #if (defined(PETSC_USE_COMPLEX) && !defined(PETSC_SKIP_COMPLEX)) 260 typedef PetscComplex PetscScalar; 261 #else /* PETSC_USE_COMPLEX */ 262 typedef PetscReal PetscScalar; 263 #endif /* PETSC_USE_COMPLEX */ 264 265 /*E 266 PetscCopyMode - Determines how an array passed to certain functions is copied or retained 267 268 Level: beginner 269 270 $ PETSC_COPY_VALUES - the array values are copied into new space, the user is free to reuse or delete the passed in array 271 $ PETSC_OWN_POINTER - the array values are NOT copied, the object takes ownership of the array and will free it later, the user cannot change or 272 $ delete the array. The array MUST have been obtained with PetscMalloc(). Hence this mode cannot be used in Fortran. 273 $ PETSC_USE_POINTER - the array values are NOT copied, the object uses the array but does NOT take ownership of the array. The user cannot use 274 the array but the user must delete the array after the object is destroyed. 275 276 E*/ 277 typedef enum {PETSC_COPY_VALUES, PETSC_OWN_POINTER, PETSC_USE_POINTER} PetscCopyMode; 278 279 /*MC 280 PETSC_FALSE - False value of PetscBool 281 282 Level: beginner 283 284 Note: 285 Zero integer 286 287 .seealso: PetscBool, PETSC_TRUE 288 M*/ 289 290 /*MC 291 PETSC_TRUE - True value of PetscBool 292 293 Level: beginner 294 295 Note: 296 Nonzero integer 297 298 .seealso: PetscBool, PETSC_FALSE 299 M*/ 300 301 /*MC 302 PetscLogDouble - Used for logging times 303 304 Notes: 305 Contains double precision numbers that are not used in the numerical computations, but rather in logging, timing etc. 306 307 M*/ 308 typedef double PetscLogDouble; 309 310 /*E 311 PetscDataType - Used for handling different basic data types. 312 313 Level: beginner 314 315 Notes: 316 Use of this should be avoided if one can directly use MPI_Datatype instead. 317 318 Developer comment: 319 It would be nice if we could always just use MPI Datatypes, why can we not? 320 321 .seealso: PetscBinaryRead(), PetscBinaryWrite(), PetscDataTypeToMPIDataType(), 322 PetscDataTypeGetSize() 323 324 E*/ 325 typedef enum {PETSC_INT = 0,PETSC_DOUBLE = 1,PETSC_COMPLEX = 2, PETSC_LONG = 3 ,PETSC_SHORT = 4,PETSC_FLOAT = 5, 326 PETSC_CHAR = 6,PETSC_BIT_LOGICAL = 7,PETSC_ENUM = 8,PETSC_BOOL=9, PETSC___FLOAT128 = 10,PETSC_OBJECT = 11, PETSC_FUNCTION = 12, PETSC_STRING = 13, PETSC___FP16 = 14,PETSC_STRUCT, PETSC_DATATYPE_UNKNOWN} PetscDataType; 327 328 #if defined(PETSC_USE_COMPLEX) 329 # define PETSC_SCALAR PETSC_COMPLEX 330 #else 331 # if defined(PETSC_USE_REAL_SINGLE) 332 # define PETSC_SCALAR PETSC_FLOAT 333 # elif defined(PETSC_USE_REAL___FLOAT128) 334 # define PETSC_SCALAR PETSC___FLOAT128 335 # elif defined(PETSC_USE_REAL___FP16) 336 # define PETSC_SCALAR PETSC___FP16 337 # else 338 # define PETSC_SCALAR PETSC_DOUBLE 339 # endif 340 #endif 341 #if defined(PETSC_USE_REAL_SINGLE) 342 # define PETSC_REAL PETSC_FLOAT 343 #elif defined(PETSC_USE_REAL___FLOAT128) 344 # define PETSC_REAL PETSC___FLOAT128 345 #elif defined(PETSC_USE_REAL___FP16) 346 # define PETSC_REAL PETSC___FP16 347 #else 348 # define PETSC_REAL PETSC_DOUBLE 349 #endif 350 #define PETSC_FORTRANADDR PETSC_LONG 351 352 /*S 353 PetscToken - 'Token' used for managing tokenizing strings 354 355 Level: intermediate 356 357 .seealso: PetscTokenCreate(), PetscTokenFind(), PetscTokenDestroy() 358 S*/ 359 typedef struct _p_PetscToken* PetscToken; 360 361 /*S 362 PetscObject - any PETSc object, PetscViewer, Mat, Vec, KSP etc 363 364 Level: beginner 365 366 Note: 367 This is the base class from which all PETSc objects are derived from. 368 369 .seealso: PetscObjectDestroy(), PetscObjectView(), PetscObjectGetName(), PetscObjectSetName(), PetscObjectReference(), PetscObjectDereference() 370 S*/ 371 typedef struct _p_PetscObject* PetscObject; 372 373 /*MC 374 PetscObjectId - unique integer Id for a PetscObject 375 376 Level: developer 377 378 Notes: 379 Unlike pointer values, object ids are never reused. 380 381 .seealso: PetscObjectState, PetscObjectGetId() 382 M*/ 383 #if defined(PETSC_USING_F90) && !defined(PETSC_USE_FORTRANKIND) /* compaq F90 */ 384 typedef int PetscObjectId; 385 #else 386 typedef PetscInt64 PetscObjectId; 387 #endif 388 389 /*MC 390 PetscObjectState - integer state for a PetscObject 391 392 Level: developer 393 394 Notes: 395 Object state is always-increasing and (for objects that track state) can be used to determine if an object has 396 changed since the last time you interacted with it. It is 64-bit so that it will not overflow for a very long time. 397 398 .seealso: PetscObjectId, PetscObjectStateGet(), PetscObjectStateIncrease(), PetscObjectStateSet() 399 M*/ 400 #if defined(PETSC_USING_F90) && !defined(PETSC_USE_FORTRANKIND) /* compaq F90 */ 401 typedef int PetscObjectState; 402 #else 403 typedef PetscInt64 PetscObjectState; 404 #endif 405 406 /*S 407 PetscFunctionList - Linked list of functions, possibly stored in dynamic libraries, accessed 408 by string name 409 410 Level: advanced 411 412 .seealso: PetscFunctionListAdd(), PetscFunctionListDestroy(), PetscOpFlist 413 S*/ 414 typedef struct _n_PetscFunctionList *PetscFunctionList; 415 416 /*E 417 PetscFileMode - Access mode for a file. 418 419 Level: beginner 420 421 $ FILE_MODE_READ - open a file at its beginning for reading 422 $ FILE_MODE_WRITE - open a file at its beginning for writing (will create if the file does not exist) 423 $ FILE_MODE_APPEND - open a file at end for writing 424 $ FILE_MODE_UPDATE - open a file for updating, meaning for reading and writing 425 $ FILE_MODE_APPEND_UPDATE - open a file for updating, meaning for reading and writing, at the end 426 427 .seealso: PetscViewerFileSetMode() 428 E*/ 429 typedef enum {FILE_MODE_READ, FILE_MODE_WRITE, FILE_MODE_APPEND, FILE_MODE_UPDATE, FILE_MODE_APPEND_UPDATE} PetscFileMode; 430 431 typedef void* PetscDLHandle; 432 typedef enum {PETSC_DL_DECIDE=0,PETSC_DL_NOW=1,PETSC_DL_LOCAL=2} PetscDLMode; 433 434 /*S 435 PetscObjectList - Linked list of PETSc objects, each accessable by string name 436 437 Level: developer 438 439 Notes: 440 Used by PetscObjectCompose() and PetscObjectQuery() 441 442 .seealso: PetscObjectListAdd(), PetscObjectListDestroy(), PetscObjectListFind(), PetscObjectCompose(), PetscObjectQuery(), PetscFunctionList 443 S*/ 444 typedef struct _n_PetscObjectList *PetscObjectList; 445 446 /*S 447 PetscDLLibrary - Linked list of dynamics libraries to search for functions 448 449 Level: advanced 450 451 .seealso: PetscDLLibraryOpen() 452 S*/ 453 typedef struct _n_PetscDLLibrary *PetscDLLibrary; 454 455 /*S 456 PetscContainer - Simple PETSc object that contains a pointer to any required data 457 458 Level: advanced 459 460 .seealso: PetscObject, PetscContainerCreate() 461 S*/ 462 typedef struct _p_PetscContainer* PetscContainer; 463 464 /*S 465 PetscRandom - Abstract PETSc object that manages generating random numbers 466 467 Level: intermediate 468 469 Concepts: random numbers 470 471 .seealso: PetscRandomCreate(), PetscRandomGetValue(), PetscRandomType 472 S*/ 473 typedef struct _p_PetscRandom* PetscRandom; 474 475 /* 476 In binary files variables are stored using the following lengths, 477 regardless of how they are stored in memory on any one particular 478 machine. Use these rather then sizeof() in computing sizes for 479 PetscBinarySeek(). 480 */ 481 #define PETSC_BINARY_INT_SIZE (32/8) 482 #define PETSC_BINARY_FLOAT_SIZE (32/8) 483 #define PETSC_BINARY_CHAR_SIZE (8/8) 484 #define PETSC_BINARY_SHORT_SIZE (16/8) 485 #define PETSC_BINARY_DOUBLE_SIZE (64/8) 486 #define PETSC_BINARY_SCALAR_SIZE sizeof(PetscScalar) 487 488 /*E 489 PetscBinarySeekType - argument to PetscBinarySeek() 490 491 Level: advanced 492 493 .seealso: PetscBinarySeek(), PetscBinarySynchronizedSeek() 494 E*/ 495 typedef enum {PETSC_BINARY_SEEK_SET = 0,PETSC_BINARY_SEEK_CUR = 1,PETSC_BINARY_SEEK_END = 2} PetscBinarySeekType; 496 497 /*E 498 PetscBuildTwoSidedType - algorithm for setting up two-sided communication 499 500 $ PETSC_BUILDTWOSIDED_ALLREDUCE - classical algorithm using an MPI_Allreduce with 501 $ a buffer of length equal to the communicator size. Not memory-scalable due to 502 $ the large reduction size. Requires only MPI-1. 503 $ PETSC_BUILDTWOSIDED_IBARRIER - nonblocking algorithm based on MPI_Issend and MPI_Ibarrier. 504 $ Proved communication-optimal in Hoefler, Siebert, and Lumsdaine (2010). Requires MPI-3. 505 $ PETSC_BUILDTWOSIDED_REDSCATTER - similar to above, but use more optimized function 506 $ that only communicates the part of the reduction that is necessary. Requires MPI-2. 507 508 Level: developer 509 510 .seealso: PetscCommBuildTwoSided(), PetscCommBuildTwoSidedSetType(), PetscCommBuildTwoSidedGetType() 511 E*/ 512 typedef enum { 513 PETSC_BUILDTWOSIDED_NOTSET = -1, 514 PETSC_BUILDTWOSIDED_ALLREDUCE = 0, 515 PETSC_BUILDTWOSIDED_IBARRIER = 1, 516 PETSC_BUILDTWOSIDED_REDSCATTER = 2 517 /* Updates here must be accompanied by updates in finclude/petscsys.h and the string array in mpits.c */ 518 } PetscBuildTwoSidedType; 519 520 /*E 521 InsertMode - Whether entries are inserted or added into vectors or matrices 522 523 Level: beginner 524 525 .seealso: VecSetValues(), MatSetValues(), VecSetValue(), VecSetValuesBlocked(), 526 VecSetValuesLocal(), VecSetValuesBlockedLocal(), MatSetValuesBlocked(), 527 MatSetValuesBlockedLocal(), MatSetValuesLocal(), VecScatterBegin(), VecScatterEnd() 528 E*/ 529 typedef enum {NOT_SET_VALUES, INSERT_VALUES, ADD_VALUES, MAX_VALUES, INSERT_ALL_VALUES, ADD_ALL_VALUES, INSERT_BC_VALUES, ADD_BC_VALUES} InsertMode; 530 531 /*MC 532 INSERT_VALUES - Put a value into a vector or matrix, overwrites any previous value 533 534 Level: beginner 535 536 .seealso: InsertMode, VecSetValues(), MatSetValues(), VecSetValue(), VecSetValuesBlocked(), 537 VecSetValuesLocal(), VecSetValuesBlockedLocal(), MatSetValuesBlocked(), ADD_VALUES, 538 MatSetValuesBlockedLocal(), MatSetValuesLocal(), VecScatterBegin(), VecScatterEnd(), MAX_VALUES 539 540 M*/ 541 542 /*MC 543 ADD_VALUES - Adds a value into a vector or matrix, if there previously was no value, just puts the 544 value into that location 545 546 Level: beginner 547 548 .seealso: InsertMode, VecSetValues(), MatSetValues(), VecSetValue(), VecSetValuesBlocked(), 549 VecSetValuesLocal(), VecSetValuesBlockedLocal(), MatSetValuesBlocked(), INSERT_VALUES, 550 MatSetValuesBlockedLocal(), MatSetValuesLocal(), VecScatterBegin(), VecScatterEnd(), MAX_VALUES 551 552 M*/ 553 554 /*MC 555 MAX_VALUES - Puts the maximum of the scattered/gathered value and the current value into each location 556 557 Level: beginner 558 559 .seealso: InsertMode, VecScatterBegin(), VecScatterEnd(), ADD_VALUES, INSERT_VALUES 560 561 M*/ 562 563 /*S 564 PetscSubcomm - A decomposition of an MPI communicator into subcommunicators 565 566 Notes: 567 After a call to PetscSubcommSetType(), PetscSubcommSetTypeGeneral(), or PetscSubcommSetFromOptions() one may call 568 $ PetscSubcommChild() returns the associated subcommunicator on this process 569 $ PetscSubcommContiguousParent() returns a parent communitor but with all child of the same subcommunicator having contiguous rank 570 571 Sample Usage: 572 PetscSubcommCreate() 573 PetscSubcommSetNumber() 574 PetscSubcommSetType(PETSC_SUBCOMM_INTERLACED); 575 ccomm = PetscSubcommChild() 576 PetscSubcommDestroy() 577 578 Level: advanced 579 580 Concepts: communicator, create 581 582 Notes: 583 $ PETSC_SUBCOMM_GENERAL - similar to MPI_Comm_split() each process sets the new communicator (color) they will belong to and the order within that communicator 584 $ PETSC_SUBCOMM_CONTIGUOUS - each new communicator contains a set of process with contiguous ranks in the original MPI communicator 585 $ PETSC_SUBCOMM_INTERLACED - each new communictor contains a set of processes equally far apart in rank from the others in that new communicator 586 587 Example: Consider a communicator with six processes split into 3 subcommunicators. 588 $ PETSC_SUBCOMM_CONTIGUOUS - the first communicator contains rank 0,1 the second rank 2,3 and the third rank 4,5 in the original ordering of the original communicator 589 $ PETSC_SUBCOMM_INTERLACED - the first communicator contains rank 0,3, the second 1,4 and the third 2,5 590 591 Developer Notes: 592 This is used in objects such as PCREDUNDANT to manage the subcommunicators on which the redundant computations 593 are performed. 594 595 596 .seealso: PetscSubcommCreate(), PetscSubcommSetNumber(), PetscSubcommSetType(), PetscSubcommView(), PetscSubcommSetFromOptions() 597 598 S*/ 599 typedef struct _n_PetscSubcomm* PetscSubcomm; 600 typedef enum {PETSC_SUBCOMM_GENERAL=0,PETSC_SUBCOMM_CONTIGUOUS=1,PETSC_SUBCOMM_INTERLACED=2} PetscSubcommType; 601 602 /*S 603 PetscHeap - A simple class for managing heaps 604 605 Level: intermediate 606 607 Concepts: random numbers 608 609 .seealso: PetscHeapCreate(), PetscHeapAdd(), PetscHeapPop(), PetscHeapPeek(), PetscHeapStash(), PetscHeapUnstash(), PetscHeapView(), PetscHeapDestroy() 610 S*/ 611 typedef struct _PetscHeap *PetscHeap; 612 613 typedef struct _n_PetscShmComm* PetscShmComm; 614 typedef struct _n_PetscOmpCtrl* PetscOmpCtrl; 615 616 /*S 617 PetscSegBuffer - a segmented extendable buffer 618 619 Level: developer 620 621 .seealso: PetscSegBufferCreate(), PetscSegBufferGet(), PetscSegBufferExtract(), PetscSegBufferDestroy() 622 S*/ 623 typedef struct _n_PetscSegBuffer *PetscSegBuffer; 624 625 typedef struct _n_PetscOptionsHelpPrinted *PetscOptionsHelpPrinted; 626 627 #endif 628