Warning: mysqli::__construct(): (HY000/1203): User howardkn already has more than 'max_user_connections' active connections in D:\Inetpub\vhosts\howardknight.net\al.howardknight.net\includes\artfuncs.php on line 21
Failed to connect to MySQL: (1203) User howardkn already has more than 'max_user_connections' active connectionsPath: ...!weretis.net!feeder8.news.weretis.net!eternal-september.org!feeder3.eternal-september.org!news.eternal-september.org!.POSTED!not-for-mail
From: HenHanna
Newsgroups: comp.lang.lisp
Subject: Given string 'a.bc.' -- replace each dot(.) with 0 or 1
Date: Sat, 18 May 2024 01:31:32 -0700
Organization: A noiseless patient Spider
Lines: 13
Message-ID:
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8; format=flowed
Content-Transfer-Encoding: 7bit
Injection-Date: Sat, 18 May 2024 10:31:33 +0200 (CEST)
Injection-Info: dont-email.me; posting-host="7c7ccf8d8ecc9b5171c5fa73857bd316";
logging-data="2845877"; mail-complaints-to="abuse@eternal-september.org"; posting-account="U2FsdGVkX1+78RDE4Z5X7K1RhbvBfWwFsSoXlYT1IBo="
User-Agent: Mozilla Thunderbird
Cancel-Lock: sha1:xlJ7WU6mg0s1nIK2ZmI1l4mK7E0=
Content-Language: en-US
Bytes: 1426
How can i write this function simply? (in Common Lisp)
-- Given a string 'a.bc.' -- replace each dot(.) with 0 or 1.
-- So the value is a list of 4 strings:
('a0bc0' 'a0bc1' 'a1bc0' 'a1bc1')
-- The order is not important.
If the string has 3 dots, the value is a list of length 8.
If the program is going to be simpler,
pls use, e.g. (a $ b c $) rather than 'a.bc.'