1 /*****************************************************************************
2 *
3 *   dosimple.c
4 *       test program for simple sequence (fasta format)
5 *
6 *****************************************************************************/
7 #include <simple.h>
8 
Main(void)9 Int2 Main(void)
10 {
11 	AsnIoPtr aip;
12     SimpleSeqPtr ssp;
13     FILE * fp;
14 
15 	if ((aip = AsnIoOpen("bioseq.ent", "r")) == NULL)
16 		return 1;
17 
18     ssp = SimpleSeqAsnRead(aip);
19 
20 	aip = AsnIoClose(aip);
21 
22     fp = FileOpen("simple.out", "w");
23 
24     fprintf(fp, "fasta format:\n\n");
25     SimpleSeqPrint(ssp, fp, TRUE);
26 
27     fprintf(fp, "\n\nreport format:\n\n");
28     SimpleSeqPrint(ssp, fp, FALSE);
29 
30     FileClose(fp);
31 
32 	return 0;
33 }
34 
35