openfast
openfast copied to clipboard
The lowest element of a member must not cross the free surface
Bug description The error : "The lowest element of a member must not cross the free surface. This is true for MemberID .. ' is issued.
To Reproduce This is for a member crossing the free water surface. However I've gotten rid of the error message by rewriting the code slightly (Morison.f90).
The new code looks like:
!
! Correction next line. B. Melhus, 29.09.2021
! else if (0.0 > Zb) then
else if (0.0 >= Zb) then
! fully submerged elements.
! NOTE: For an element which is fractionaly in the seabed, the entire element volume is added to totals
member%Vinner = member%Vinner + Vinner_l + Vinner_u
member%Vouter = member%Vouter + Vouter_l + Vouter_u
member%Vsubmerged = member%Vsubmerged + Vouter_l + Vouter_u
!
! Correction next line. B. Melhus, 29.09.2021
! else if ((0.0 > Za) .AND. (0.0 <= Zb)) then
else if ((0.0 > Za) .AND. (0.0 < Zb)) then
if (i == 1) then
call SetErrStat(ErrID_Fatal, 'The lowest element of a member must not cross the free surface. This is true for MemberID '//trim(num2lstr(member%MemberID)), errStat, errMsg, 'SetMemberProperties')
end if
and the error message is not issued. The error was issued because Zb=0 (i.e. exactly equal zero). Having rewritten to 0<Zb will make it work.
OpenFAST Version OpenFAST-v3.0.0-dirty Compile Info:
- Compiler: Intel(R) Fortran Compiler 1910
- Architecture: 64 bit
- Precision: single
- OpenMP: No
- Date: Sep 27 2021
- Time: 16:55:23 Execution Info:
- Date: 09/29/2021
- Time: 13:40:11+0200