- Timestamp:
- Sep 28, 2016 8:45:18 AM (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/wind_turbine_model_mod.f90
r2001 r2015 20 20 ! Current revisions: 21 21 ! ----------------- 22 ! 22 ! Bugfix of pitch control 23 23 ! 24 24 ! Former revisions: … … 1738 1738 ! 1739 1739 !-- Correct with collective pitch angle: 1740 alpha_attack = alpha_attack +pitch_add(inot)1740 alpha_attack = alpha_attack - pitch_add(inot) 1741 1741 1742 1742 ! … … 2058 2058 2059 2059 phi_yaw_l(inot) = phi_yaw(inot) 2060 2060 2061 2061 ENDIF 2062 2062 ENDIF … … 2077 2077 wdir = wdir_l 2078 2078 phi_yaw = phi_yaw_l 2079 2080 2079 2081 #endif 2080 2082 DO inot = 1, nturbines
Note: See TracChangeset
for help on using the changeset viewer.