pub fn main() { crate::prepare!(); sc!(k); let calc = |n: usize| { let n = n.to_digit_sequence(); let res = automaton!((<= n) & (=> || false, |s, c| Some(*s || *c > 0), |s| *s )) .dp::((Saturating(0usize), Saturating(1usize))) .run_effect( || 0usize..10, n.len(), |&(x, y), _, &c, &ns| { if ns.1 { match c { 4 | 6 | 9 | 0 => (x + y, y), 8 => (x + y + y, y), _ => (x, y), } } else { (x, y) } }, ); (res.0).0 }; let n = binary_search(|&n| calc(n) >= k, 10usize.pow(18), 0); let c = calc(n); if c == k { pp!(n); } else { pp!(-1); } } struct X; impl Magma for X { type T = (Saturating, Saturating); fn operate(x: &Self::T, y: &Self::T) -> Self::T { (x.0 + y.0, x.1 + y.1) } } impl Unital for X { fn unit() -> Self::T { (Saturating(0), Saturating(0)) } } impl Associative for X {} #[allow(unused_imports)]use std::{cmp::{Ordering,Reverse},collections::{BTreeMap,BTreeSet,BinaryHeap,HashMap,HashSet,VecDeque}}; mod main_macros{#[doc=" Prepare useful macros."]#[doc=" - `prepare!();`: default (all input scanner (`sc!`, `sv!`) + buf print (`pp!`, `dg!`))"]#[doc=" - `prepare!(?);`: interactive (line scanner (`scln!`) + buf print (`pp!`, `dg!`))"]#[macro_export]macro_rules!prepare{(@output($dol:tt))=>{#[allow(unused_imports)]use std::io::Write as _;let __out=std::io::stdout();#[allow(unused_mut,unused_variables)]let mut __out=std::io::BufWriter::new(__out.lock());#[allow(unused_macros)]#[doc=" [`iter_print!`] for buffered stdout."]macro_rules!pp{($dol($dol t:tt)*)=>{$dol crate::iter_print!(__out,$dol($dol t)*)}}#[cfg(debug_assertions)]#[allow(unused_macros)]#[doc=" [`iter_print!`] for buffered stderr. Do nothing in release mode."]macro_rules!dg{($dol($dol t:tt)*)=>{{#[allow(unused_imports)]use std::io::Write as _;let __err=std::io::stderr();#[allow(unused_mut,unused_variables)]let mut __err=std::io::BufWriter::new(__err.lock());$dol crate::iter_print!(__err,$dol($dol t)*);let _=__err.flush();}}}#[cfg(not(debug_assertions))]#[allow(unused_macros)]#[doc=" [`iter_print!`] for buffered stderr. Do nothing in release mode."]macro_rules!dg{($dol($dol t:tt)*)=>{}}};(@normal($dol:tt))=>{let __in_buf=read_stdin_all_unchecked();#[allow(unused_mut,unused_variables)]let mut __scanner=Scanner::new(&__in_buf);#[allow(unused_macros)]macro_rules!sc{($dol($dol t:tt)*)=>{$dol crate::scan!(__scanner,$dol($dol t)*)}}#[allow(unused_macros)]macro_rules!sv{($dol($dol t:tt)*)=>{$dol crate::scan_value!(__scanner,$dol($dol t)*)}}};(@interactive($dol:tt))=>{#[allow(unused_macros)]#[doc=" Scan a line, and previous line will be truncated in the next call."]macro_rules!scln{($dol($dol t:tt)*)=>{let __in_buf=read_stdin_line();#[allow(unused_mut,unused_variables)]let mut __scanner=Scanner::new(&__in_buf);$dol crate::scan!(__scanner,$dol($dol t)*)}}};()=>{$crate::prepare!(@output($));$crate::prepare!(@normal($))};(?)=>{$crate::prepare!(@output($));$crate::prepare!(@interactive($))};}} pub use self::iter_print::IterPrint; mod iter_print{use std::{fmt::Display,io::{Error,Write}};pub trait IterPrint{fn iter_print(self,writer:&mut W,sep:S,is_head:bool)->Result<(),Error>where W:Write,S:Display;}macro_rules!iter_print_tuple_impl{(@impl$($A:ident$a:ident)?,$($B:ident$b:ident)*)=>{impl<$($A,)?$($B),*>IterPrint for($($A,)?$($B),*)where$($A:Display,)?$($B:Display),*{#[allow(unused_variables)]fn iter_print(self,writer:&mut W,sep:S,is_head:bool)->Result<(),Error>where W:Write,S:Display{let($($a,)?$($b,)*)=self;$(if is_head{::std::write!(writer,"{}",$a)?;}else{::std::write!(writer,"{}{}",sep,$a)?;})?$(::std::write!(writer,"{}{}",sep,$b)?;)*Ok(())}}};(@inc,,$C:ident$c:ident$($D:ident$d:ident)*)=>{iter_print_tuple_impl!(@impl,);iter_print_tuple_impl!(@inc$C$c,,$($D$d)*);};(@inc$A:ident$a:ident,$($B:ident$b:ident)*,$C:ident$c:ident$($D:ident$d:ident)*)=>{iter_print_tuple_impl!(@impl$A$a,$($B$b)*);iter_print_tuple_impl!(@inc$A$a,$($B$b)*$C$c,$($D$d)*);};(@inc$A:ident$a:ident,$($B:ident$b:ident)*,)=>{iter_print_tuple_impl!(@impl$A$a,$($B$b)*);};($($t:tt)*)=>{iter_print_tuple_impl!(@inc,,$($t)*);};}iter_print_tuple_impl!(A a B b C c D d E e F f G g H h I i J j K k);#[doc=" Print expressions with a separator."]#[doc=" - `iter_print!(writer, args...)`"]#[doc=" - `@sep $expr`: set separator (default: `' '`)"]#[doc=" - `@ns`: alias for `@sep \"\"`"]#[doc=" - `@lf`: alias for `@sep '\\n'`"]#[doc=" - `@sp`: alias for `@sep ' '`"]#[doc=" - `@fmt $lit => {$($expr),*}`: print `format!($lit, $($expr),*)`"]#[doc=" - `@flush`: flush writer (auto insert `!`)"]#[doc=" - `@it $expr`: print iterator"]#[doc=" - `@it2d $expr`: print 2d-iterator"]#[doc=" - `@tup $expr`: print tuple (need to import [`IterPrint`])"]#[doc=" - `@ittup $expr`: print iterative tuple (need to import [`IterPrint`])"]#[doc=" - `$expr`: print expr"]#[doc=" - `{ args... }`: scoped"]#[doc=" - `;`: print `'\\n'`"]#[doc=" - `!`: not print `'\\n'` at the end"]#[macro_export]macro_rules!iter_print{(@@fmt$writer:expr,$sep:expr,$is_head:expr,$lit:literal,$($e:expr),*)=>{if!$is_head{::std::write!($writer,"{}",$sep).expect("io error");}::std::write!($writer,$lit,$($e),*).expect("io error");};(@@item$writer:expr,$sep:expr,$is_head:expr,$e:expr)=>{$crate::iter_print!(@@fmt$writer,$sep,$is_head,"{}",$e);};(@@line_feed$writer:expr$(,)?)=>{::std::writeln!($writer).expect("io error");};(@@it$writer:expr,$sep:expr,$is_head:expr,$iter:expr)=>{{let mut iter=$iter.into_iter();if let Some(item)=iter.next(){$crate::iter_print!(@@item$writer,$sep,$is_head,item);}for item in iter{$crate::iter_print!(@@item$writer,$sep,false,item);}}};(@@it2d$writer:expr,$sep:expr,$is_head:expr,$iter:expr)=>{let mut iter=$iter.into_iter();if let Some(item)=iter.next(){$crate::iter_print!(@@it$writer,$sep,$is_head,item);}for item in iter{$crate::iter_print!(@@line_feed$writer);$crate::iter_print!(@@it$writer,$sep,true,item);}};(@@tup$writer:expr,$sep:expr,$is_head:expr,$tuple:expr)=>{IterPrint::iter_print($tuple,&mut$writer,$sep,$is_head).expect("io error");};(@@ittup$writer:expr,$sep:expr,$is_head:expr,$iter:expr)=>{let mut iter=$iter.into_iter();if let Some(item)=iter.next(){$crate::iter_print!(@@tup$writer,$sep,$is_head,item);}for item in iter{$crate::iter_print!(@@line_feed$writer);$crate::iter_print!(@@tup$writer,$sep,true,item);}};(@@assert_tag item)=>{};(@@assert_tag it)=>{};(@@assert_tag it2d)=>{};(@@assert_tag tup)=>{};(@@assert_tag ittup)=>{};(@@assert_tag$tag:ident)=>{::std::compile_error!(::std::concat!("invalid tag in `iter_print!`: `",std::stringify!($tag),"`"));};(@@inner$writer:expr,$sep:expr,$is_head:expr,@sep$e:expr,$($t:tt)*)=>{$crate::iter_print!(@@inner$writer,$e,$is_head,$($t)*);};(@@inner$writer:expr,$sep:expr,$is_head:expr,@ns$($t:tt)*)=>{$crate::iter_print!(@@inner$writer,"",$is_head,$($t)*);};(@@inner$writer:expr,$sep:expr,$is_head:expr,@lf$($t:tt)*)=>{$crate::iter_print!(@@inner$writer,'\n',$is_head,$($t)*);};(@@inner$writer:expr,$sep:expr,$is_head:expr,@sp$($t:tt)*)=>{$crate::iter_print!(@@inner$writer,' ',$is_head,$($t)*);};(@@inner$writer:expr,$sep:expr,$is_head:expr,@flush$($t:tt)*)=>{$writer.flush().expect("io error");$crate::iter_print!(@@inner$writer,$sep,$is_head,!$($t)*);};(@@inner$writer:expr,$sep:expr,$is_head:expr,@fmt$lit:literal=>{$($e:expr),*$(,)?}$($t:tt)*)=>{$crate::iter_print!(@@fmt$writer,$sep,$is_head,$lit,$($e),*);$crate::iter_print!(@@inner$writer,$sep,$is_head,$($t)*);};(@@inner$writer:expr,$sep:expr,$is_head:expr,@$tag:ident$e:expr,$($t:tt)*)=>{$crate::iter_print!(@@assert_tag$tag);$crate::iter_print!(@@$tag$writer,$sep,$is_head,$e);$crate::iter_print!(@@inner$writer,$sep,false,$($t)*);};(@@inner$writer:expr,$sep:expr,$is_head:expr,@$tag:ident$e:expr;$($t:tt)*)=>{$crate::iter_print!(@@assert_tag$tag);$crate::iter_print!(@@$tag$writer,$sep,$is_head,$e);$crate::iter_print!(@@line_feed$writer);$crate::iter_print!(@@inner$writer,$sep,true,$($t)*);};(@@inner$writer:expr,$sep:expr,$is_head:expr,@$tag:ident$e:expr)=>{$crate::iter_print!(@@assert_tag$tag);$crate::iter_print!(@@$tag$writer,$sep,$is_head,$e);$crate::iter_print!(@@inner$writer,$sep,false,);};(@@inner$writer:expr,$sep:expr,$is_head:expr,@$tag:ident$($t:tt)*)=>{::std::compile_error!(::std::concat!("invalid expr in `iter_print!`: `",std::stringify!($($t)*),"`"));};(@@inner$writer:expr,$sep:expr,$is_head:expr,,$($t:tt)*)=>{$crate::iter_print!(@@inner$writer,$sep,$is_head,$($t)*);};(@@inner$writer:expr,$sep:expr,$is_head:expr,;$($t:tt)*)=>{$crate::iter_print!(@@line_feed$writer);$crate::iter_print!(@@inner$writer,$sep,$is_head,$($t)*);};(@@inner$writer:expr,$sep:expr,$is_head:expr,!$(,)?)=>{};(@@inner$writer:expr,$sep:expr,$is_head:expr,!$($t:tt)*)=>{$crate::iter_print!(@@inner$writer,$sep,$is_head,$($t)*);};(@@inner$writer:expr,$sep:expr,$is_head:expr,)=>{$crate::iter_print!(@@line_feed$writer);};(@@inner$writer:expr,$sep:expr,$is_head:expr,{$($t:tt)*}$($rest:tt)*)=>{$crate::iter_print!(@@inner$writer,$sep,$is_head,$($t)*,!);$crate::iter_print!(@@inner$writer,$sep,$is_head,$($rest)*);};(@@inner$writer:expr,$sep:expr,$is_head:expr,$($t:tt)*)=>{$crate::iter_print!(@@inner$writer,$sep,$is_head,@item$($t)*);};($writer:expr,$($t:tt)*)=>{{$crate::iter_print!(@@inner$writer,' ',true,$($t)*);}};}} pub use self::scanner::*; mod scanner{use std::{iter::{from_fn,repeat_with,FromIterator},marker::PhantomData};pub fn read_stdin_all()->String{use std::io::Read as _;let mut s=String::new();std::io::stdin().read_to_string(&mut s).expect("io error");s}pub fn read_stdin_all_unchecked()->String{use std::io::Read as _;let mut buf=Vec::new();std::io::stdin().read_to_end(&mut buf).expect("io error");unsafe{String::from_utf8_unchecked(buf)}}pub fn read_all(mut reader:impl std::io::Read)->String{let mut s=String::new();reader.read_to_string(&mut s).expect("io error");s}pub fn read_all_unchecked(mut reader:impl std::io::Read)->String{let mut buf=Vec::new();reader.read_to_end(&mut buf).expect("io error");unsafe{String::from_utf8_unchecked(buf)}}pub fn read_stdin_line()->String{let mut s=String::new();std::io::stdin().read_line(&mut s).expect("io error");s}pub trait IterScan:Sized{type Output;fn scan<'a,I:Iterator>(iter:&mut I)->Option;}pub trait MarkedIterScan:Sized{type Output;fn mscan<'a,I:Iterator>(self,iter:&mut I)->Option;}#[derive(Clone,Debug)]pub struct Scanner<'a>{iter:std::str::SplitAsciiWhitespace<'a>}impl<'a>Scanner<'a>{#[inline]pub fn new(s:&'a str)->Self{let iter=s.split_ascii_whitespace();Self{iter}}#[inline]pub fn scan(&mut self)->::Output where T:IterScan{::scan(&mut self.iter).expect("scan error")}#[inline]pub fn mscan(&mut self,marker:T)->::Output where T:MarkedIterScan{marker.mscan(&mut self.iter).expect("scan error")}#[inline]pub fn scan_vec(&mut self,size:usize)->Vec<::Output>where T:IterScan{(0..size).map(|_|::scan(&mut self.iter).expect("scan error")).collect()}#[inline]pub fn iter<'b,T>(&'b mut self)->ScannerIter<'a,'b,T>where T:IterScan{ScannerIter{inner:self,_marker:std::marker::PhantomData}}}macro_rules!iter_scan_impls{($($t:ty)*)=>{$(impl IterScan for$t{type Output=Self;#[inline]fn scan<'a,I:Iterator>(iter:&mut I)->Option{iter.next()?.parse::<$t>().ok()}})*};}iter_scan_impls!(char u8 u16 u32 u64 usize i8 i16 i32 i64 isize f32 f64 u128 i128 String);macro_rules!iter_scan_tuple_impl{(@impl$($T:ident)*)=>{impl<$($T:IterScan),*>IterScan for($($T,)*){type Output=($(<$T as IterScan>::Output,)*);#[inline]fn scan<'a,It:Iterator>(_iter:&mut It)->Option{Some(($(<$T as IterScan>::scan(_iter)?,)*))}}};(@inner$($T:ident)*,)=>{iter_scan_tuple_impl!(@impl$($T)*);};(@inner$($T:ident)*,$U:ident$($Rest:ident)*)=>{iter_scan_tuple_impl!(@impl$($T)*);iter_scan_tuple_impl!(@inner$($T)*$U,$($Rest)*);};($($T:ident)*)=>{iter_scan_tuple_impl!(@inner,$($T)*);};}iter_scan_tuple_impl!(A B C D E F G H I J K);pub struct ScannerIter<'a,'b,T>{inner:&'b mut Scanner<'a>,_marker:std::marker::PhantomDataT>}impl<'a,'b,T>Iterator for ScannerIter<'a,'b,T>where T:IterScan{type Item=::Output;#[inline]fn next(&mut self)->Option{::scan(&mut self.inner.iter)}}#[doc=" - `scan_value!(scanner, ELEMENT)`"]#[doc=""]#[doc=" ELEMENT :="]#[doc=" - `$ty`: IterScan"]#[doc=" - `@$expr`: MarkedIterScan"]#[doc=" - `[ELEMENT; $expr]`: vector"]#[doc=" - `[ELEMENT]`: iterator"]#[doc=" - `($(ELEMENT)*,)`: tuple"]#[macro_export]macro_rules!scan_value{(@repeat$scanner:expr,[$($t:tt)*]$($len:expr)?)=>{::std::iter::repeat_with(||$crate::scan_value!(@inner$scanner,[]$($t)*))$(.take($len).collect::>())?};(@tuple$scanner:expr,[$([$($args:tt)*])*])=>{($($($args)*,)*)};(@$tag:ident$scanner:expr,[[$($args:tt)*]])=>{$($args)*};(@$tag:ident$scanner:expr,[$($args:tt)*]@$e:expr)=>{$crate::scan_value!(@$tag$scanner,[$($args)*[$scanner.mscan($e)]])};(@$tag:ident$scanner:expr,[$($args:tt)*]@$e:expr,$($t:tt)*)=>{$crate::scan_value!(@$tag$scanner,[$($args)*[$scanner.mscan($e)]]$($t)*)};(@$tag:ident$scanner:expr,[$($args:tt)*]($($tuple:tt)*)$($t:tt)*)=>{$crate::scan_value!(@$tag$scanner,[$($args)*[$crate::scan_value!(@tuple$scanner,[]$($tuple)*)]]$($t)*)};(@$tag:ident$scanner:expr,[$($args:tt)*][@$e:expr;$len:expr]$($t:tt)*)=>{$crate::scan_value!(@$tag$scanner,[$($args)*[$crate::scan_value!(@repeat$scanner,[@$e]$len)]]$($t)*)};(@$tag:ident$scanner:expr,[$($args:tt)*][[$($tt:tt)*];$len:expr]$($t:tt)*)=>{$crate::scan_value!(@$tag$scanner,[$($args)*[$crate::scan_value!(@repeat$scanner,[[$($tt)*]]$len)]]$($t)*)};(@$tag:ident$scanner:expr,[$($args:tt)*][($($tt:tt)*);$len:expr]$($t:tt)*)=>{$crate::scan_value!(@$tag$scanner,[$($args)*[$crate::scan_value!(@repeat$scanner,[($($tt)*)]$len)]]$($t)*)};(@$tag:ident$scanner:expr,[$($args:tt)*][$ty:ty;$len:expr]$($t:tt)*)=>{$crate::scan_value!(@$tag$scanner,[$($args)*[$crate::scan_value!(@repeat$scanner,[$ty]$len)]]$($t)*)};(@$tag:ident$scanner:expr,[$($args:tt)*][$($tt:tt)*]$($t:tt)*)=>{$crate::scan_value!(@$tag$scanner,[$($args)*[$crate::scan_value!(@repeat$scanner,[$($tt)*])]]$($t)*)};(@$tag:ident$scanner:expr,[$($args:tt)*]$ty:ty)=>{$crate::scan_value!(@$tag$scanner,[$($args)*[$scanner.scan::<$ty>()]])};(@$tag:ident$scanner:expr,[$($args:tt)*]$ty:ty,$($t:tt)*)=>{$crate::scan_value!(@$tag$scanner,[$($args)*[$scanner.scan::<$ty>()]]$($t)*)};(@$tag:ident$scanner:expr,[$($args:tt)*],$($t:tt)*)=>{$crate::scan_value!(@$tag$scanner,[$($args)*]$($t)*)};(@$tag:ident$scanner:expr,[$($args:tt)*])=>{::std::compile_error!(::std::stringify!($($args)*))};($scanner:expr,$($t:tt)*)=>{$crate::scan_value!(@inner$scanner,[]$($t)*)}}#[doc=" - `scan!(scanner, $($pat $(: ELEMENT)?),*)`"]#[macro_export]macro_rules!scan{(@assert$p:pat)=>{};(@assert$($p:tt)*)=>{::std::compile_error!(::std::concat!("expected pattern, found `",::std::stringify!($($p)*),"`"));};(@pat$scanner:expr,[][])=>{};(@pat$scanner:expr,[][],$($t:tt)*)=>{$crate::scan!(@pat$scanner,[][]$($t)*)};(@pat$scanner:expr,[$($p:tt)*][]$x:ident$($t:tt)*)=>{$crate::scan!(@pat$scanner,[$($p)*$x][]$($t)*)};(@pat$scanner:expr,[$($p:tt)*][]::$($t:tt)*)=>{$crate::scan!(@pat$scanner,[$($p)*::][]$($t)*)};(@pat$scanner:expr,[$($p:tt)*][]&$($t:tt)*)=>{$crate::scan!(@pat$scanner,[$($p)*&][]$($t)*)};(@pat$scanner:expr,[$($p:tt)*][]($($x:tt)*)$($t:tt)*)=>{$crate::scan!(@pat$scanner,[$($p)*($($x)*)][]$($t)*)};(@pat$scanner:expr,[$($p:tt)*][][$($x:tt)*]$($t:tt)*)=>{$crate::scan!(@pat$scanner,[$($p)*[$($x)*]][]$($t)*)};(@pat$scanner:expr,[$($p:tt)*][]{$($x:tt)*}$($t:tt)*)=>{$crate::scan!(@pat$scanner,[$($p)*{$($x)*}][]$($t)*)};(@pat$scanner:expr,[$($p:tt)*][]:$($t:tt)*)=>{$crate::scan!(@ty$scanner,[$($p)*][]$($t)*)};(@pat$scanner:expr,[$($p:tt)*][]$($t:tt)*)=>{$crate::scan!(@let$scanner,[$($p)*][usize]$($t)*)};(@ty$scanner:expr,[$($p:tt)*][$($tt:tt)*]@$e:expr)=>{$crate::scan!(@let$scanner,[$($p)*][$($tt)*@$e])};(@ty$scanner:expr,[$($p:tt)*][$($tt:tt)*]@$e:expr,$($t:tt)*)=>{$crate::scan!(@let$scanner,[$($p)*][$($tt)*@$e],$($t)*)};(@ty$scanner:expr,[$($p:tt)*][$($tt:tt)*]($($x:tt)*)$($t:tt)*)=>{$crate::scan!(@let$scanner,[$($p)*][$($tt)*($($x)*)]$($t)*)};(@ty$scanner:expr,[$($p:tt)*][$($tt:tt)*][$($x:tt)*]$($t:tt)*)=>{$crate::scan!(@let$scanner,[$($p)*][$($tt)*[$($x)*]]$($t)*)};(@ty$scanner:expr,[$($p:tt)*][$($tt:tt)*]$ty:ty)=>{$crate::scan!(@let$scanner,[$($p)*][$($tt)*$ty])};(@ty$scanner:expr,[$($p:tt)*][$($tt:tt)*]$ty:ty,$($t:tt)*)=>{$crate::scan!(@let$scanner,[$($p)*][$($tt)*$ty],$($t)*)};(@let$scanner:expr,[$($p:tt)*][$($tt:tt)*]$($t:tt)*)=>{$crate::scan!{@assert$($p)*}let$($p)* =$crate::scan_value!($scanner,$($tt)*);$crate::scan!(@pat$scanner,[][]$($t)*)};($scanner:expr,$($t:tt)*)=>{$crate::scan!(@pat$scanner,[][]$($t)*)}}#[derive(Debug,Copy,Clone)]pub struct Usize1;impl IterScan for Usize1{type Output=usize;#[inline]fn scan<'a,I:Iterator>(iter:&mut I)->Option{::scan(iter)?.checked_sub(1)}}#[derive(Debug,Copy,Clone)]pub struct CharWithBase(pub char);impl MarkedIterScan for CharWithBase{type Output=usize;#[inline]fn mscan<'a,I:Iterator>(self,iter:&mut I)->Option{Some((::scan(iter)?as u8-self.0 as u8)as usize)}}#[derive(Debug,Copy,Clone)]pub struct Chars;impl IterScan for Chars{type Output=Vec;#[inline]fn scan<'a,I:Iterator>(iter:&mut I)->Option{Some(iter.next()?.chars().collect())}}#[derive(Debug,Copy,Clone)]pub struct CharsWithBase(pub char);impl MarkedIterScan for CharsWithBase{type Output=Vec;#[inline]fn mscan<'a,I:Iterator>(self,iter:&mut I)->Option{Some(iter.next()?.chars().map(|c|(c as u8-self.0 as u8)as usize).collect())}}#[derive(Debug,Copy,Clone)]pub struct ByteWithBase(pub u8);impl MarkedIterScan for ByteWithBase{type Output=usize;#[inline]fn mscan<'a,I:Iterator>(self,iter:&mut I)->Option{Some((::scan(iter)?as u8-self.0)as usize)}}#[derive(Debug,Copy,Clone)]pub struct Bytes;impl IterScan for Bytes{type Output=Vec;#[inline]fn scan<'a,I:Iterator>(iter:&mut I)->Option{Some(iter.next()?.bytes().collect())}}#[derive(Debug,Copy,Clone)]pub struct BytesWithBase(pub u8);impl MarkedIterScan for BytesWithBase{type Output=Vec;#[inline]fn mscan<'a,I:Iterator>(self,iter:&mut I)->Option{Some(iter.next()?.bytes().map(|c|(c-self.0)as usize).collect())}}#[derive(Debug,Copy,Clone)]pub struct Collect::Output>>where T:IterScan,B:FromIterator<::Output>{size:usize,_marker:PhantomData(T,B)>}implCollectwhere T:IterScan,B:FromIterator<::Output>{pub fn new(size:usize)->Self{Self{size,_marker:PhantomData}}}implMarkedIterScan for Collectwhere T:IterScan,B:FromIterator<::Output>{type Output=B;#[inline]fn mscan<'a,I:Iterator>(self,iter:&mut I)->Option{repeat_with(||::scan(iter)).take(self.size).collect()}}#[derive(Debug,Copy,Clone)]pub struct SizedCollect::Output>>where T:IterScan,B:FromIterator<::Output>{_marker:PhantomData(T,B)>}implIterScan for SizedCollectwhere T:IterScan,B:FromIterator<::Output>{type Output=B;#[inline]fn scan<'a,I:Iterator>(iter:&mut I)->Option{let size=usize::scan(iter)?;repeat_with(||::scan(iter)).take(size).collect()}}#[derive(Debug,Copy,Clone)]pub struct Splittedwhere T:IterScan{pat:P,_marker:PhantomDataT>}implSplittedwhere T:IterScan{pub fn new(pat:P)->Self{Self{pat,_marker:PhantomData}}}implMarkedIterScan for Splittedwhere T:IterScan{type Output=Vec<::Output>;fn mscan<'a,I:Iterator>(self,iter:&mut I)->Option{let mut iter=iter.next()?.split(self.pat);Some(from_fn(||::scan(&mut iter)).collect())}}implMarkedIterScan for Splittedwhere T:IterScan{type Output=Vec<::Output>;fn mscan<'a,I:Iterator>(self,iter:&mut I)->Option{let mut iter=iter.next()?.split(self.pat);Some(from_fn(||::scan(&mut iter)).collect())}}implMarkedIterScan for F where F:Fn(&str)->Option{type Output=T;fn mscan<'a,I:Iterator>(self,iter:&mut I)->Option{self(iter.next()?)}}} pub use self::binary_search::*; mod binary_search{#[doc=" binary search helper"]pub trait Bisect:Clone{#[doc=" return between two elements"]fn halve(&self,other:&Self)->Self;#[doc=" the end condition of binary search"]fn section_end(&self,other:&Self)->bool;}macro_rules!impl_bisect_unsigned{($($t:ty)*)=>{$(impl Bisect for$t{fn halve(&self,other:&Self)->Self{if self>other{other+(self-other)/2}else{self+(other-self)/2}}fn section_end(&self,other:&Self)->bool{(if self>other{self-other}else{other-self})<=1}})*};}macro_rules!impl_bisect_signed{($($t:ty)*)=>{$(impl Bisect for$t{fn halve(&self,other:&Self)->Self{(self+other)/2}fn section_end(&self,other:&Self)->bool{(self-other).abs()<=1}})*};}macro_rules!impl_bisect_float{($($t:ty)*)=>{$(impl Bisect for$t{fn halve(&self,other:&Self)->Self{(self+other)/2.}fn section_end(&self,other:&Self)->bool{const BISECT_SECTION_END_EPS:$t=1e-8;(self-other).abs()<=BISECT_SECTION_END_EPS}})*};}impl_bisect_unsigned!(u8 u16 u32 u64 u128 usize);impl_bisect_signed!(i8 i16 i32 i64 i128 isize);impl_bisect_float!(f32 f64);#[doc=" binary search for monotone segment"]#[doc=""]#[doc=" if `ok < err` then search [ok, err) where t(`ok`), t, t, .... t, t(`ret`), f, ... f, f, f, `err`"]#[doc=""]#[doc=" if `err < ok` then search (err, ok] where `err`, f, f, f, ... f, t(`ret`), ... t, t, t(`ok`)"]pub fn binary_search(mut f:F,mut ok:T,mut err:T)->T where T:Bisect,F:FnMut(&T)->bool{while!ok.section_end(&err){let m=ok.halve(&err);if f(&m){ok=m;}else{err=m;}}ok}#[doc=" binary search for slice"]pub trait SliceBisectExt{#[doc=" Returns the first element that satisfies a predicate."]fn find_bisect(&self,f:impl FnMut(&T)->bool)->Option<&T>;#[doc=" Returns the last element that satisfies a predicate."]fn rfind_bisect(&self,f:impl FnMut(&T)->bool)->Option<&T>;#[doc=" Returns the first index that satisfies a predicate."]#[doc=" if not found, returns `len()`."]fn position_bisect(&self,f:impl FnMut(&T)->bool)->usize;#[doc=" Returns the last index+1 that satisfies a predicate."]#[doc=" if not found, returns `0`."]fn rposition_bisect(&self,f:impl FnMut(&T)->bool)->usize;}implSliceBisectExtfor[T]{fn find_bisect(&self,f:impl FnMut(&T)->bool)->Option<&T>{self.get(self.position_bisect(f))}fn rfind_bisect(&self,f:impl FnMut(&T)->bool)->Option<&T>{let pos=self.rposition_bisect(f);if pos==0{None}else{self.get(pos-1)}}fn position_bisect(&self,mut f:impl FnMut(&T)->bool)->usize{binary_search(|i|f(&self[*i as usize]),self.len()as i64,-1)as usize}fn rposition_bisect(&self,mut f:impl FnMut(&T)->bool)->usize{binary_search(|i|f(&self[i-1]),0,self.len()+1)}}pub fn parallel_binary_search(mut f:F,q:usize,ok:T,err:T)->Vecwhere T:Bisect,F:FnMut(&[T])->G,G:Fn(usize)->bool{let mut ok=vec![ok;q];let mut err=vec![err;q];while!ok.iter().zip(&err).all(|(ok,err)|ok.section_end(err)){let m:Vec<_>=ok.iter().zip(&err).map(|(ok,err)|ok.halve(err)).collect();let g=f(&m);for(i,m)in m.into_iter().enumerate(){if g(i){ok[i]=m;}else{err[i]=m;}}}ok}} pub use self::automaton::*; mod automaton{use super::Monoid;use std::{borrow::Borrow,cmp::Ordering,collections::HashMap,hash::Hash,marker::PhantomData,mem::swap};pub trait Automaton{type Alphabet;type State;fn initial(&self)->Self::State;fn next(&self,state:&Self::State,alph:&Self::Alphabet)->Option;fn accept(&self,state:&Self::State)->bool;fn dp(&self,init:M::T)->Automatondpwhere Self:Sized,Self::State:Eq+Hash,M:Monoid{Automatondp::new(self,init)}}implAutomaton for&A where A:Automaton{type Alphabet=A::Alphabet;type State=A::State;fn initial(&self)->Self::State{A::initial(self)}fn next(&self,state:&Self::State,alph:&Self::Alphabet)->Option{A::next(self,state,alph)}fn accept(&self,state:&Self::State)->bool{A::accept(self,state)}}#[derive(Debug,Clone)]pub struct Automatondpwhere M:Monoid,A:Automaton,A::State:Eq+Hash{dfa:A,pub dp:HashMap,ndp:HashMap}implAutomatondpwhere M:Monoid,A:Automaton,A::State:Eq+Hash{pub fn new(dfa:A,init:M::T)->Self{let mut dp=HashMap::new();let ndp=HashMap::new();dp.insert(dfa.initial(),init);Self{dfa,dp,ndp}}pub fn step(&mut self,mut sigma:S)where S:FnMut()->I,I:IntoIterator,B:Borrow{for(state,value)in self.dp.drain(){for alph in sigma(){if let Some(nstate)=self.dfa.next(&state,alph.borrow()){self.ndp.entry(nstate).and_modify(|acc|*acc=M::operate(acc,&value)).or_insert_with(||value.clone());}}}swap(&mut self.dp,&mut self.ndp);}pub fn step_effect(&mut self,mut sigma:S,mut effect:F)where S:FnMut()->I,I:IntoIterator,B:Borrow,F:FnMut(&M::T,&A::State,&A::Alphabet,&A::State)->M::T{for(state,value)in self.dp.drain(){for alph in sigma(){if let Some(nstate)=self.dfa.next(&state,alph.borrow()){let nvalue=effect(&value,&state,alph.borrow(),&nstate);self.ndp.entry(nstate).and_modify(|acc|*acc=M::operate(acc,&nvalue)).or_insert(nvalue);}}}swap(&mut self.dp,&mut self.ndp);}pub fn fold_accept(&self)->M::T{let mut acc=M::unit();for(state,value)in self.dp.iter(){if self.dfa.accept(state){acc=M::operate(&acc,value);}}acc}pub fn map_fold_accept(&self,mut f:F)->HashMapwhere U:Eq+Hash,F:FnMut(&A::State)->U{let mut map=HashMap::new();for(state,value)in self.dp.iter(){if self.dfa.accept(state){map.entry(f(state)).and_modify(|acc|*acc=M::operate(acc,value)).or_insert_with(||value.clone());}}map}pub fn run(&mut self,mut sigma:S,len:usize)->M::T where S:FnMut()->I,I:IntoIterator,B:Borrow{for _ in 0..len{self.step(&mut sigma);}self.fold_accept()}pub fn run_effect(&mut self,mut sigma:S,len:usize,mut effect:F)->M::T where S:FnMut()->I,I:IntoIterator,B:Borrow,F:FnMut(&M::T,&A::State,&A::Alphabet,&A::State)->M::T{for _ in 0..len{self.step_effect(&mut sigma,&mut effect);}self.fold_accept()}}#[derive(Debug,Clone)]pub struct IntersectionAutomaton(pub X,pub Y);implAutomaton for IntersectionAutomatonwhere X:Automaton,Y:Automaton{type Alphabet=A;type State=(X::State,Y::State);fn initial(&self)->Self::State{(self.0.initial(),self.1.initial())}fn next(&self,state:&Self::State,alph:&Self::Alphabet)->Option{match(self.0.next(&state.0,alph),self.1.next(&state.1,alph)){(Some(s0),Some(s1))=>Some((s0,s1)),_=>None,}}fn accept(&self,state:&Self::State)->bool{self.0.accept(&state.0)&&self.1.accept(&state.1)}}#[derive(Debug,Clone)]pub struct UnionAutomaton(pub X,pub Y);implAutomaton for UnionAutomatonwhere X:Automaton,Y:Automaton{type Alphabet=A;type State=(X::State,Y::State);fn initial(&self)->Self::State{(self.0.initial(),self.1.initial())}fn next(&self,state:&Self::State,alph:&Self::Alphabet)->Option{match(self.0.next(&state.0,alph),self.1.next(&state.1,alph)){(Some(s0),Some(s1))=>Some((s0,s1)),_=>None,}}fn accept(&self,state:&Self::State)->bool{self.0.accept(&state.0)||self.1.accept(&state.1)}}#[derive(Debug,Clone)]pub struct ProductAutomaton(pub X,pub Y);implAutomaton for ProductAutomatonwhere X:Automaton,Y:Automaton{type Alphabet=(X::Alphabet,Y::Alphabet);type State=(X::State,Y::State);fn initial(&self)->Self::State{(self.0.initial(),self.1.initial())}fn next(&self,state:&Self::State,alph:&Self::Alphabet)->Option{match(self.0.next(&state.0,&alph.0),self.1.next(&state.1,&alph.1)){(Some(s0),Some(s1))=>Some((s0,s1)),_=>None,}}fn accept(&self,state:&Self::State)->bool{self.0.accept(&state.0)&&self.1.accept(&state.1)}}#[derive(Debug,Clone)]pub struct FunctionalAutomatonwhere F:Fn()->S,G:Fn(&S,&A)->Option,H:Fn(&S)->bool{fn_initial:F,fn_next:G,fn_accept:H,_marker:PhantomData(A,S)>}implFunctionalAutomatonwhere F:Fn()->S,G:Fn(&S,&A)->Option,H:Fn(&S)->bool{pub fn new(fn_initial:F,fn_next:G,fn_accept:H)->Self{Self{fn_initial,fn_next,fn_accept,_marker:PhantomData}}}implAutomaton for FunctionalAutomatonwhere F:Fn()->S,G:Fn(&S,&A)->Option,H:Fn(&S)->bool{type Alphabet=A;type State=S;fn initial(&self)->Self::State{(self.fn_initial)()}fn next(&self,state:&Self::State,alph:&Self::Alphabet)->Option{(self.fn_next)(state,alph)}fn accept(&self,state:&Self::State)->bool{(self.fn_accept)(state)}}#[derive(Debug,Clone)]pub struct MappingAutomatonwhere A:Automaton,F:Fn()->S,G:Fn(&(A::State,S),&A::Alphabet)->Option,H:Fn(&(A::State,S))->bool{dfa:A,fn_initial:F,fn_next:G,fn_accept:H,_marker:PhantomDataS>}implMappingAutomatonwhere A:Automaton,F:Fn()->S,G:Fn(&(A::State,S),&A::Alphabet)->Option,H:Fn(&(A::State,S))->bool{pub fn new(dfa:A,fn_initial:F,fn_next:G,fn_accept:H)->Self{Self{dfa,fn_initial,fn_next,fn_accept,_marker:PhantomData}}}implAutomaton for MappingAutomatonwhere A:Automaton,F:Fn()->S,G:Fn(&(A::State,S),&A::Alphabet)->Option,H:Fn(&(A::State,S))->bool{type Alphabet=A::Alphabet;type State=(A::State,S);fn initial(&self)->Self::State{(self.dfa.initial(),(self.fn_initial)())}fn next(&self,state:&Self::State,alph:&Self::Alphabet)->Option{self.dfa.next(&state.0,alph).and_then(|s|(self.fn_next)(state,alph).map(|ss|(s,ss)))}fn accept(&self,state:&Self::State)->bool{self.dfa.accept(&state.0)&&(self.fn_accept)(state)}}#[derive(Debug,Clone)]#[doc=" DFA to accept Less/Greater than (or equal to) the sequence"]pub struct LexicographicalAutomaton<'a,T>{sequence:&'a[T],ordering:Ordering,equal:bool}impl<'a,T>LexicographicalAutomaton<'a,T>{pub fn less_than(sequence:&'a[T])->Self{Self{sequence,ordering:Ordering::Less,equal:false}}pub fn less_than_or_equal(sequence:&'a[T])->Self{Self{sequence,ordering:Ordering::Less,equal:true}}pub fn greater_than(sequence:&'a[T])->Self{Self{sequence,ordering:Ordering::Greater,equal:false}}pub fn greater_than_or_equal(sequence:&'a[T])->Self{Self{sequence,ordering:Ordering::Greater,equal:true}}}impl<'a,T>Automaton for LexicographicalAutomaton<'a,T>where T:Ord{type Alphabet=T;#[doc=" (next position of sequence, is equal)"]type State=(usize,bool);fn initial(&self)->Self::State{(0,true)}fn next(&self,state:&Self::State,alph:&Self::Alphabet)->Option{self.sequence.get(state.0).and_then(|c|match(state.1,c.cmp(alph)){(true,Ordering::Equal)=>Some((state.0+1,true)),(true,ord)if ord==self.ordering=>None,_=>Some((state.0+1,false)),})}fn accept(&self,state:&Self::State)->bool{self.equal||!state.1}}#[derive(Debug,Clone)]#[doc=" DFA to accept Less/Greater than (or equal to) the reversed sequence"]pub struct RevLexicographicalAutomaton<'a,T>{sequence:&'a[T],ordering:Ordering,equal:bool}impl<'a,T>RevLexicographicalAutomaton<'a,T>{pub fn less_than(sequence:&'a[T])->Self{Self{sequence,ordering:Ordering::Less,equal:false}}pub fn less_than_or_equal(sequence:&'a[T])->Self{Self{sequence,ordering:Ordering::Less,equal:true}}pub fn greater_than(sequence:&'a[T])->Self{Self{sequence,ordering:Ordering::Greater,equal:false}}pub fn greater_than_or_equal(sequence:&'a[T])->Self{Self{sequence,ordering:Ordering::Greater,equal:true}}}impl<'a,T>Automaton for RevLexicographicalAutomaton<'a,T>where T:Ord{type Alphabet=T;#[doc=" (next position of sequence, is equal)"]type State=(usize,Ordering);fn initial(&self)->Self::State{(self.sequence.len(),Ordering::Equal)}fn next(&self,state:&Self::State,alph:&Self::Alphabet)->Option{let index=state.0.wrapping_add(!0);self.sequence.get(index).map(|c|(index,alph.cmp(c).then(state.1)))}fn accept(&self,state:&Self::State)->bool{state.1==self.ordering||self.equal&&matches!(state.1,Ordering::Equal)}}#[derive(Debug,Clone)]pub struct MonoidalAutomaton(PhantomDataM>)where M:Monoid;implMonoidalAutomatonwhere M:Monoid{pub fn new()->Self{Default::default()}}implDefault for MonoidalAutomatonwhere M:Monoid{fn default()->Self{Self(PhantomData)}}implAutomaton for MonoidalAutomatonwhere M:Monoid{type Alphabet=M::T;type State=M::T;fn initial(&self)->Self::State{M::unit()}fn next(&self,state:&Self::State,alph:&Self::Alphabet)->Option{Some(M::operate(state,alph))}fn accept(&self,_state:&Self::State)->bool{true}}#[derive(Debug,Clone)]pub struct AlwaysAcceptingAutomaton(PhantomDataA>);implAlwaysAcceptingAutomaton{pub fn new()->Self{Default::default()}}implDefault for AlwaysAcceptingAutomaton{fn default()->Self{Self(PhantomData)}}implAutomaton for AlwaysAcceptingAutomaton{type Alphabet=A;type State=();fn initial(&self)->Self::State{}fn next(&self,_state:&Self::State,_alph:&Self::Alphabet)->Option{Some(())}fn accept(&self,_state:&Self::State)->bool{true}}pub trait ToDigitSequence:Sized{fn to_digit_sequence(&self)->Vec;fn to_digit_sequence_radix(&self,radix:Self)->Vec;fn to_digit_sequence_len(&self,len:usize)->Vec;fn to_digit_sequence_radix_len(&self,radix:Self,len:usize)->Vec;}macro_rules!impl_to_digit_sequence{($($t:ty)*)=>{$(impl ToDigitSequence for$t{fn to_digit_sequence(&self)->Vec<$t>{self.to_digit_sequence_radix(10)}fn to_digit_sequence_radix(&self,radix:Self)->Vec<$t>{let mut x=*self;let mut res:Vec<$t> =vec![];while x>0{res.push(x%radix);x/=radix;}res.reverse();res}fn to_digit_sequence_len(&self,len:usize)->Vec<$t>{self.to_digit_sequence_radix_len(10,len)}fn to_digit_sequence_radix_len(&self,radix:Self,len:usize)->Vec<$t>{let mut x=*self;let mut res:Vec<$t> =vec![0;len];for r in res.iter_mut().rev(){if x==0{break;}*r=x%radix;x/=radix;}res}})*};}impl_to_digit_sequence!(u8 u16 u32 u64 u128 usize);#[doc=" build automaton"]#[doc=""]#[doc=" - `automaton!(A)`"]#[doc=" - `<= seq`: `LexicographicalAutomaton::less_than_or_equal(seq)`"]#[doc=" - `>= seq`: `LexicographicalAutomaton::greater_than_or_equal(seq)`"]#[doc=" - `< seq`: `LexicographicalAutomaton::greater_than(seq)`"]#[doc=" - `> seq`: `LexicographicalAutomaton::greater_than(seq)`"]#[doc=" - `!<= seq`: `RevLexicographicalAutomaton::less_than_or_equal(seq)`"]#[doc=" - `!>= seq`: `RevLexicographicalAutomaton::greater_than_or_equal(seq)`"]#[doc=" - `!< seq`: `RevLexicographicalAutomaton::greater_than(seq)`"]#[doc=" - `!> seq`: `RevLexicographicalAutomaton::greater_than(seq)`"]#[doc=" - `=> f g h`: `FunctionalAutomaton::new(f, g, h)`"]#[doc=" - `=> (A) f g h`: `MappingAutomaton::new(A, f, g, h)`"]#[doc=" - `@`: `AlwaysAcceptingAutomaton::new()`"]#[doc=" - `(A) * (B)`: `ProductAutomaton(A, B)`"]#[doc=" - `(A) & (B)`: `IntersectionAutomaton(A, B)`"]#[doc=" - `(A) | (B)`: `UnionAutomaton(A, B)`"]#[macro_export]macro_rules!automaton{(@inner($($t:tt)*))=>{$crate::automaton!(@inner$($t)*)};(@inner<=$e:expr)=>{LexicographicalAutomaton::less_than_or_equal(&$e)};(@inner>=$e:expr)=>{LexicographicalAutomaton::greater_than_or_equal(&$e)};(@inner<$e:expr)=>{LexicographicalAutomaton::less_than(&$e)};(@inner>$e:expr)=>{LexicographicalAutomaton::greater_than(&$e)};(@inner!<=$e:expr)=>{RevLexicographicalAutomaton::less_than_or_equal(&$e)};(@inner!>=$e:expr)=>{RevLexicographicalAutomaton::greater_than_or_equal(&$e)};(@inner!<$e:expr)=>{RevLexicographicalAutomaton::less_than(&$e)};(@inner!>$e:expr)=>{RevLexicographicalAutomaton::greater_than(&$e)};(@inner=>($($t:tt)*)$f:expr,$g:expr,$h:expr$(,)?)=>{MappingAutomaton::new($crate::automaton!(@inner$($t)*),$f,$g,$h)};(@inner=>$f:expr,$g:expr,$h:expr$(,)?)=>{FunctionalAutomaton::new($f,$g,$h)};(@inner($($h:tt)*)$($op:tt($($t:tt)*))*)=>{$crate::automaton!(@union[]($($h)*)$($op($($t)*))*)};(@inner@)=>{AlwaysAcceptingAutomaton::new()};(@inner$($t:tt)*)=>{$($t)*};(@union[]($($h:tt)*)$($t:tt)*)=>{$crate::automaton!(@union[($($h)*)]$($t)*)};(@union[$($h:tt)*]|($($x:tt)*)$($t:tt)*)=>{UnionAutomaton($crate::automaton!(@inner$($h)*),$crate::automaton!(@inner($($x)*)$($t)*))};(@union[$($h:tt)*]$op:tt($($x:tt)*)$($t:tt)*)=>{$crate::automaton!(@union[$($h)*$op($($x)*)]$($t)*)};(@union[$($h:tt)*])=>{$crate::automaton!(@inter[]$($h)*)};(@inter[]($($h:tt)*)$($t:tt)*)=>{$crate::automaton!(@inter[($($h)*)]$($t)*)};(@inter[$($h:tt)*]&($($x:tt)*)$($t:tt)*)=>{IntersectionAutomaton($crate::automaton!(@inner$($h)*),$crate::automaton!(@inner($($x)*)$($t)*))};(@inter[$($h:tt)*]$op:tt($($x:tt)*)$($t:tt)*)=>{$crate::automaton!(@inter[$($h)*$op($($x)*)]$($t)*)};(@inter[$($h:tt)*])=>{$crate::automaton!(@prod[]$($h)*)};(@prod[]($($h:tt)*)$($t:tt)*)=>{$crate::automaton!(@prod[($($h)*)]$($t)*)};(@prod[$($h:tt)*]*($($x:tt)*)$($t:tt)*)=>{ProductAutomaton($crate::automaton!(@inner$($h)*),$crate::automaton!(@inner($($x)*)$($t)*))};(@prod[$($h:tt)*]$op:tt($($x:tt)*)$($t:tt)*)=>{$crate::automaton!(@prod[$($h)*$op($($x)*)]$($t)*)};(@prod[$($h:tt)*])=>{$crate::automaton!(@inner$($h)*)};($($t:tt)*)=>{$crate::automaton!(@inner$($t)*)};}} mod magma{#![doc=" algebraic traits"]#[doc=" binary operaion: $T \\circ T \\to T$"]pub trait Magma{#[doc=" type of operands: $T$"]type T:Clone;#[doc=" binary operaion: $\\circ$"]fn operate(x:&Self::T,y:&Self::T)->Self::T;#[inline]fn reverse_operate(x:&Self::T,y:&Self::T)->Self::T{Self::operate(y,x)}#[inline]fn operate_assign(x:&mut Self::T,y:&Self::T){*x=Self::operate(x,y);}}#[doc=" $\\forall a,\\forall b,\\forall c \\in T, (a \\circ b) \\circ c = a \\circ (b \\circ c)$"]pub trait Associative{}#[doc=" associative binary operation"]pub trait SemiGroup:Magma+Associative{}implSemiGroup for S{}#[doc=" $\\exists e \\in T, \\forall a \\in T, e \\circ a = a \\circ e = e$"]pub trait Unital:Magma{#[doc=" identity element: $e$"]fn unit()->Self::T;#[inline]fn is_unit(x:&Self::T)->bool where::T:PartialEq{x==&Self::unit()}#[inline]fn set_unit(x:&mut Self::T){*x=Self::unit();}}#[doc=" associative binary operation and an identity element"]pub trait Monoid:SemiGroup+Unital{#[doc=" binary exponentiation: $x^n = x\\circ\\ddots\\circ x$"]fn pow(mut x:Self::T,mut n:usize)->Self::T{let mut res=Self::unit();while n>0{if n&1==1{res=Self::operate(&res,&x);}x=Self::operate(&x,&x);n>>=1;}res}}implMonoid for M{}#[doc=" $\\exists e \\in T, \\forall a \\in T, \\exists b,c \\in T, b \\circ a = a \\circ c = e$"]pub trait Invertible:Magma{#[doc=" $a$ where $a \\circ x = e$"]fn inverse(x:&Self::T)->Self::T;#[inline]fn rinv_operate(x:&Self::T,y:&Self::T)->Self::T{Self::operate(x,&Self::inverse(y))}}#[doc=" associative binary operation and an identity element and inverse elements"]pub trait Group:Monoid+Invertible{}implGroup for G{}#[doc=" $\\forall a,\\forall b \\in T, a \\circ b = b \\circ a$"]pub trait Commutative{}#[doc=" commutative monoid"]pub trait AbelianMonoid:Monoid+Commutative{}implAbelianMonoid for M{}#[doc=" commutative group"]pub trait AbelianGroup:Group+Commutative{}implAbelianGroup for G{}#[doc=" $\\forall a \\in T, a \\circ a = a$"]pub trait Idempotent{}#[doc=" idempotent monoid"]pub trait IdempotentMonoid:Monoid+Idempotent{}implIdempotentMonoid for M{}#[macro_export]macro_rules!monoid_fold{($m:ty)=>{<$m as Unital>::unit()};($m:ty,)=>{<$m as Unital>::unit()};($m:ty,$f:expr)=>{$f};($m:ty,$f:expr,$($ff:expr),*)=>{<$m as Magma>::operate(&($f),&monoid_fold!($m,$($ff),*))};}} pub use self::magma::*; pub use self::integer::{BinaryRepr,ExtendedGcd,IntBase,Saturating,Signed,Unsigned,Wrapping}; mod integer{use super::{Bounded,One,Zero};use std::{convert::TryFrom,fmt::{self,Display},ops::{Add,AddAssign,BitAnd,BitAndAssign,BitOr,BitOrAssign,BitXor,BitXorAssign,Div,DivAssign,Mul,MulAssign,Neg,Not,Rem,RemAssign,Shl,ShlAssign,Shr,ShrAssign,Sub,SubAssign},str::FromStr};#[doc=" Trait for basic primitive integer operations."]pub trait IntBase:Copy+Bounded+Zero+One+Eq+Ord+Default+FromStr+Display+Add+Sub+Mul+Div+Rem+AddAssign+SubAssign+MulAssign+DivAssign+RemAssign{type Error;fn div_euclid(self,rhs:Self)->Self;fn rem_euclid(self,rhs:Self)->Self;fn pow(self,exp:u32)->Self;fn from_str_radix(src:&str,radix:u32)->Result;}macro_rules!impl_int_base{($($t:ty)*)=>{$(impl IntBase for$t{type Error=std::num::ParseIntError;fn div_euclid(self,rhs:Self)->Self{self.div_euclid(rhs)}fn rem_euclid(self,rhs:Self)->Self{self.rem_euclid(rhs)}fn pow(self,exp:u32)->Self{self.pow(exp)}fn from_str_radix(src:&str,radix:u32)->Result{Self::from_str_radix(src,radix)}})*};}impl_int_base!(u8 i8 u16 i16 u32 i32 u64 i64 u128 i128 usize isize);#[doc=" extended_gcd(a,b): ax + by = g = gcd(a,b)"]pub struct ExtendedGcd{#[doc=" gcd"]pub g:T,pub x:T::Signed,pub y:T::Signed}#[doc=" Trait for unsigned integer operations."]pub trait Unsigned:IntBase{type Signed:Signed;fn signed(self)->Self::Signed;fn abs_sub(self,other:Self)->Self{if self>other{self-other}else{other-self}}fn gcd(self,other:Self)->Self;fn lcm(self,other:Self)->Self{if self.is_zero()&&other.is_zero(){Self::zero()}else{self/self.gcd(other)*other}}fn extgcd(self,other:Self)->ExtendedGcd{let(mut a,mut b)=(self.signed(),other.signed());let(mut u,mut v,mut x,mut y)=(Self::Signed::one(),Self::Signed::zero(),Self::Signed::zero(),Self::Signed::one());while!a.is_zero(){let k=b/a;x-=k*u;y-=k*v;b-=k*a;std::mem::swap(&mut x,&mut u);std::mem::swap(&mut y,&mut v);std::mem::swap(&mut b,&mut a);}ExtendedGcd{g:b.unsigned(),x,y}}fn modinv(self,modulo:Self)->Self{assert!(!self.is_zero(),"attempt to inverse zero with modulo {}",modulo);let extgcd=self.extgcd(modulo);assert!(extgcd.g.is_one(),"there is no inverse {} modulo {}",self,modulo);extgcd.x.rem_euclid(modulo.signed()).unsigned()}}#[doc=" Trait for signed integer operations."]pub trait Signed:IntBase+Neg{type Unsigned:Unsigned;fn unsigned(self)->Self::Unsigned;fn abs(self)->Self;fn is_negative(self)->bool;fn is_positive(self)->bool;fn signum(self)->Self;}macro_rules!impl_unsigned_signed{($($unsigned:ident$signed:ident)*)=>{$(impl Unsigned for$unsigned{type Signed=$signed;fn signed(self)->Self::Signed{self as Self::Signed}fn gcd(self,other:Self)->Self{let(mut a,mut b)=(self,other);if a.is_zero()||b.is_zero(){return a|b;}let u=a.trailing_zeros();let v=b.trailing_zeros();a>>=u;b>>=v;let k=u.min(v);while a!=b{if a>=a.trailing_zeros();}a<Self::Unsigned{self as Self::Unsigned}fn abs(self)->Self{self.abs()}fn is_negative(self)->bool{self.is_negative()}fn is_positive(self)->bool{self.is_positive()}fn signum(self)->Self{self.signum()}})*};}impl_unsigned_signed!(u8 i8 u16 i16 u32 i32 u64 i64 u128 i128 usize isize);#[doc=" Trait for operations of integer in binary representation."]pub trait BinaryRepr:Sized+Not+BitAnd+BitOr+BitXor+Shl+Shr+BitAndAssign+BitOrAssign+BitXorAssign+ShlAssign+ShrAssign{fn count_ones(self)->Size;fn count_zeros(self)->Size;fn leading_zeros(self)->Size;fn reverse_bits(self)->Self;fn rotate_left(self,n:Size)->Self;fn rotate_right(self,n:Size)->Self;fn trailing_zeros(self)->Size;}macro_rules!impl_binary_repr{($($t:ty)*)=>{$(impl BinaryRepr for$t{fn count_ones(self)->u32{self.count_ones()}fn count_zeros(self)->u32{self.count_zeros()}fn leading_zeros(self)->u32{self.leading_zeros()}fn reverse_bits(self)->Self{self.reverse_bits()}fn rotate_left(self,n:u32)->Self{self.rotate_left(n)}fn rotate_right(self,n:u32)->Self{self.rotate_right(n)}fn trailing_zeros(self)->u32{self.trailing_zeros()}})*};}impl_binary_repr!(u8 i8 u16 i16 u32 i32 u64 i64 u128 i128 usize isize);macro_rules!impl_binop{(impl<$T:ident>$Trait:ident$impl:ident for$t:ty)=>{impl<$T>$Trait for$t where$T:$Trait,{type Output=Self;fn$impl(self,rhs:Self)->Self::Output{Self($Trait::$impl(self.0,rhs.0))}}};}macro_rules!impl_opassign{(impl<$T:ident>$Trait:ident$impl:ident for$t:ty)=>{impl<$T>$Trait for$t where$T:$Trait,{fn$impl(&mut self,rhs:Self){$Trait::$impl(&mut self.0,rhs.0)}}};}#[derive(Default,PartialEq,Eq,PartialOrd,Ord,Hash,Clone,Copy)]#[repr(transparent)]#[doc=" Wrapper type of arithmetic `saturating_*` operations."]pub struct Saturating(pub T);implfmt::Debug for Saturatingwhere T:fmt::Debug{fn fmt(&self,f:&mut fmt::Formatter<'_>)->fmt::Result{T::fmt(&self.0,f)}}implBounded for Saturatingwhere T:Bounded{fn maximum()->Self{Self(T::maximum())}fn minimum()->Self{Self(T::minimum())}}implZero for Saturatingwhere T:Zero{fn zero()->Self{Self(T::zero())}}implOne for Saturatingwhere T:One{fn one()->Self{Self(T::one())}}implFromStr for Saturatingwhere T:FromStr{type Err=T::Err;fn from_str(s:&str)->Result{T::from_str(s).map(Self)}}implDisplay for Saturatingwhere T:Display{fn fmt(&self,f:&mut fmt::Formatter<'_>)->fmt::Result{T::fmt(&self.0,f)}}impl_binop!(implDiv div for Saturating);impl_binop!(implRem rem for Saturating);impl_binop!(implBitAnd bitand for Saturating);impl_binop!(implBitOr bitor for Saturating);impl_binop!(implBitXor bitxor for Saturating);impl_opassign!(implDivAssign div_assign for Saturating);impl_opassign!(implRemAssign rem_assign for Saturating);impl_opassign!(implBitAndAssign bitand_assign for Saturating);impl_opassign!(implBitOrAssign bitor_assign for Saturating);impl_opassign!(implBitXorAssign bitxor_assign for Saturating);implNot for Saturatingwhere T:Not{type Output=Self;fn not(self)->Self::Output{Self(Not::not(self.0))}}macro_rules!impl_int_base_for_saturating{($($t:ty)*)=>{$(impl Add for Saturating<$t>{type Output=Self;fn add(self,rhs:Self)->Self::Output{Self(self.0.saturating_add(rhs.0))}}impl Sub for Saturating<$t>{type Output=Self;fn sub(self,rhs:Self)->Self::Output{Self(self.0.saturating_sub(rhs.0))}}impl Mul for Saturating<$t>{type Output=Self;fn mul(self,rhs:Self)->Self::Output{Self(self.0.saturating_mul(rhs.0))}}impl AddAssign for Saturating<$t>{fn add_assign(&mut self,rhs:Self){*self=Add::add(*self,rhs);}}impl SubAssign for Saturating<$t>{fn sub_assign(&mut self,rhs:Self){*self=Sub::sub(*self,rhs);}}impl MulAssign for Saturating<$t>{fn mul_assign(&mut self,rhs:Self){*self=Mul::mul(*self,rhs);}}impl IntBase for Saturating<$t>{type Error=<$t as IntBase>::Error;fn div_euclid(self,rhs:Self)->Self{Self(self.0.div_euclid(rhs.0))}fn rem_euclid(self,rhs:Self)->Self{Self(self.0.rem_euclid(rhs.0))}fn pow(self,exp:u32)->Self{Self(self.0.saturating_pow(exp))}fn from_str_radix(src:&str,radix:u32)->Result{<$t as IntBase>::from_str_radix(src,radix).map(Self)}}impl From<$t>for Saturating<$t>{fn from(t:$t)->Self{Self(t)}})*};}impl_int_base_for_saturating!(u8 i8 u16 i16 u32 i32 u64 i64 u128 i128 usize isize);macro_rules!impl_unsigned_signed_for_saturating{($($unsigned:ident$signed:ident)*)=>{$(impl Unsigned for Saturating<$unsigned>{type Signed=Saturating<$signed>;fn signed(self)->Self::Signed{Saturating(TryFrom::try_from(self.0).ok().unwrap_or_else($signed::maximum))}fn gcd(self,other:Self)->Self{Self(self.0.gcd(other.0))}}impl Signed for Saturating<$signed>{type Unsigned=Saturating<$unsigned>;fn unsigned(self)->Self::Unsigned{Saturating(TryFrom::try_from(self.0).ok().unwrap_or_else($unsigned::minimum))}fn abs(self)->Self{Self(self.0.abs())}fn is_negative(self)->bool{self.0.is_negative()}fn is_positive(self)->bool{self.0.is_positive()}fn signum(self)->Self{Self(self.0.signum())}}impl Neg for Saturating<$signed>{type Output=Self;fn neg(self)->Self::Output{Self(self.0.neg())}})*};}impl_unsigned_signed_for_saturating!(u8 i8 u16 i16 u32 i32 u64 i64 u128 i128 usize isize);macro_rules!impl_binary_repr_for_saturating{($($t:ty)*)=>{$(impl Shlfor Saturating<$t>{type Output=Self;fn shl(self,rhs:u32)->Self::Output{Self(self.0.checked_shl(rhs).unwrap_or(0))}}impl Shrfor Saturating<$t>{type Output=Self;fn shr(self,rhs:u32)->Self::Output{Self(self.0.checked_shr(rhs).unwrap_or(0))}}impl ShlAssignfor Saturating<$t>{fn shl_assign(&mut self,rhs:u32){*self=Shl::shl(*self,rhs);}}impl ShrAssignfor Saturating<$t>{fn shr_assign(&mut self,rhs:u32){*self=Shr::shr(*self,rhs);}}impl BinaryRepr for Saturating<$t>{fn count_ones(self)->u32{self.0.count_ones()}fn count_zeros(self)->u32{self.0.count_zeros()}fn leading_zeros(self)->u32{self.0.leading_zeros()}fn reverse_bits(self)->Self{Self(self.0.reverse_bits())}fn rotate_left(self,n:u32)->Self{Self(self.0.rotate_left(n))}fn rotate_right(self,n:u32)->Self{Self(self.0.rotate_right(n))}fn trailing_zeros(self)->u32{self.0.trailing_zeros()}})*};}impl_binary_repr_for_saturating!(u8 i8 u16 i16 u32 i32 u64 i64 u128 i128 usize isize);#[derive(Default,PartialEq,Eq,PartialOrd,Ord,Hash,Clone,Copy)]#[repr(transparent)]#[doc=" Wrapper type of arithmetic `wrapping_*` operations."]pub struct Wrapping(pub T);implfmt::Debug for Wrappingwhere T:fmt::Debug{fn fmt(&self,f:&mut fmt::Formatter<'_>)->fmt::Result{T::fmt(&self.0,f)}}implBounded for Wrappingwhere T:Bounded{fn maximum()->Self{Self(T::maximum())}fn minimum()->Self{Self(T::minimum())}}implZero for Wrappingwhere T:Zero{fn zero()->Self{Self(T::zero())}}implOne for Wrappingwhere T:One{fn one()->Self{Self(T::one())}}implFromStr for Wrappingwhere T:FromStr{type Err=T::Err;fn from_str(s:&str)->Result{T::from_str(s).map(Self)}}implDisplay for Wrappingwhere T:Display{fn fmt(&self,f:&mut fmt::Formatter<'_>)->fmt::Result{T::fmt(&self.0,f)}}impl_binop!(implBitAnd bitand for Wrapping);impl_binop!(implBitOr bitor for Wrapping);impl_binop!(implBitXor bitxor for Wrapping);impl_opassign!(implBitAndAssign bitand_assign for Wrapping);impl_opassign!(implBitOrAssign bitor_assign for Wrapping);impl_opassign!(implBitXorAssign bitxor_assign for Wrapping);implNot for Wrappingwhere T:Not{type Output=Self;fn not(self)->Self::Output{Self(Not::not(self.0))}}macro_rules!impl_int_base_for_wrapping{($($t:ty)*)=>{$(impl Add for Wrapping<$t>{type Output=Self;fn add(self,rhs:Self)->Self::Output{Self(self.0.wrapping_add(rhs.0))}}impl Sub for Wrapping<$t>{type Output=Self;fn sub(self,rhs:Self)->Self::Output{Self(self.0.wrapping_sub(rhs.0))}}impl Mul for Wrapping<$t>{type Output=Self;fn mul(self,rhs:Self)->Self::Output{Self(self.0.wrapping_mul(rhs.0))}}impl Div for Wrapping<$t>{type Output=Self;fn div(self,rhs:Self)->Self::Output{Self(self.0.wrapping_div(rhs.0))}}impl Rem for Wrapping<$t>{type Output=Self;fn rem(self,rhs:Self)->Self::Output{Self(self.0.wrapping_rem(rhs.0))}}impl AddAssign for Wrapping<$t>{fn add_assign(&mut self,rhs:Self){*self=Add::add(*self,rhs);}}impl SubAssign for Wrapping<$t>{fn sub_assign(&mut self,rhs:Self){*self=Sub::sub(*self,rhs);}}impl MulAssign for Wrapping<$t>{fn mul_assign(&mut self,rhs:Self){*self=Mul::mul(*self,rhs);}}impl DivAssign for Wrapping<$t>{fn div_assign(&mut self,rhs:Self){*self=Div::div(*self,rhs);}}impl RemAssign for Wrapping<$t>{fn rem_assign(&mut self,rhs:Self){*self=Rem::rem(*self,rhs);}}impl IntBase for Wrapping<$t>{type Error=<$t as IntBase>::Error;fn div_euclid(self,rhs:Self)->Self{Self(self.0.wrapping_div_euclid(rhs.0))}fn rem_euclid(self,rhs:Self)->Self{Self(self.0.wrapping_rem_euclid(rhs.0))}fn pow(self,exp:u32)->Self{Self(self.0.wrapping_pow(exp))}fn from_str_radix(src:&str,radix:u32)->Result{<$t as IntBase>::from_str_radix(src,radix).map(Self)}}impl From<$t>for Wrapping<$t>{fn from(t:$t)->Self{Self(t)}})*};}impl_int_base_for_wrapping!(u8 i8 u16 i16 u32 i32 u64 i64 u128 i128 usize isize);macro_rules!impl_unsigned_signed_for_wrapping{($($unsigned:ident$signed:ident)*)=>{$(impl Unsigned for Wrapping<$unsigned>{type Signed=Wrapping<$signed>;fn signed(self)->Self::Signed{Wrapping(self.0.signed())}fn gcd(self,other:Self)->Self{Self(self.0.gcd(other.0))}}impl Signed for Wrapping<$signed>{type Unsigned=Wrapping<$unsigned>;fn unsigned(self)->Self::Unsigned{Wrapping(self.0.unsigned())}fn abs(self)->Self{Self(self.0.wrapping_abs())}fn is_negative(self)->bool{self.0.is_negative()}fn is_positive(self)->bool{self.0.is_positive()}fn signum(self)->Self{Self(self.0.signum())}}impl Neg for Wrapping<$signed>{type Output=Self;fn neg(self)->Self::Output{Self(self.0.wrapping_neg())}})*};}impl_unsigned_signed_for_wrapping!(u8 i8 u16 i16 u32 i32 u64 i64 u128 i128 usize isize);macro_rules!impl_binary_repr_for_wrapping{($($t:ty)*)=>{$(impl Shlfor Wrapping<$t>{type Output=Self;fn shl(self,rhs:u32)->Self::Output{Self(self.0.wrapping_shl(rhs))}}impl Shrfor Wrapping<$t>{type Output=Self;fn shr(self,rhs:u32)->Self::Output{Self(self.0.wrapping_shr(rhs))}}impl ShlAssignfor Wrapping<$t>{fn shl_assign(&mut self,rhs:u32){*self=Shl::shl(*self,rhs);}}impl ShrAssignfor Wrapping<$t>{fn shr_assign(&mut self,rhs:u32){*self=Shr::shr(*self,rhs);}}impl BinaryRepr for Wrapping<$t>{fn count_ones(self)->u32{self.0.count_ones()}fn count_zeros(self)->u32{self.0.count_zeros()}fn leading_zeros(self)->u32{self.0.leading_zeros()}fn reverse_bits(self)->Self{Self(self.0.reverse_bits())}fn rotate_left(self,n:u32)->Self{Self(self.0.rotate_left(n))}fn rotate_right(self,n:u32)->Self{Self(self.0.rotate_right(n))}fn trailing_zeros(self)->u32{self.0.trailing_zeros()}})*};}impl_binary_repr_for_wrapping!(u8 i8 u16 i16 u32 i32 u64 i64 u128 i128 usize isize);} pub use self::bounded::Bounded; mod bounded{#[doc=" Trait for max/min bounds"]pub trait Bounded:Sized+PartialOrd{fn maximum()->Self;fn minimum()->Self;fn is_maximum(&self)->bool{self==&Self::maximum()}fn is_minimum(&self)->bool{self==&Self::minimum()}fn set_maximum(&mut self){*self=Self::maximum()}fn set_minimum(&mut self){*self=Self::minimum()}}macro_rules!bounded_num_impls{($($t:ident)*)=>{$(impl Bounded for$t{fn maximum()->Self{std::$t::MAX}fn minimum()->Self{std::$t::MIN}})*};}bounded_num_impls!(u8 u16 u32 u64 u128 usize i8 i16 i32 i64 i128 isize f32 f64);macro_rules!bounded_tuple_impls{(@impl$($T:ident)*)=>{impl<$($T:Bounded),*>Bounded for($($T,)*){fn maximum()->Self{($(<$T as Bounded>::maximum(),)*)}fn minimum()->Self{($(<$T as Bounded>::minimum(),)*)}}};(@inner$($T:ident)*,)=>{bounded_tuple_impls!(@impl$($T)*);};(@inner$($T:ident)*,$U:ident$($Rest:ident)*)=>{bounded_tuple_impls!(@impl$($T)*);bounded_tuple_impls!(@inner$($T)*$U,$($Rest)*);};($T:ident$($Rest:ident)*)=>{bounded_tuple_impls!(@inner$T,$($Rest)*);};}bounded_tuple_impls!(A B C D E F G H I J);impl Bounded for(){fn maximum()->Self{}fn minimum()->Self{}}impl Bounded for bool{fn maximum()->Self{true}fn minimum()->Self{false}}implBounded for Optionwhere T:Bounded{fn maximum()->Self{Some(::maximum())}fn minimum()->Self{None}}implBounded for std::cmp::Reversewhere T:Bounded{fn maximum()->Self{std::cmp::Reverse(::minimum())}fn minimum()->Self{std::cmp::Reverse(::maximum())}}} pub use self::zero_one::{One,Zero}; mod zero_one{pub trait Zero:Sized{fn zero()->Self;#[inline]fn is_zero(&self)->bool where Self:PartialEq{self==&Self::zero()}#[inline]fn set_zero(&mut self){*self=Self::zero();}}pub trait One:Sized{fn one()->Self;#[inline]fn is_one(&self)->bool where Self:PartialEq{self==&Self::one()}#[inline]fn set_one(&mut self){*self=Self::one();}}macro_rules!zero_one_impls{($({$Trait:ident$method:ident$($t:ty)*,$e:expr})*)=>{$($(impl$Trait for$t{fn$method()->Self{$e}})*)*};}zero_one_impls!({Zero zero u8 u16 u32 u64 usize i8 i16 i32 i64 isize u128 i128,0}{Zero zero f32 f64,0.}{One one u8 u16 u32 u64 usize i8 i16 i32 i64 isize u128 i128,1}{One one f32 f64,1.});}