digits = '1234567890'
loop  line = input   :f(end)
      line fence arb span(digits) . d1 (span(' ') | '')  arb . p2 break(')') ')' (span(' ') | '') span(digits) . d2 
      g = 0.0
      line fence arb span(digits) . d1 (span(' ') | '') 'mcb' arb . p2 break(')') ')' (span(' ') | '') span(digits) . dx :f(sk1)
      g = g + d1 * 4.4
sk1      line fence arb span(digits) . d1 (span(' ') | '') 'dcb' arb . p2 break(')') ')' (span(' ') | '') span(digits) . dx :f(sk2)
      g = g + d1 * 21
sk2      line fence arb span(digits) . d1 (span(' ') | '') 'dm-cb' arb . p2 break(')') ')' (span(' ') | '') span(digits) . dx :f(sk3)
      g = g + d1 * 3.8
sk3      line fence arb span(digits) . d1 (span(' ') | '') '3musk' arb . p2 break(')') ')' (span(' ') | '') span(digits) . dx :f(sk4)
      g = g + d1 * 36
sk4      line fence arb span(digits) . d1 (span(' ') | '') 'mm' arb . p2 break(')') ')' (span(' ') | '') span(digits) . dx :f(sk5)
      g = g + d1 * 0.5 
sk5      line fence arb span(digits) . d1 (span(' ') | '') 'c kiss' arb . p2 break(')') ')' (span(' ') | '') span(digits) . dx :f(sk6)
      g = g + d1 * 2.4
sk6      line fence arb span(digits) . d1 (span(' ') | '') 'h cocoa' arb . p2 break(')') ')' (span(' ') | '') span(digits) . dx :f(sk7)
      g = g + d1 * 19
sk7      line fence arb span(digits) . d1 (span(' ') | '') 'g choc chip' arb . p2 break(')') ')' (span(' ') | '') span(digits) . dx :f(sk8)
      g = g + d1 * 0.5
sk8      line fence arb span(digits) . d1 (span(' ') | '') 'milk' arb . p2 break(')') ')' (span(' ') | '') span(digits) . dx :f(sk9)
      g = g + d1 * 11
sk9      line fence arb span(digits) . d1 (span(' ') | '') 'gr cr' arb . p2 break(')') ')' (span(' ') | '') span(digits) . dx :f(sk10)
      g = g + d1 * 4
sk10      line fence arb span(digits) . d1 (span(' ') | '') 'cgr cr' arb . p2 break(')') ')' (span(' ') | '') span(digits) . dx :f(sk11)
      g = g + d1 * 4
sk11      output = g ' ' d2   :(loop)
end