File: dosimple.c

package info (click to toggle)
ncbi-tools6 6.1.20170106%2Bdfsg1-0%2Bdeb10u2
  • links: PTS, VCS
  • area: main
  • in suites: buster
  • size: 468,492 kB
  • sloc: ansic: 1,474,204; pascal: 6,740; cpp: 6,248; xml: 3,390; sh: 2,137; perl: 1,084; csh: 508; makefile: 427; ruby: 93; lisp: 81
file content (34 lines) | stat: -rw-r--r-- 675 bytes parent folder | download | duplicates (14)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
/*****************************************************************************
*
*   dosimple.c
*       test program for simple sequence (fasta format)
*
*****************************************************************************/
#include <simple.h>

Int2 Main(void)
{
	AsnIoPtr aip;
    SimpleSeqPtr ssp;
    FILE * fp;

	if ((aip = AsnIoOpen("bioseq.ent", "r")) == NULL)
		return 1;

    ssp = SimpleSeqAsnRead(aip);

	aip = AsnIoClose(aip);

    fp = FileOpen("simple.out", "w");

    fprintf(fp, "fasta format:\n\n");
    SimpleSeqPrint(ssp, fp, TRUE);

    fprintf(fp, "\n\nreport format:\n\n");
    SimpleSeqPrint(ssp, fp, FALSE);

    FileClose(fp);

	return 0;
}