Reads full number from stdin and outputs yes if input is divisible by 13; otherwise no >++++++[>++++++++<-]>>,[<[-<+>>-<]<[->+<]>>>[->++++++++++<]>[-<+>]<<[->+<],]++++ +++++++++>[>+<-<-[>>>]>>[[-<<+>>]>>>]<<<<]>[<<<[-<++>]<++++++++++++++.+.>]<<[[-< ++++++<++++++++>>]<-----.<---.>------.>]