anchor.diff:         RETURN
       END IF
   
  -    WRITE(*,*) y%writeOutput ! @bonnie : remove
  +    !WRITE(*,*) y%writeOutput ! @bonnie : remove
   
       ! Copy the MAP C output types to the native Fortran mesh output types
       DO i = 1,y%PtFairleadLoad%NNodes
  
positive.code:                                                                     !          | 
      DO i = 1, numHeaderStr                                          !          | 
         InitOut%WriteOutputHdr(i) = strHdrArray(i)                   !          | 
         InitOut%WriteOutputUnt(i) = strUntArray(i)                   !          | 
      END DO                                                          !          | 
                                                                      !          | 
      DEALLOCATE( strHdrArray )                                       !          | 
  
negative.code:     !           called...
      !CALL DispNVD( InitOut%Ver ) 
      
      !WRITE(*,*) InitOut%WriteOutputHdr ! @bonnie : this is artificial. Remove.
      !WRITE(*,*) InitOut%WriteOutputUnt ! @bonnie : this is artificial. Remove.
  
    END SUBROUTINE MAP_Init                                                                        !   -------+
    !==========================================================================================================
  