anchor.diff:       IF ( mesh_debug ) print*,'Called MeshConstructElement_20PT'
        ErrStat = ErrID_None
        ErrMess = ''
  -     ErrStat = 1
  +     ErrStat = ErrID_Fatal
        ErrMess = 'MeshConstructElement_20PT not supported'
      END SUBROUTINE MeshConstructElement_20PT
   
  
positive.code:        Mesh%ElemTable(ELEMENT_POINT)%Elements(Mesh%ElemTable(ELEMENT_POINT)%nelem)%ElemNodes(1) = P1
         Mesh%ElemTable(ELEMENT_POINT)%Elements(Mesh%ElemTable(ELEMENT_POINT)%nelem)%Xelement = ELEMENT_POINT
       ELSE
         ErrMess = 'MeshConstructElement_1PT called for invalid element type'
         ErrStat = -1 !bjj: invalid ErrStat code. Use ErrID_Fatal or similar
       ENDIF
       RETURN
  
  
negative.code:      LOGICAL IgSib
       INTEGER i, j, k
  
       ErrStat = ErrID_None 
  
       IF ( .NOT. Mesh%Initialized ) RETURN 
  
  