Lines Matching refs:Pmax
34 PetscScalar H, D, omega_s, Pmax, Pm, E, V, X; member
43 PetscScalar *f, Pmax; in IFunction() local
51 …if ((t > ctx->tf) && (t < ctx->tcl)) Pmax = 0.0; /* A short-circuit on the generator terminal that… in IFunction()
52 else if (t >= ctx->tcl) Pmax = ctx->E / 0.745; in IFunction()
53 else Pmax = ctx->Pmax; in IFunction()
55 f[1] = 2.0 * ctx->H * udot[1] + Pmax * PetscSinScalar(u[0]) + ctx->D * (u[1] - 1.0) - ctx->Pm; in IFunction()
69 PetscScalar J[2][2], Pmax; in IJacobian() local
75 …if ((t > ctx->tf) && (t < ctx->tcl)) Pmax = 0.0; /* A short-circuit on the generator terminal that… in IJacobian()
76 else if (t >= ctx->tcl) Pmax = ctx->E / 0.745; in IJacobian()
77 else Pmax = ctx->Pmax; in IJacobian()
82 J[1][0] = Pmax * PetscCosScalar(u[0]); in IJacobian()
157 ctx.Pmax = ctx.E * ctx.V / ctx.X; in main()
158 PetscCall(PetscOptionsScalar("-Pmax", "", "", ctx.Pmax, &ctx.Pmax, NULL)); in main()
172 u[0] = PetscAsinScalar(ctx.Pm / ctx.Pmax); in main()
216 u[0] = PetscAsinScalar(ctx.Pm / ctx.Pmax); in main()