coupled.c revision ea374718
1