i:"\n"\'"\n\n"\1:"i/13"
f:{,/100 1*1+{&{c:&/#'x;{x~|y}.(-c;c)#'x}'(0,'1+!-1+#x)_\:x}'(x;+x)}
g:{*(?,/f'.[x;;(".#""."=)]'+!(#x;#*x))^f x}
*+/f'i
+/g'i