Commit 3ebde57f authored by gepir's avatar gepir
Browse files

FOR TESTS: notch filter at 3.55 Hz on the generator used for the constant power torque

parent aeac0016
......@@ -121,6 +121,7 @@ subroutine init_regulation(array1, array2) bind(c, name='init_regulation')
! Drivetrain mode notch filters for pitch controller
DT_mode_filt%f0 = array1(10)
pwr_DT_mode_filt%f0 = DT_mode_filt%f0
DT_mode_filt_torque%f0 = 3.55
! Partial load control parameters
Kopt = array1(11)
PID_gen_var%Kpro = array1(12)
......
......@@ -40,6 +40,7 @@ module turbine_controller_mod
type(Tfirstordervar), save :: wspfirstordervar
type(Tpidvar), save :: PID_gen_var
type(Tnotch2order), save :: DT_mode_filt
type(Tnotch2order), save :: DT_mode_filt_torque
type(Tnotch2order), save :: pwr_DT_mode_filt
type(Tpid2var), save :: PID_pit_var
type(Tdamper), save :: DT_damper
......@@ -478,7 +479,7 @@ subroutine torquecontroller(GenSpeed, GenSpeedFilt, dGenSpeed_dtFilt, PitchMean,
real(mk) GenTorqueMin_full, GenTorqueMax_full, GenTorqueMin_partial, GenTorqueMax_partial
real(mk) GenSpeed_min1, GenSpeed_min2, GenSpeed_max1, GenSpeed_max2, GenSpeedRef
real(mk) x, switch, switch_pitang_lower, switch_pitang_upper,ConstantPowerTorque
real(mk) kgain(3), GenSpeedFiltErr, GenSpeedErr, outmin, outmax
real(mk) kgain(3), GenSpeedFiltErr, GenSpeedErr, outmin, outmax, GenSpeedFiltTorque
!***********************************************************************************************
! Speed ref. changes max. <-> min. for torque contr. and remains at rated for pitch contr.
!***********************************************************************************************
......@@ -503,7 +504,9 @@ subroutine torquecontroller(GenSpeed, GenSpeedFilt, dGenSpeed_dtFilt, PitchMean,
!-----------------------------------------------------------------------------------------------
! Limits for full load
!-----------------------------------------------------------------------------------------------
ConstantPowerTorque=min((GenTorqueRated*GenSpeedRef_full)/max(GenSpeed, GenSpeedRefMin),GenTorqueMax)
GenSpeedFiltTorque=notch2orderfilt(deltat, stepno, DT_mode_filt_torque, Genspeed)
ConstantPowerTorque=min((GenTorqueRated*GenSpeedRef_full)/max(GenSpeedFiltTorque, GenSpeedRefMin),GenTorqueMax)
GenTorqueMin_full = GenTorqueRated*(1.0_mk-TorqueCtrlRatio) + ConstantPowerTorque*TorqueCtrlRatio
GenTorqueMax_full = GenTorqueMin_full
!-----------------------------------------------------------------------------------------------
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment