Skip to content

Commit

Permalink
HD: always allocating A,B,C (Closes OpenFAST#1046)
Browse files Browse the repository at this point in the history
  • Loading branch information
ebranlard committed Mar 15, 2022
1 parent e494370 commit 0b8426d
Showing 1 changed file with 0 additions and 4 deletions.
4 changes: 0 additions & 4 deletions modules/hydrodyn/src/HydroDyn.f90
Original file line number Diff line number Diff line change
Expand Up @@ -2579,8 +2579,6 @@ SUBROUTINE HD_JacobianPInput( t, u, p, x, xd, z, OtherState, y, m, ErrStat, ErrM
! For the case where either RdtnMod=0 and ExtcnMod=0 and hence %SS_Rdtn data or %SS_Exctn data is not valid then we do not have states, so simply return
! The key here is to never allocate the dXdu and related state Jacobian arrays because then the glue-code will behave properly

if ( p%totalStates == 0 ) return

! Calculate the partial derivative of the continuous state functions (X) with respect to the inputs (u) here:

! allocate dXdu if necessary
Expand Down Expand Up @@ -2753,8 +2751,6 @@ SUBROUTINE HD_JacobianPContState( t, u, p, x, xd, z, OtherState, y, m, ErrStat,
ErrStat = ErrID_None
ErrMsg = ''

if ( p%totalStates == 0 ) return

! Calculate the partial derivative of the output functions (Y) with respect to the continuous states (x) here:


Expand Down

0 comments on commit 0b8426d

Please sign in to comment.