Bank num

by AUTHOR

I took most of this from the package Template provided by Roman Maeder.

Describe the mathematical content

Setup and usage messages

I turned off the spell checkers to avoid the error messsages that happen as a result of similar variable names.  This does not need to be done.

Off[General::spell];

Off[General::spell1];

Set up the package context, including public imports

The Setup package is needed by all the banks.

BeginPackage["TMKR`Banknum`",
	"TMKR`Setup`"];

Usage messages for the exported functions and the context itself

Banknum::usage = "Banknum.m, description of the content sampled in the bank";

banknum::usage = "banknum[]will choose a question at random from banknum, banknum[question#] will run question # in banknum, banknum[{questionlist}] will choose a number at random from question list and run that question from banknum. There are ?? questions.";

Implementation

Begin the private context

Begin["`Private`"];

Question generators

banknum[]

Here, have the computer choose a random number from the range of question numbers available.  The 5 here assumes 5 questions

banknum[] := banknum[Random[Integer, {1,5}]];

SetAttributes[banknum,  Listable];

banknum[1]

Insert question here, be sure to change the cell to an initialization cell...

banknum[2]

Insert question here, be sure to change the cell to an initialization cell...

etc.

End the private context

End[ ];

Finish things off

End the package context

EndPackage[ ];