method
blink port =
ignore (self
#
for_each_led_light (
function
led
->
led
#
blink) port)