Category : C Source Code
Archive   : DYNAM_S1.ZIP
Filename : YJ.C

/****************************** YCOMJ.C *************************************/
/******************* (C) 1986,7,8 by JAMES A. YORKE **************************/

#include "yinclud.h"
#define ELP if(level > 2)erase_line(); PRINT

jay() {
if(level == SETPARAM) {
scr_clr(); /* in desmets pcio.a */
}
ELP " \n");
ELP " \n");
ELP " DDDD Y Y N N A M M I CCC SSSS \n");
ELP " D DD Y Y NN N A A MM MM I CC CC S S \n");
ELP " D D Y Y N N N A A M MM M I C SSS \n");
ELP " D D Y N N N AAAAAAA M M I C SSS \n");
ELP " D DD Y N NN A A M M I CC CC S S \n");
ELP " DDDD Y N N A A M M I CCC SSSS \n");
ELP " \n");
ELP " \n");
ELP " JJJJJJJJ A Y Y \n");
ELP " J A A Y Y OOO RRR K K EEEE \n");
ELP " J A A Y Y O O R R K K E \n");
ELP " JJ J A A Y O O RRR KK EEE \n");
ELP " J J J AAAAAAA Y O O R R K K E \n");
ELP " J J A A Y OOO R R K K EEEE \n");
#ifdef X11
ELP " JJJJ A A Y\n");
#else
ELP " JJJJ %c A A %c Y \n",
1, 1); /* 1 is undisplayable except on a PC */
#endif
ELP " \n");
ELP " UNIVERSITY OF MARYLAND, COLLEGE PARK, MARYLAND 20742\n\n\n");
#ifdef X11
ELP " \n");
ELP " Experimental X windows version by Eric Kostelich\n");
#endif
}