Home
last modified time | relevance | path

Searched refs:FieldPower2 (Results 1 – 1 of 1) sorted by relevance

/dports/science/elmerfem/elmerfem-release-9.0/fem/src/modules/MagnetoDynamics/
H A DCalcFields.F90531 REAL(KIND=dp) :: Freq2, FreqPower2, FieldPower2, LossCoeff2 local
800 FieldPower2 = GetCReal( SolverParams,'Harmonic Loss Quadratic Exponent',Found )
801 IF( .NOT. Found ) FieldPower2 = 2.0_dp
802 FieldPower2 = FieldPower2 / 2.0_dp
1677 … Coeff2 = s * Basis(p) * LossCoeff2 * ( Freq ** FreqPower2 ) * ( ValAtIp ** FieldPower2 )