anchor.diff:  ! 
     ErrStat = ErrID_None
     ErrMsg  = ""
  -  IF ( ALLOCATED(ParamData%S) ) DEALLOCATE(ParamData%S)
  +  IF ( ALLOCATED(ParamData%Stif0) ) DEALLOCATE(ParamData%Stif0)
     IF ( ALLOCATED(ParamData%M) ) DEALLOCATE(ParamData%M)
     IF ( ALLOCATED(ParamData%gll_w) ) DEALLOCATE(ParamData%gll_w)
     IF ( ALLOCATED(ParamData%gll_p) ) DEALLOCATE(ParamData%gll_p)
     IF ( ALLOCATED(ParamData%gll_deriv) ) DEALLOCATE(ParamData%gll_deriv)
  -  IF ( ALLOCATED(ParamData%pos) ) DEALLOCATE(ParamData%pos)
  +  IF ( ALLOCATED(ParamData%uuN0) ) DEALLOCATE(ParamData%uuN0)
     IF ( ALLOCATED(ParamData%det_jac) ) DEALLOCATE(ParamData%det_jac)
  +  IF ( ALLOCATED(ParamData%bc) ) DEALLOCATE(ParamData%bc)
    END SUBROUTINE BDyn_DestroyParam
   
    SUBROUTINE BDyn_PackParam( ReKiBuf, DbKiBuf, IntKiBuf, Indata, ErrStat, ErrMsg, SizeOnly )
  
positive.code:   DEALLOCATE(mask2)
      Re_Xferred   = Re_Xferred   + SIZE(OutData%gll_deriv)
    ENDIF
    IF ( ALLOCATED(OutData%pos) ) THEN
    ALLOCATE(mask2(SIZE(OutData%pos,1),SIZE(OutData%pos,2))); mask2 = .TRUE.
      OutData%pos = UNPACK(ReKiBuf( Re_Xferred:Re_Xferred+(SIZE(OutData%pos))-1 ),mask2,OutData%pos)
    DEALLOCATE(mask2)
      Re_Xferred   = Re_Xferred   + SIZE(OutData%pos)
    ENDIF
    IF ( ALLOCATED(OutData%det_jac) ) THEN
    ALLOCATE(mask1(SIZE(OutData%det_jac,1))); mask1 = .TRUE.
      OutData%det_jac = UNPACK(ReKiBuf( Re_Xferred:Re_Xferred+(SIZE(OutData%det_jac))-1 ),mask1,OutData%det_jac)
    DEALLOCATE(mask1)
      Re_Xferred   = Re_Xferred   + SIZE(OutData%det_jac)
    ENDIF
    Re_Xferred   = Re_Xferred-1
    Db_Xferred   = Db_Xferred-1
  
negative.code:    END IF
     DstParamData%M = SrcParamData%M
  ENDIF
     DstParamData%elem_total = SrcParamData%elem_total
     DstParamData%order = SrcParamData%order
     DstParamData%dof_node = SrcParamData%dof_node
     DstParamData%node_total = SrcParamData%node_total
     DstParamData%dof_total = SrcParamData%dof_total
     DstParamData%node_elem = SrcParamData%node_elem
     DstParamData%dof_elem = SrcParamData%dof_elem
  IF (ALLOCATED(SrcParamData%gll_w)) THEN
     i1 = SIZE(SrcParamData%gll_w,1)
     IF (.NOT.ALLOCATED(DstParamData%gll_w)) THEN 
  