12 #define LTLG_TITLE_LENGTH (80)
13 #define LTLG_SIDE_LENGTH ( 4)
14 #define LTLG_FTN_RECORD (64*4)
18 typedef short ltlgDataParaTypeInteger;
19 typedef float ltlgDataParaTypeReal;
21 typedef enum ltlgDataHow {
26 typedef enum ltlgDataType {
33 typedef struct ltlgDataLLDataInfo {
34 ltlgDataParaTypeInteger NN;
35 ltlgDataParaTypeInteger NL;
36 ltlgDataParaTypeReal WT;
39 typedef struct ltlgDataLLData {
40 ltlgDataParaTypeReal r;
41 ltlgDataParaTypeReal Re;
42 ltlgDataParaTypeReal Im;
45 typedef struct ltlgDataParaInfo {
46 ltlgDataParaTypeReal d;
47 ltlgDataParaTypeReal Min;
48 ltlgDataParaTypeReal Max;
49 ltlgDataParaTypeInteger n;
50 ltlgDataParaTypeInteger dummy;
53 typedef struct ltlgData {
54 char title1[LTLG_TITLE_LENGTH+1];
55 char title2[LTLG_TITLE_LENGTH+1];
56 char side[LTLG_SIDE_LENGTH+1];
60 ltlgDataLLDataInfo* llInfo;
61 ltlgDataLLData** ltlg;
66 /* Utilty Funcitions */
67 #define ltlgDataFileRead ltlgDataReadFile
68 #define ltlgDataFileWrite ltlgDataWriteFile
70 extern void ltlgDataReadFile(FILE* fpt, ltlgData* ltlg, ltlgDataParaTypeInteger mode, ltlgDataParaTypeInteger* status);
71 extern void ltlgDataWriteFile(FILE* fpt, ltlgData* ltlg, ltlgDataParaTypeInteger mode, ltlgDataParaTypeInteger* status);
73 extern void ltlgDataPrint(FILE* fpt, ltlgData ltlg, ltlgDataParaTypeInteger mode);
74 extern void ltlgDataPrintInfo(FILE* fpt, ltlgData ltlg);
75 extern void ltlgDataPrintllInfo(FILE* fpt, ltlgData ltlg);
76 extern void ltlgDataPrintllData(FILE* fpt, ltlgData ltlg);
78 extern void ltlgDataAllocate(ltlgData* ltlg, ltlgDataParaTypeInteger* status);
79 extern void ltlgDataFree(ltlgData* ltlg);
81 extern void ltlgDataWeightModifyFromFile(ltlgData* ltlg, FILE* fpt, long mode);
82 extern void ltlgDataWeightModify(ltlgData* ltlg, ltlgDataLLDataInfo Weight, long mode);
83 extern void ltlgDataWeightOfNEqualLOnly(ltlgData* ltlg);
88 ltlgDataLNumberGet(ltlgData* ltlg,
89 ltlgDataParaTypeInteger n,
90 ltlgDataParaTypeInteger l);
92 extern ltlgDataParaTypeReal
93 ltlgDataGet(ltlgData* ltlg,
94 ltlgDataParaTypeInteger n,
95 ltlgDataParaTypeInteger l,
96 ltlgDataParaTypeReal r,
97 ltlgDataParaTypeReal* data,
98 ltlgDataType type, ltlgDataHow how);
101 extern ltlgDataParaTypeReal
102 ltlgDataGet2(ltlgData* ltlg,
104 ltlgDataParaTypeReal r,
105 ltlgDataParaTypeReal* data,
106 ltlgDataType type, ltlgDataHow how);
109 #endif /* LTLG_DATA_H */