anchor.diff:  
    INTEGER(IntKi)                                   :: I,J,K,K2,L,NconEls   !Counters
    INTEGER(IntKi)                                   :: Junk  !Temporary Holders
  + INTEGER(IntKi)                                   :: iMember  ! Member index (not member ID)
    INTEGER(IntKi), Dimension(2)                     :: M   !counter for two nodes at a time
   !-------------------------------------------------------------------------------------------------      
   ! Initialize local variables
  
positive.code:              Junk=M(1)
               IF (M(1) .EQ. p%MoutLst2(I)%NodeIDs(J)) Junk=M(2)
               
               IF (ANY(Init%MemberNodes(p%MoutLst2(I)%MemberID,:) .EQ. Junk)) THEN  !This means we are in the selected member
                   
                    p%MoutLst2(I)%ElmID2s(K2)=L     !This array has for each node requested NODEID(J), for each member I, the element to get results for 
                    
  
negative.code:             Junk=M(1)
              IF (M(1) .EQ. p%MoutLst(I)%NodeIDs(J)) Junk=M(2)
                          
           IF (ANY(Init%MemberNodes(iMember,:) .EQ. Junk)) THEN  !This means we are in the selected member
              IF (K2 .EQ. 2) EXIT
              K2=K2+1
              p%MoutLst(I)%ElmIDs(J,K2)=L        !This array has for each node requested NODEID(J), for each memberMOutLst(I)%MemberID, the 2 elements to average from, it may have 1 if one of the numbers is 0 
  