anchor.diff:  
      PRIVATE
   
  +   INTEGER(IntKi), parameter :: N_INPUTS = 18
  +   INTEGER(IntKi), parameter :: N_OUTPUTS = 6
   
      ! ..... Public Subroutines ...................................................................................................
      PUBLIC :: ExtPtfm_Init                           !  Initialization routine
  
positive.code:    call AllocAry( y%WriteOutput,        p%NumOuts,'WriteOutput',   ErrStat,ErrMsg); if(Failed()) return
     call AllocAry(InitOut%WriteOutputHdr,p%NumOuts,'WriteOutputHdr',ErrStat,ErrMsg); if(Failed()) return
     call AllocAry(InitOut%WriteOutputUnt,p%NumOuts,'WriteOutputUnt',ErrStat,ErrMsg); if(Failed()) return
     InitOut%WriteOutputHdr(1:p%NumOuts) = p%OutParam(1:p%NumOuts)%Name
     InitOut%WriteOutputUnt(1:p%NumOuts) = p%OutParam(1:p%NumOuts)%Units     
     InitOut%Ver = ExtPtfm_Ver
  
negative.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  = ""
  