Fitness Seller

Sticky Wat heeft jouw dag verpest?

Ik zal het door de vingers zien Eric, alleen maar omdat jij het bent :o
 
Sayer zei:
:rolleyes:
Klik om te vergroten...
Klik om te verkleinen...
Ga je nou ook nog bijdehand doen ?
jij weet alles , alle vragen en of misverstanden zal ik naar u door sturen...........

Ik ben helemaal naar de klote..
en het voelt nog niet lekker , van het trainen......(full body en hiit lol)

Heb ook besloten iets iets anders aan te pakken...........
 
Laatst bewerkt:
Training af moeten breken door kramp in mijn voet.. :mad: grote teen stond recht naar beneden en die ernaast recht omhoog en mijn voet was compleet blauw. Het schoot er zomaar in... Kon niets meer :) fysio is een half uur bezig geweest om het weer in orde te krijgen. Kan weer lopen maar daar is alles mee gezegd...
 
Het weer potverdomme, moet buiten voor postbode spelen maar 't moet natuurlijk eerst droog worden
 
animated+eye+knife.png


Mijn kop splijt open:

Code: 
maybeUser <- runDB $ get userId
    receipts <- runDB $ selectList [ReceiptReceiver ==. userId] []

    --receipts not from this user
    otherReceipts <- runDB $ selectList [ReceiptReceiver !=. userId] []

    --(ReceiptUser, Receipt)
    allUsersDebts <- runDB $ do
        allDebtors  <- selectList [] []
        allReceipts <- selectList [] []
        -- Filter out all the debts the user is not a part of
        let filteredDebtors = filter (\(Entity receiptUserId receiptUser) -> 
                                        elem userId (receiptUserDebtor receiptUser)) allDebtors
        return $ joinTables receiptUserReceipt filteredDebtors allReceipts
    
    unpaidDebts <- runDB $ do
        --all payments this user made
        allUsersPayments <- selectList [PaymentFrom ==. userId] []
        --all receipt of the payments made by the user
        let allUsersPaymentsReceiptIds = map (\(Entity paymentId payment) -> paymentReceipt payment) allUsersPayments
        --all receipt ids of the receipts above
        let receiptIds = map (\(_, Entity receiptId receipt) -> receiptId) allUsersDebts
        --receiptIds - UsersPayments = list of all receipt Ids that haven't been paid
        let temp = filter (\receiptId -> elem receiptId allUsersPaymentsReceiptIds) receiptIds
        return $ filter (\(Entity receiptId receipt) -> notElem receiptId temp) otherReceipts
 
Hele dag al foutmeldingen op de helft van de topics waar ik op klik; 502 Bad Gateway
Ben ik de enige?
 
joostd zei:
kast van je pc openmaken, en alle rode kabels eruit trekken die je ziet
Klik om te vergroten...
Klik om te verkleinen...

SkyBlazer zei:
ron-swanson-computer-throw-out-parks-and-rec.gif
Klik om te vergroten...
Klik om te verkleinen...

Dat is precies wat er gaat gebeuren wanneer ik die kast zelf openbreek :roflol:
Zal morgen eens kijken wat er te zien valt in dat ding, nu studeren, wat me dag ook verpest :mad:

---------- Toegevoegd om 16:17 ---------- De post hierboven werd geplaatst om 16:16 ----------
Sayer zei:
http://forum.dutchbodybuilding.com/f15/502-bad-gateway-297468/
Klik om te vergroten...
Klik om te verkleinen...

Thanks, handig zo'n topic!
 
Inloggen of registreren om te reageren.

Soortgelijke topics

R
IVDM - September 2017 - Robke78
2
Reacties
29
Weergaven
11.155
sector
sector
R
Aankondiging Forumgame 10: The war between two ideologies
28 29 30
Reacties
595
Weergaven
30.770
Remi AFCA
R
L
Forum game 8: Voor de niet valsspelers only
64 65 66
Reacties
1.313
Weergaven
50.369
z1000
z1000
The Dutch Giant
  • Sticky
Sticky Rise of the Dutch Giant (2.18meter / 7.2feet)
133 134 135
Reacties
2.690
Weergaven
544.854
spitfire01
spitfire01
Terug
Naar boven