anchor.diff:      END IF
   
       ! -- xdotForce Input Data fields
  -    IF ( .NOT. C_ASSOCIATED( InputData%C_obj%xdotForce ) ) THEN
  -       NULLIFY( InputData%xdotForce )
  -    ELSE
  -       CALL C_F_POINTER(InputData%C_obj%xdotForce, InputData%xdotForce, (/InputData%C_obj%xdotForce_Len/))
  +    IF ( .NOT. SkipPointers_local ) THEN
  +       IF ( .NOT. C_ASSOCIATED( InputData%C_obj%xdotForce ) ) THEN
  +          NULLIFY( InputData%xdotForce )
  +       ELSE
  +          CALL C_F_POINTER(InputData%C_obj%xdotForce, InputData%xdotForce, (/InputData%C_obj%xdotForce_Len/))
  +       END IF
       END IF
   
       ! -- ydotForce Input Data fields
  -    IF ( .NOT. C_ASSOCIATED( InputData%C_obj%ydotForce ) ) THEN
  -       NULLIFY( InputData%ydotForce )
  -    ELSE
  -       CALL C_F_POINTER(InputData%C_obj%ydotForce, InputData%ydotForce, (/InputData%C_obj%ydotForce_Len/))
  +    IF ( .NOT. SkipPointers_local ) THEN
  +       IF ( .NOT. C_ASSOCIATED( InputData%C_obj%ydotForce ) ) THEN
  +          NULLIFY( InputData%ydotForce )
  +       ELSE
  +          CALL C_F_POINTER(InputData%C_obj%ydotForce, InputData%ydotForce, (/InputData%C_obj%ydotForce_Len/))
  +       END IF
       END IF
   
       ! -- zdotForce Input Data fields
  -    IF ( .NOT. C_ASSOCIATED( InputData%C_obj%zdotForce ) ) THEN
  -       NULLIFY( InputData%zdotForce )
  -    ELSE
  -       CALL C_F_POINTER(InputData%C_obj%zdotForce, InputData%zdotForce, (/InputData%C_obj%zdotForce_Len/))
  +    IF ( .NOT. SkipPointers_local ) THEN
  +       IF ( .NOT. C_ASSOCIATED( InputData%C_obj%zdotForce ) ) THEN
  +          NULLIFY( InputData%zdotForce )
  +       ELSE
  +          CALL C_F_POINTER(InputData%C_obj%zdotForce, InputData%zdotForce, (/InputData%C_obj%zdotForce_Len/))
  +       END IF
       END IF
   
       ! -- pOrientation Input Data fields
  
positive.code:     IntKiBuf( Int_Xferred + 1) = UBOUND(InData%ydotForce,1)
      Int_Xferred = Int_Xferred + 2
  
        IF (SIZE(InData%ydotForce)>0) ReKiBuf ( Re_Xferred:Re_Xferred+(SIZE(InData%ydotForce))-1 ) = PACK(InData%ydotForce,.TRUE.)
        Re_Xferred   = Re_Xferred   + SIZE(InData%ydotForce)
    END IF
    IF ( .NOT. ASSOCIATED(InData%zdotForce) ) THEN
      IntKiBuf( Int_Xferred ) = 0
  
negative.code:     OutData%c_obj%ydotForce_Len = SIZE(OutData%ydotForce)
      IF (OutData%c_obj%ydotForce_Len > 0) &
         OutData%c_obj%ydotForce = C_LOC( OutData%ydotForce(i1_l) ) 
        DO i1 = LBOUND(OutData%ydotForce,1), UBOUND(OutData%ydotForce,1)
          OutData%ydotForce(i1) = REAL(ReKiBuf(Re_Xferred), C_FLOAT)
          Re_Xferred = Re_Xferred + 1
        END DO
    END IF
    IF ( IntKiBuf( Int_Xferred ) == 0 ) THEN  ! zdotForce not allocated
      Int_Xferred = Int_Xferred + 1
  