anchor.diff:  
      PRIVATE
   
  +   INTEGER(IntKi), parameter :: N_INPUTS = 18
  +   INTEGER(IntKi), parameter :: N_OUTPUTS = 6
   
      ! ..... Public Subroutines ...................................................................................................
      PUBLIC :: ExtPtfm_Init                           !  Initialization routine
  
positive.code:    ! local variables
     INTEGER(IntKi)                                    :: I           ! Loop counter
     TYPE(ExtPtfm_InputFile)                           :: InputFileData ! Data stored in the module's input file
     ! Initialize variables
     ErrStat = ErrID_None
     ErrMsg  = ""
  
negative.code:    do I=1,p%nTot; m%PtfmFt(I)=0; end do
     call AllocAry( m%xFlat, 2*p%nCB,'xFlat', ErrStat,ErrMsg); if(Failed()) return
     do I=1,2*p%nCB; m%xFlat(I)=0; end do
     do I=1,N_INPUTS; m%uFlat(I)=0; end do
     
     ! Define initial guess (set up mesh first) for the system inputs here:
     call Init_meshes(u, y, ErrStat, ErrMsg); if(Failed()) return
  