Actual source code: matheq.c

      1: #include <petscsys.h>

      3: /*@C
      4:     PetscEqualReal - Returns whether the two real values are equal.

      6:     Input Parameter:
      7: +     a - first real number
      8: -     b - second real number

     10:     Notes:
     11:     Equivalent to "a == b". Should be used to prevent compilers from
     12:     emitting floating point comparison warnings (e.g. GCC's -Wfloat-equal flag)
     13:     in PETSc header files or user code.

     15:     Level: developer
     16: @*/
     17: PetscBool PetscEqualReal(PetscReal a,PetscReal b)
     18: {
     19:   return (a == b) ? PETSC_TRUE : PETSC_FALSE;
     20: }

     22: /*@C
     23:     PetscEqualScalar - Returns whether the two scalar values are equal.

     25:     Input Parameter:
     26: +     a - first scalar value
     27: -     b - second scalar value

     29:     Notes:
     30:     Equivalent to "a == b". Should be used to prevent compilers from
     31:     emitting floating point comparison warnings (e.g. GCC's -Wfloat-equal flag)
     32:     in PETSc header files or user code.

     34:     Level: developer
     35: @*/
     36: PetscBool PetscEqualScalar(PetscScalar a,PetscScalar b)
     37: {
     38:   return (a == b) ? PETSC_TRUE : PETSC_FALSE;
     39: }