let rec(!)?(c=input_byte stdin)p=print_string(String.make(abs(p-c))"-+".[1/(p/c+1)]^".");!c;;!0