<div dir="auto">Hi Li-Yao,<div dir="auto"><br></div><div dir="auto">I made a mistake with my example. In my real world problem there are many elements after which need updated.</div></div><div class="gmail_extra"><br><div class="gmail_quote">On Mar 13, 2018 5:50 AM, "Li-yao Xia" <<a href="mailto:lysxia@gmail.com">lysxia@gmail.com</a>> wrote:<br type="attribution"><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">The only item of index satisfying (> 2) in the list things is (A 3).<br>
<br>
Li-yao<br>
<br>
<br>
On 03/13/2018 02:44 AM, Cody Goodman wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
Hello,<br>
<br>
I'm trying to insert a new elemnt into a list after a given index and increment the orderId accordingly with the lens library.<br>
<br>
I'm a bit confused at why this code isn't working:<br>
<br>
```<br>
import Control.Lens<br>
<br>
data A = A { _customOrderId :: Int } deriving Show<br>
<br>
things = [ A {_customOrderId = 0}<br>
          , A {_customOrderId = 1}<br>
          , A {_customOrderId = 2}<br>
          , A {_customOrderId = 3}<br>
          ]<br>
<br>
main = print $ things & ( (_drop 2 %~ ((A 22)<|)) . ((traversed . indices (> 2) . customerOrderIdLens) %~ (+ 1))  )<br>
```<br>
The first portion works to insert where desired, but the second portion `((traversed . indices (> 2) . customerOrderIdLens) %~ (+ 1))` only increments the order id in indices 4.<br>
<br>
Any idea why this is happening?<br>
<br>
Thanks,<br>
<br>
Cody Goodman<br>
<br>
<br>
<br>
______________________________<wbr>_________________<br>
Haskell-Cafe mailing list<br>
To (un)subscribe, modify options or view archives go to:<br>
<a href="http://mail.haskell.org/cgi-bin/mailman/listinfo/haskell-cafe" rel="noreferrer" target="_blank">http://mail.haskell.org/cgi-bi<wbr>n/mailman/listinfo/haskell-caf<wbr>e</a><br>
Only members subscribed via the mailman list are allowed to post.<br>
<br>
</blockquote>
______________________________<wbr>_________________<br>
Haskell-Cafe mailing list<br>
To (un)subscribe, modify options or view archives go to:<br>
<a href="http://mail.haskell.org/cgi-bin/mailman/listinfo/haskell-cafe" rel="noreferrer" target="_blank">http://mail.haskell.org/cgi-bi<wbr>n/mailman/listinfo/haskell-caf<wbr>e</a><br>
Only members subscribed via the mailman list are allowed to post.</blockquote></div></div>