Teach Yourself Scheme: 16.3 Example

Let's now tackle a more substantial problem. We need
to transfer files from one computer to another and the
only method we have is to use a 3.5'' floppy as a
ferry. We need a script split4floppy that will
split files larger than 1.44 million bytes into
floppy-sized chunks. The script file split4floppy
is as follows: