Next: , Previous: , Up: Answers to Exercises   [Contents][Index]

#### 2.7.37 Types Tutorial Exercise 5

Let’s suppose it’s January 14, 1991. The easiest thing to do is to keep trying 13ths of months until Calc reports a Friday. We can do this by manually entering dates, or by using t I:

```1:  <Wed Feb 13, 1991>    1:  <Wed Mar 13, 1991>   1:  <Sat Apr 13, 1991>
.                         .                        .

' <2/13> RET       DEL    ' <3/13> RET             t I
```

(Calc assumes the current year if you don’t say otherwise.)

This is getting tedious—we can keep advancing the date by typing t I over and over again, but let’s automate the job by using vector mapping. The t I command actually takes a second “how-many-months” argument, which defaults to one. This argument is exactly what we want to map over:

```2:  <Sat Apr 13, 1991>     1:  [<Mon May 13, 1991>, <Thu Jun 13, 1991>,
1:  [1, 2, 3, 4, 5, 6]          <Sat Jul 13, 1991>, <Tue Aug 13, 1991>,
.                           <Fri Sep 13, 1991>, <Sun Oct 13, 1991>]
.

v x 6 RET                  V M t I
```

Et voilĂ , September 13, 1991 is a Friday.

```1:  242
.

' <sep 13> - <jan 14> RET
```

And the answer to our original question: 242 days to go.