1ce4818fdSLisandro Dalcin #include <petscsys.h> 2ce4818fdSLisandro Dalcin 3ce4818fdSLisandro Dalcin /*@C 4ce4818fdSLisandro Dalcin PetscEqualReal - Returns whether the two real values are equal. 5ce4818fdSLisandro Dalcin 6d8d19677SJose E. Roman Input Parameters: 7ce4818fdSLisandro Dalcin + a - first real number 8ce4818fdSLisandro Dalcin - b - second real number 9ce4818fdSLisandro Dalcin 1095452b02SPatrick Sanan Notes: 1195452b02SPatrick Sanan Equivalent to "a == b". Should be used to prevent compilers from 12ce4818fdSLisandro Dalcin emitting floating point comparison warnings (e.g. GCC's -Wfloat-equal flag) 13ce4818fdSLisandro Dalcin in PETSc header files or user code. 14ce4818fdSLisandro Dalcin 15ce4818fdSLisandro Dalcin Level: developer 16ce4818fdSLisandro Dalcin @*/ 17*9371c9d4SSatish Balay PetscBool PetscEqualReal(PetscReal a, PetscReal b) { 18ce4818fdSLisandro Dalcin return (a == b) ? PETSC_TRUE : PETSC_FALSE; 19ce4818fdSLisandro Dalcin } 20ce4818fdSLisandro Dalcin 21ce4818fdSLisandro Dalcin /*@C 22ce4818fdSLisandro Dalcin PetscEqualScalar - Returns whether the two scalar values are equal. 23ce4818fdSLisandro Dalcin 24d8d19677SJose E. Roman Input Parameters: 25ce4818fdSLisandro Dalcin + a - first scalar value 26ce4818fdSLisandro Dalcin - b - second scalar value 27ce4818fdSLisandro Dalcin 2895452b02SPatrick Sanan Notes: 2995452b02SPatrick Sanan Equivalent to "a == b". Should be used to prevent compilers from 30ce4818fdSLisandro Dalcin emitting floating point comparison warnings (e.g. GCC's -Wfloat-equal flag) 31ce4818fdSLisandro Dalcin in PETSc header files or user code. 32ce4818fdSLisandro Dalcin 33ce4818fdSLisandro Dalcin Level: developer 34ce4818fdSLisandro Dalcin @*/ 35*9371c9d4SSatish Balay PetscBool PetscEqualScalar(PetscScalar a, PetscScalar b) { 36ce4818fdSLisandro Dalcin return (a == b) ? PETSC_TRUE : PETSC_FALSE; 37ce4818fdSLisandro Dalcin } 38