Lines Matching refs:Gamma
29 PetscReal *Gamma; /* Stage table, lower triangular with nonzero diagonal */ member
338 const PetscReal Gamma = 1; in TSRosWRegisterAll() local
342 PetscCall(TSRosWRegister(TSROSWTHETA1, 1, 1, &A, &Gamma, &b, NULL, 1, &binterpt)); in TSRosWRegisterAll()
347 const PetscReal Gamma = 0.5; in TSRosWRegisterAll() local
351 PetscCall(TSRosWRegister(TSROSWTHETA2, 2, 1, &A, &Gamma, &b, NULL, 1, &binterpt)); in TSRosWRegisterAll()
360 const PetscReal Gamma[2][2] = { in TSRosWRegisterAll() local
372 PetscCall(TSRosWRegister(TSROSW2P, 2, 2, &A[0][0], &Gamma[0][0], b, b1, 2, &binterpt[0][0])); in TSRosWRegisterAll()
380 const PetscReal Gamma[2][2] = { in TSRosWRegisterAll() local
392 PetscCall(TSRosWRegister(TSROSW2M, 2, 2, &A[0][0], &Gamma[0][0], b, b1, 2, &binterpt[0][0])); in TSRosWRegisterAll()
402 const PetscReal Gamma[3][3] = { in TSRosWRegisterAll() local
417 PetscCall(TSRosWRegister(TSROSWRA3PW, 3, 3, &A[0][0], &Gamma[0][0], b, b2, 2, &binterpt[0][0])); in TSRosWRegisterAll()
428 const PetscReal Gamma[4][4] = { in TSRosWRegisterAll() local
450 … PetscCall(TSRosWRegister(TSROSWRA34PW2, 3, 4, &A[0][0], &Gamma[0][0], b, b2, 3, &binterpt[0][0])); in TSRosWRegisterAll()
460 const PetscReal Gamma[4][4] = { in TSRosWRegisterAll() local
469 PetscCall(TSRosWRegister(TSROSWR34PRW, 3, 4, &A[0][0], &Gamma[0][0], b, b2, 0, NULL)); in TSRosWRegisterAll()
479 const PetscReal Gamma[4][4] = { in TSRosWRegisterAll() local
488 PetscCall(TSRosWRegister(TSROSWR3PRL2, 3, 4, &A[0][0], &Gamma[0][0], b, b2, 0, NULL)); in TSRosWRegisterAll()
498 const PetscReal Gamma[4][4] = { in TSRosWRegisterAll() local
507 PetscCall(TSRosWRegister(TSROSWRODAS3, 3, 4, &A[0][0], &Gamma[0][0], b, b2, 0, NULL)); in TSRosWRegisterAll()
519 const PetscReal Gamma[6][6] = { in TSRosWRegisterAll() local
530 PetscCall(TSRosWRegister(TSROSWRODASPR, 4, 6, &A[0][0], &Gamma[0][0], b, b2, 0, NULL)); in TSRosWRegisterAll()
542 const PetscReal Gamma[6][6] = { in TSRosWRegisterAll() local
553 PetscCall(TSRosWRegister(TSROSWRODASPR2, 4, 6, &A[0][0], &Gamma[0][0], b, b2, 0, NULL)); in TSRosWRegisterAll()
562 const PetscReal Gamma[3][3] = { in TSRosWRegisterAll() local
578 … PetscCall(TSRosWRegister(TSROSWSANDU3, 3, 3, &A[0][0], &Gamma[0][0], b, b2, 2, &binterpt[0][0])); in TSRosWRegisterAll()
590 const PetscReal Gamma[3][3] = { in TSRosWRegisterAll() local
606 …PetscCall(TSRosWRegister(TSROSWASSP3P3S1C, 3, 3, &A[0][0], &Gamma[0][0], b, b2, 2, &binterpt[0][0]… in TSRosWRegisterAll()
616 const PetscReal Gamma[4][4] = { in TSRosWRegisterAll() local
639 …PetscCall(TSRosWRegister(TSROSWLASSP3P4S2C, 3, 4, &A[0][0], &Gamma[0][0], b, b2, 3, &binterpt[0][0… in TSRosWRegisterAll()
649 const PetscReal Gamma[4][4] = { in TSRosWRegisterAll() local
672 …PetscCall(TSRosWRegister(TSROSWLLSSP3P4S2C, 3, 4, &A[0][0], &Gamma[0][0], b, b2, 3, &binterpt[0][0… in TSRosWRegisterAll()
676 PetscReal A[4][4], Gamma[4][4], b[4], b2[4]; in TSRosWRegisterAll() local
679 Gamma[0][0] = 0.4358665215084589994160194475295062513822671686978816; in TSRosWRegisterAll()
680 Gamma[0][1] = 0; in TSRosWRegisterAll()
681 Gamma[0][2] = 0; in TSRosWRegisterAll()
682 Gamma[0][3] = 0; in TSRosWRegisterAll()
683 Gamma[1][0] = -1.997527830934941248426324674704153457289527280554476; in TSRosWRegisterAll()
684 Gamma[1][1] = 0.4358665215084589994160194475295062513822671686978816; in TSRosWRegisterAll()
685 Gamma[1][2] = 0; in TSRosWRegisterAll()
686 Gamma[1][3] = 0; in TSRosWRegisterAll()
687 Gamma[2][0] = -1.007948511795029620852002345345404191008352770119903; in TSRosWRegisterAll()
688 Gamma[2][1] = -0.004648958462629345562774289390054679806993396798458131; in TSRosWRegisterAll()
689 Gamma[2][2] = 0.4358665215084589994160194475295062513822671686978816; in TSRosWRegisterAll()
690 Gamma[2][3] = 0; in TSRosWRegisterAll()
691 Gamma[3][0] = -0.6685429734233467180451604600279552604364311322650783; in TSRosWRegisterAll()
692 Gamma[3][1] = 0.6056625986449338476089525334450053439525178740492984; in TSRosWRegisterAll()
693 Gamma[3][2] = -0.9717899277217721234705114616271378792182450260943198; in TSRosWRegisterAll()
694 Gamma[3][3] = 0; in TSRosWRegisterAll()
736 PetscCall(TSRosWRegister(TSROSWARK3, 3, 4, &A[0][0], &Gamma[0][0], b, b2, 3, &binterpt[0][0])); in TSRosWRegisterAll()
762 PetscCall(PetscFree5(t->A, t->Gamma, t->b, t->ASum, t->GammaSum)); in TSRosWRegisterDestroy()
830 …pe name, PetscInt order, PetscInt s, const PetscReal A[], const PetscReal Gamma[], const PetscReal… in TSRosWRegister() argument
840 PetscAssertPointer(Gamma, 5); in TSRosWRegister()
850 PetscCall(PetscMalloc5(s * s, &t->A, s * s, &t->Gamma, s, &t->b, s, &t->ASum, s, &t->GammaSum)); in TSRosWRegister()
853 PetscCall(PetscArraycpy(t->Gamma, Gamma, s * s)); in TSRosWRegister()
854 PetscCall(PetscArraycpy(t->GammaExplicitCorr, Gamma, s * s)); in TSRosWRegister()
865 t->GammaSum[i] += Gamma[i * s + j]; in TSRosWRegister()
869 for (i = 0; i < s * s; i++) GammaInv[i] = Gamma[i]; in TSRosWRegister()
871 if (Gamma[i * s + i] == 0.0) { in TSRosWRegister()
966 PetscReal A[4][4], Gamma[4][4], b[4], bm[4]; in TSRosWRegisterRos4() local
1039 Gamma[0][0] = gamma; in TSRosWRegisterRos4()
1040 Gamma[0][1] = 0; in TSRosWRegisterRos4()
1041 Gamma[0][2] = 0; in TSRosWRegisterRos4()
1042 Gamma[0][3] = 0; in TSRosWRegisterRos4()
1043 Gamma[1][0] = beta2p - A[1][0]; in TSRosWRegisterRos4()
1044 Gamma[1][1] = gamma; in TSRosWRegisterRos4()
1045 Gamma[1][2] = 0; in TSRosWRegisterRos4()
1046 Gamma[1][3] = 0; in TSRosWRegisterRos4()
1047 Gamma[2][0] = beta3p - beta32 - A[2][0]; in TSRosWRegisterRos4()
1048 Gamma[2][1] = beta32 - A[2][1]; in TSRosWRegisterRos4()
1049 Gamma[2][2] = gamma; in TSRosWRegisterRos4()
1050 Gamma[2][3] = 0; in TSRosWRegisterRos4()
1051 Gamma[3][0] = beta4p - beta42 - beta43 - A[3][0]; in TSRosWRegisterRos4()
1052 Gamma[3][1] = beta42 - A[3][1]; in TSRosWRegisterRos4()
1053 Gamma[3][2] = beta43 - A[3][2]; in TSRosWRegisterRos4()
1054 Gamma[3][3] = gamma; in TSRosWRegisterRos4()
1070 PetscCall(TSRosWRegister(name, 4, 4, &A[0][0], &Gamma[0][0], b, bm, 0, NULL)); in TSRosWRegisterRos4()
1130 const PetscReal *At = tab->At, *Gamma = tab->Gamma, *ASum = tab->ASum, *GammaInv = tab->GammaInv; in TSStep_RosW() local
1157 ros->scoeff = 1. / Gamma[i * s + i]; in TSStep_RosW()