anchor.diff:           ErrStat = ErrID_Fatal
            RETURN
         END IF
  +      m%L_FV = 0.0_ReKi
         ALLOCATE ( m%L_FA(3,y%LumpedMesh%Nnodes), STAT = ErrStat )
         IF ( ErrStat /= ErrID_None ) THEN
            ErrMsg  = ' Error allocating space for L_FA array.'
            ErrStat = ErrID_Fatal
            RETURN
         END IF
  +      m%L_FA = 0.0_ReKi
         ALLOCATE ( m%L_FDynP(y%LumpedMesh%Nnodes), STAT = ErrStat )
         IF ( ErrStat /= ErrID_None ) THEN
            ErrMsg  = ' Error allocating space for L_FDynP array.'
            ErrStat = ErrID_Fatal
            RETURN
         END IF
  +      m%L_FDynP = 0.0_ReKi
         ALLOCATE ( m%L_F_AM(6,y%LumpedMesh%Nnodes), STAT = ErrStat )
         IF ( ErrStat /= ErrID_None ) THEN
            ErrMsg  = ' Error allocating space for L_F_AM array.'
            ErrStat = ErrID_Fatal
            RETURN
         END IF
  +      m%L_F_AM = 0.0_ReKi
         
            ! Define initial guess for the system inputs here:
   
  
positive.code:          ErrStat = ErrID_Fatal
           RETURN
        END IF
        ALLOCATE ( m%D_F_I(3,y%DistribMesh%Nnodes), STAT = ErrStat )
        IF ( ErrStat /= ErrID_None ) THEN
           ErrMsg  = ' Error allocating space for D_F_I array.'
           ErrStat = ErrID_Fatal
           RETURN
        END IF
        
        ALLOCATE ( m%D_F_B(6,y%DistribMesh%Nnodes), STAT = ErrStat )
        IF ( ErrStat /= ErrID_None ) THEN
           ErrMsg  = ' Error allocating space for D_F_B array.'
           ErrStat = ErrID_Fatal
           RETURN
        END IF      
        
        ALLOCATE ( m%D_F_AM(6,y%DistribMesh%Nnodes), STAT = ErrStat )
        IF ( ErrStat /= ErrID_None ) THEN
           ErrMsg  = ' Error allocating space for D_F_AM array.'
           ErrStat = ErrID_Fatal
           RETURN
        END IF
        ALLOCATE ( m%D_F_AM_M(6,y%DistribMesh%Nnodes), STAT = ErrStat )
        IF ( ErrStat /= ErrID_None ) THEN
           ErrMsg  = ' Error allocating space for D_F_AM_M array.'
           ErrStat = ErrID_Fatal
           RETURN
        END IF
        ALLOCATE ( m%D_F_AM_MG(6,y%DistribMesh%Nnodes), STAT = ErrStat )
        IF ( ErrStat /= ErrID_None ) THEN
           ErrMsg  = ' Error allocating space for D_F_AM_MG array.'
           ErrStat = ErrID_Fatal
           RETURN
        END IF
        ALLOCATE ( m%D_F_AM_F(6,y%DistribMesh%Nnodes), STAT = ErrStat )
        IF ( ErrStat /= ErrID_None ) THEN
           ErrMsg  = ' Error allocating space for D_F_AM_F array.'
           ErrStat = ErrID_Fatal
           RETURN
        END IF
        ALLOCATE ( m%D_FV(3,y%DistribMesh%Nnodes), STAT = ErrStat )
        IF ( ErrStat /= ErrID_None ) THEN
           ErrMsg  = ' Error allocating space for D_FV array.'
           ErrStat = ErrID_Fatal
           RETURN
        END IF
        ALLOCATE ( m%D_FA(3,y%DistribMesh%Nnodes), STAT = ErrStat )
        IF ( ErrStat /= ErrID_None ) THEN
           ErrMsg  = ' Error allocating space for D_FA array.'
           ErrStat = ErrID_Fatal
           RETURN
        END IF
        ALLOCATE ( m%D_FDynP(y%DistribMesh%Nnodes), STAT = ErrStat )
        IF ( ErrStat /= ErrID_None ) THEN
           ErrMsg  = ' Error allocating space for D_FDynP array.'
           ErrStat = ErrID_Fatal
           RETURN
        END IF
        
        ALLOCATE ( m%L_F_B(6,y%LumpedMesh%Nnodes), STAT = ErrStat )
        IF ( ErrStat /= ErrID_None ) THEN
  
negative.code:          ErrStat = ErrID_Fatal
           RETURN
        END IF
        m%L_F_B = 0.0_ReKi
        ALLOCATE ( m%L_F_D(3,y%LumpedMesh%Nnodes), STAT = ErrStat )
        IF ( ErrStat /= ErrID_None ) THEN
           ErrMsg  = ' Error allocating space for L_F_D array.'
           ErrStat = ErrID_Fatal
           RETURN
        END IF
        m%L_F_D = 0.0_ReKi
        ALLOCATE ( m%L_F_I(6,y%LumpedMesh%Nnodes), STAT = ErrStat )
        IF ( ErrStat /= ErrID_None ) THEN
           ErrMsg  = ' Error allocating space for L_F_I array.'
           ErrStat = ErrID_Fatal
           RETURN
        END IF
        m%L_F_I = 0.0_ReKi
        !ALLOCATE ( m%L_F_DP(6,y%LumpedMesh%Nnodes), STAT = ErrStat )
        !IF ( ErrStat /= ErrID_None ) THEN
        !   ErrMsg  = ' Error allocating space for L_F_DP array.'
  