loon: INITAP.c Source File

00001 /*
00002         Define memory size (words)
00003 */
00004 #define MEMSZ    1000000
00005 #include "initap.h"
00006 
00007 void INITAP() {
00008 /*
00009         Generated on: 23-Feb-20 1 at: 12:11
00010 */
00011 static char tapver[]="12345678",gafver[]="12345678";
00012 static int io[] = {3,-2,-1,-1};
00013 /*
00014         Initialise ZEBRA
00015 */
00016 MZEBRA(io);
00017 /*      MZVERS();
00018 
00019          Open TAP and create objects
00020 */
00021 OPETAP(MEMSZ);
00022 GETVER(tapver,gafver);
00023 printf("ADAMO/TAP version %s with GAF version %s starting
00024 ",
00025                          tapver,gafver);
00026 CREOBJ();
00027 
00028 }
00029