| 1 | /* |
|---|
| 2 | * protst.h Adachi, J. 1996.03.12 |
|---|
| 3 | * Copyright (C) 1993-1996 J. Adachi & M. Hasegawa, All rights reserved. |
|---|
| 4 | */ |
|---|
| 5 | |
|---|
| 6 | #include "molphy.h" |
|---|
| 7 | #include "matrixut.h" |
|---|
| 8 | |
|---|
| 9 | #define NUMAMI 20 |
|---|
| 10 | #define NUMNUC 4 |
|---|
| 11 | |
|---|
| 12 | #ifndef NUC |
|---|
| 13 | #define TPMRADIX NUMAMI |
|---|
| 14 | #define INFOMOL "Amino" |
|---|
| 15 | #define LOGFILE "Protst.log" |
|---|
| 16 | #else /* NUC*/ |
|---|
| 17 | #define TPMRADIX NUMNUC |
|---|
| 18 | #define INFOMOL "Nucleic" |
|---|
| 19 | #define LOGFILE "Nucst.log" |
|---|
| 20 | #endif /* NUC*/ |
|---|
| 21 | |
|---|
| 22 | #define MAXCOLUMN 80 |
|---|
| 23 | #define LINESITES 60 |
|---|
| 24 | #define MAXELEMENT 17 |
|---|
| 25 | #define BUFLINE 512 |
|---|
| 26 | #define MAXWORD 32 |
|---|
| 27 | #define MAXOVER 50 |
|---|
| 28 | #define MAXLENG 30 |
|---|
| 29 | #define NMLNGTH 10 /* max. num. of characters in species name with S or I */ |
|---|
| 30 | #define SWITCHES "ac:hHiILSvwzZ" |
|---|
| 31 | #define VERSION "1.2.1" |
|---|
| 32 | #define DATE "Mar 12 1996" |
|---|
| 33 | |
|---|
| 34 | typedef int ivectpmty[TPMRADIX]; |
|---|
| 35 | typedef double dvectpmty[TPMRADIX]; |
|---|
| 36 | typedef dvectpmty dmattpmty[TPMRADIX]; |
|---|
| 37 | |
|---|
| 38 | extern char *Cacid1[]; |
|---|
| 39 | extern char *Cacid3[]; |
|---|
| 40 | |
|---|
| 41 | |
|---|
| 42 | #ifdef MAIN_MODULE |
|---|
| 43 | |
|---|
| 44 | #define EXTERN |
|---|
| 45 | int Tpmradix = TPMRADIX; |
|---|
| 46 | char *Infomol = INFOMOL; |
|---|
| 47 | |
|---|
| 48 | #else |
|---|
| 49 | |
|---|
| 50 | #define EXTERN extern |
|---|
| 51 | EXTERN int Tpmradix; |
|---|
| 52 | EXTERN char *Infomol; |
|---|
| 53 | |
|---|
| 54 | #endif |
|---|
| 55 | |
|---|
| 56 | EXTERN FILE *Logfp; |
|---|
| 57 | EXTERN time_t Ct0; |
|---|
| 58 | |
|---|
| 59 | EXTERN boolean Align_optn; /* a option Alignment viewer */ |
|---|
| 60 | EXTERN boolean Colmn_optn; /* c option Column */ |
|---|
| 61 | EXTERN boolean Ctacit_optn; /* C option taCiturnity */ |
|---|
| 62 | EXTERN boolean Inlvd_optn; /* I option interleaved input format */ |
|---|
| 63 | EXTERN boolean Info_optn; /* i option */ |
|---|
| 64 | EXTERN boolean Logfl_optn; /* L option */ |
|---|
| 65 | EXTERN boolean Multi_optn; /* m option multiple data sets */ |
|---|
| 66 | EXTERN boolean Seque_optn; /* S option PHYLIP Sequential input format */ |
|---|
| 67 | EXTERN boolean Tstv_optn; /* t option with decimal number */ |
|---|
| 68 | EXTERN boolean Toptim_optn; /* t option without decimal number */ |
|---|
| 69 | EXTERN boolean Verbs_optn; /* v option Verbose to stderr */ |
|---|
| 70 | EXTERN boolean Write_optn; /* w option output sequence infomation */ |
|---|
| 71 | EXTERN boolean Debug_optn; /* z option */ |
|---|
| 72 | EXTERN boolean Debug; /* Z option */ |
|---|
| 73 | |
|---|
| 74 | EXTERN char *Prog_name; |
|---|
| 75 | EXTERN int Maxspc; |
|---|
| 76 | EXTERN int Numspc; |
|---|
| 77 | EXTERN int Maxpair; |
|---|
| 78 | EXTERN int Numpair; |
|---|
| 79 | EXTERN int Maxsite; |
|---|
| 80 | EXTERN int Numsite; |
|---|
| 81 | EXTERN int Numptrn; |
|---|
| 82 | EXTERN int Linesites; |
|---|
| 83 | EXTERN int Maxcolumn; |
|---|
| 84 | EXTERN int Maxelement; |
|---|
| 85 | |
|---|
| 86 | EXTERN char **Identif; |
|---|
| 87 | EXTERN char **Sciname; |
|---|
| 88 | EXTERN char **Engname; |
|---|
| 89 | EXTERN cmatrix Seqchar; |
|---|
| 90 | EXTERN imatrix Seqconint; |
|---|
| 91 | EXTERN ivector Weight; |
|---|
| 92 | EXTERN dvectpmty Freqemp; |
|---|
| 93 | |
|---|
| 94 | |
|---|
| 95 | EXTERN int Numnoindel; /* ST */ |
|---|
| 96 | EXTERN ivector Insdel; /* ST */ |
|---|