Lines Matching refs:ss
130 PetscInt i, j, k, ss = s + 2; in TSGLLESchemeCreate() local
137 …PetscCall(PetscMalloc7(PetscSqr(r), &ImV, 3 * s, &H, 3 * ss, &bmat, lwork, &workscalar, 5 * (3 + r… in TSGLLESchemeCreate()
225 bmat[0 + 0 * ss] = 1.; in TSGLLESchemeCreate()
226 bmat[0 + 1 * ss] = 0.; in TSGLLESchemeCreate()
227 bmat[0 + 2 * ss] = 0.; in TSGLLESchemeCreate()
228 bmat[1 + 0 * ss] = 1.; in TSGLLESchemeCreate()
229 bmat[1 + 1 * ss] = 1.; in TSGLLESchemeCreate()
230 bmat[1 + 2 * ss] = 0.; in TSGLLESchemeCreate()
231 bmat[2 + 0 * ss] = 0.; in TSGLLESchemeCreate()
232 bmat[2 + 1 * ss] = 0.; in TSGLLESchemeCreate()
233 bmat[2 + 2 * ss] = -1.; in TSGLLESchemeCreate()
236 PetscCall(PetscBLASIntCast(ss, &ldb)); in TSGLLESchemeCreate()
249 for (k = 0; k < s; k++) scheme->phi[k + j * s] = bmat[k + j * ss]; in TSGLLESchemeCreate()