Searched refs:_dorander48 (Results 1 – 1 of 1) sorted by relevance
17 static double _dorander48(PetscRandom_Rander48 *r48) in _dorander48() function58 if (PetscRealPart(r->width)) *val += PetscRealPart(r->width) * _dorander48(r48); in PetscRandomGetValue_Rander48()59 …if (PetscImaginaryPart(r->width)) *val += PetscImaginaryPart(r->width) * _dorander48(r48) * PETSC_… in PetscRandomGetValue_Rander48()61 *val = _dorander48(r48) + _dorander48(r48) * PETSC_i; in PetscRandomGetValue_Rander48()64 if (r->iset) *val = r->width * _dorander48(r48) + r->low; in PetscRandomGetValue_Rander48()65 else *val = _dorander48(r48); in PetscRandomGetValue_Rander48()76 if (r->iset) *val = PetscRealPart(r->width) * _dorander48(r48) + PetscRealPart(r->low); in PetscRandomGetValueReal_Rander48()77 else *val = _dorander48(r48); in PetscRandomGetValueReal_Rander48()79 if (r->iset) *val = r->width * _dorander48(r48) + r->low; in PetscRandomGetValueReal_Rander48()80 else *val = _dorander48(r48); in PetscRandomGetValueReal_Rander48()