anchor.diff:           IF (ErrStat >= AbortErrLev) RETURN
   
            NewmanAppData%DataIs3D = .TRUE.       ! Set flag to indicate we now have the 3D data.
  -       
  +
         ENDIF
   
   
  
positive.code:          IF (ErrStat >= AbortErrLev) RETURN
  
           MnDriftData%DataIs3D = .TRUE.       ! Set flag to indicate we now have the 3D data.
           
        ENDIF
  
  
  
negative.code: ! distributed under the License is distributed on an "AS IS" BASIS,
  ! WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  ! See the License for the specific language governing permissions and
  !
  !**********************************************************************************************************************************
  MODULE WAMIT2
  
  