anchor.diff:      INTEGER(IntKi)  :: NBody      !< Number of WAMIT bodies for this State Space model [-]
       REAL(ReKi)  :: WaveDir      !< Wave direction [rad]
       INTEGER(IntKi)  :: NStepWave      !< Number of timesteps in the WaveTime array [-]
  -    REAL(ReKi) , DIMENSION(:), ALLOCATABLE  :: PtfmRefxt      !< The xt offset of the body reference point(s) from (0,0,0)  [1 to NBody; only used when PotMod=1 ] [(m)]
  -    REAL(ReKi) , DIMENSION(:), ALLOCATABLE  :: PtfmRefyt      !< The yt offset of the body reference point(s) from (0,0,0)  [1 to NBody; only used when PotMod=1 ] [(m)]
       REAL(R8Ki) , DIMENSION(:), ALLOCATABLE  :: PtfmRefztRot      !< The rotation about zt of the body reference frame(s) from xt/yt [radians]
       REAL(SiKi) , DIMENSION(:), ALLOCATABLE  :: WaveElev0      !< Wave elevation time history at origin [m]
       REAL(SiKi) , DIMENSION(:), ALLOCATABLE  :: WaveTime      !< Times where wave elevation is known [s]
  
positive.code:       Int_BufSz  = Int_BufSz  + 1  ! NBody
        Re_BufSz   = Re_BufSz   + 1  ! WaveDir
        Int_BufSz  = Int_BufSz  + 1  ! NStepWave
    Int_BufSz   = Int_BufSz   + 1     ! PtfmRefxt allocated yes/no
    IF ( ALLOCATED(InData%PtfmRefxt) ) THEN
      Int_BufSz   = Int_BufSz   + 2*1  ! PtfmRefxt upper/lower bounds for each dimension
        Re_BufSz   = Re_BufSz   + SIZE(InData%PtfmRefxt)  ! PtfmRefxt
    END IF
    Int_BufSz   = Int_BufSz   + 1     ! PtfmRefyt allocated yes/no
    IF ( ALLOCATED(InData%PtfmRefyt) ) THEN
      Int_BufSz   = Int_BufSz   + 2*1  ! PtfmRefyt upper/lower bounds for each dimension
        Re_BufSz   = Re_BufSz   + SIZE(InData%PtfmRefyt)  ! PtfmRefyt
    END IF
    Int_BufSz   = Int_BufSz   + 1     ! PtfmRefztRot allocated yes/no
    IF ( ALLOCATED(InData%PtfmRefztRot) ) THEN
      Int_BufSz   = Int_BufSz   + 2*1  ! PtfmRefztRot upper/lower bounds for each dimension
  
negative.code: ! 
    ErrStat = ErrID_None
    ErrMsg  = ""
  IF (ALLOCATED(InitInputData%PtfmRefztRot)) THEN
    DEALLOCATE(InitInputData%PtfmRefztRot)
  ENDIF
  