=================================================================== RCS file: /home/cvs/OpenXM_contrib2/asir2000/plot/ifplot.h,v retrieving revision 1.1.1.1 retrieving revision 1.15 diff -u -p -r1.1.1.1 -r1.15 --- OpenXM_contrib2/asir2000/plot/ifplot.h 1999/12/03 07:39:13 1.1.1.1 +++ OpenXM_contrib2/asir2000/plot/ifplot.h 2013/12/19 05:48:24 1.15 @@ -1,12 +1,55 @@ -/* $OpenXM: OpenXM/src/asir99/plot/ifplot.h,v 1.1.1.1 1999/11/10 08:12:34 noro Exp $ */ -#if defined(THINK_C) -#include -#include -#include -#include -#include -#include -/* #include */ +/* + * Copyright (c) 1994-2000 FUJITSU LABORATORIES LIMITED + * All rights reserved. + * + * FUJITSU LABORATORIES LIMITED ("FLL") hereby grants you a limited, + * non-exclusive and royalty-free license to use, copy, modify and + * redistribute, solely for non-commercial and non-profit purposes, the + * computer program, "Risa/Asir" ("SOFTWARE"), subject to the terms and + * conditions of this Agreement. For the avoidance of doubt, you acquire + * only a limited right to use the SOFTWARE hereunder, and FLL or any + * third party developer retains all rights, including but not limited to + * copyrights, in and to the SOFTWARE. + * + * (1) FLL does not grant you a license in any way for commercial + * purposes. You may use the SOFTWARE only for non-commercial and + * non-profit purposes only, such as academic, research and internal + * business use. + * (2) The SOFTWARE is protected by the Copyright Law of Japan and + * international copyright treaties. If you make copies of the SOFTWARE, + * with or without modification, as permitted hereunder, you shall affix + * to all such copies of the SOFTWARE the above copyright notice. + * (3) An explicit reference to this SOFTWARE and its copyright owner + * shall be made on your publication or presentation in any form of the + * results obtained by use of the SOFTWARE. + * (4) In the event that you modify the SOFTWARE, you shall notify FLL by + * e-mail at risa-admin@sec.flab.fujitsu.co.jp of the detailed specification + * for such modification or the source code of the modified part of the + * SOFTWARE. + * + * THE SOFTWARE IS PROVIDED AS IS WITHOUT ANY WARRANTY OF ANY KIND. FLL + * MAKES ABSOLUTELY NO WARRANTIES, EXPRESSED, IMPLIED OR STATUTORY, AND + * EXPRESSLY DISCLAIMS ANY IMPLIED WARRANTY OF MERCHANTABILITY, FITNESS + * FOR A PARTICULAR PURPOSE OR NONINFRINGEMENT OF THIRD PARTIES' + * RIGHTS. NO FLL DEALER, AGENT, EMPLOYEES IS AUTHORIZED TO MAKE ANY + * MODIFICATIONS, EXTENSIONS, OR ADDITIONS TO THIS WARRANTY. + * UNDER NO CIRCUMSTANCES AND UNDER NO LEGAL THEORY, TORT, CONTRACT, + * OR OTHERWISE, SHALL FLL BE LIABLE TO YOU OR ANY OTHER PERSON FOR ANY + * DIRECT, INDIRECT, SPECIAL, INCIDENTAL, PUNITIVE OR CONSEQUENTIAL + * DAMAGES OF ANY CHARACTER, INCLUDING, WITHOUT LIMITATION, DAMAGES + * ARISING OUT OF OR RELATING TO THE SOFTWARE OR THIS AGREEMENT, DAMAGES + * FOR LOSS OF GOODWILL, WORK STOPPAGE, OR LOSS OF DATA, OR FOR ANY + * DAMAGES, EVEN IF FLL SHALL HAVE BEEN INFORMED OF THE POSSIBILITY OF + * SUCH DAMAGES, OR FOR ANY CLAIM BY ANY OTHER PARTY. EVEN IF A PART + * OF THE SOFTWARE HAS BEEN DEVELOPED BY A THIRD PARTY, THE THIRD PARTY + * DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, + * PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. + * + * $OpenXM: OpenXM_contrib2/asir2000/plot/ifplot.h,v 1.14 2011/08/10 04:51:58 saito Exp $ +*/ +#if defined(VISUAL) +/* for Visual C++ */ +#include #else #include #include @@ -43,43 +86,62 @@ #define C_APLOT C_PRIV+7 #define C_DRAWCIRCLE C_PRIV+8 -#define MAXCANVAS 16 +#define MAXCANVAS 64 #define MAXGC 16 -#if defined(THINK_C) -#define DEFAULTWIDTH 200 -#define DEFAULTHEIGHT 200 -#else +#define DEFAULTPOLARSTEP 400 #define DEFAULTWIDTH 400 #define DEFAULTHEIGHT 400 -#endif #define MODE_IFPLOT 0 #define MODE_CONPLOT 1 #define MODE_PLOT 2 +#define MODE_INTERACTIVE 3 +#define MODE_POLARPLOT 4 +#define MODE_PLOTOVER 5 +#define MODE_IFPLOTD 6 +#define MODE_IFPLOTQ 7 +#define MODE_IFPLOTB 8 +#define MODE_INEQND 9 +#define MODE_INEQNQ 10 +#define MODE_INEQNB 11 +#define MODE_INEQNANDD 12 +#define MODE_INEQNANDQ 13 +#define MODE_INEQNANDB 14 +#define MODE_INEQNORD 15 +#define MODE_INEQNORQ 16 +#define MODE_INEQNORB 17 +#define MODE_INEQNXORD 18 +#define MODE_INEQNXORQ 19 +#define MODE_INEQNXORB 20 +#define MODE_CONPLOTD 21 +#define MODE_CONPLOTQ 22 +#define MODE_CONPLOTB 23 +#define MODE_ITVIFPLOT 24 +#define MODE_PLOTOVERD 25 +#define MODE_PLOTOVERQ 26 +#define MODE_PLOTOVERB 27 #define DIR_X 0 #define DIR_Y 1 #define DIR_Z 2 -#if defined(THINK_C) -#define COPYBITS - -#define POINT Point -#define XC(a) ((a).h) -#define YC(a) ((a).v) -#define DRAWPOINT(d,p,g,x,y) MoveTo(x,y); Line(0,0) -#define DRAWLINE(d,p,g,x,y,u,v) MoveTo(x,y); LineTo(u,v) -#define DRAWSTRING(d,p,g,x,y,s,l) MoveTo(x,y); DrawText(s,0,l) -#define TEXTWIDTH(f,s,l) TextWidth(s,0,l) +#if defined(VISUAL) +/* for Visual C++ */ +#define XC(a) ((a).x) +#define YC(a) ((a).y) #define DISPLAY int -#define WINDOW WindowPtr -#define CURSOR CursHandle -#ifndef COPYBITS -#define DRAWABLE PicHandle +#define WINDOW void * +#define CURSOR int +#define DRAWABLE HDC + +/* XXX : use GC argument as the color */ +#define DRAWPOINT(d,p,g,x,y) SetPixel(p,x,y,0) + +#define DRAWLINE(d,p,g,x,y,u,v) MoveToEx(p,x,y,&oldpos); LineTo(p,u,v) +#define DRAWSTRING(d,p,g,x,y,s,l) TextOut(p,x,y,s,l) +/* #define TEXTWIDTH(f,s,l) */ #else -#define DRAWABLE BitMap -#endif -#else +/* for UNIX */ #define POINT XPoint #define XC(a) ((a).x) #define YC(a) ((a).y) @@ -98,19 +160,39 @@ struct pa { POINT *pos; }; +typedef struct RealVect { + int len; + int body[1]; +} RealVect; + +#define MKRVECT2(v,x,y)\ +((v)=(RealVect *)MALLOC_ATOMIC(sizeof(RealVect)+sizeof(int)),\ + (v)->len=2,(v)->body[0]=(x),(v)->body[1]=(y)) +#define MKRVECT3(v,x,y,z)\ +((v)=(RealVect *)MALLOC_ATOMIC(sizeof(RealVect)+2*sizeof(int)),\ + (v)->len=3,(v)->body[0]=(x),(v)->body[1]=(y),(v)->body[2]=(z)) +#define MKRVECT4(v,x,y,z,u)\ +((v)=(RealVect *)MALLOC_ATOMIC(sizeof(RealVect)+3*sizeof(int)),\ + (v)->len=4,(v)->body[0]=(x),(v)->body[1]=(y),(v)->body[2]=(z),(v)->body[3]=(u)) +#define MKRVECT5(v,x,y,z,u,w)\ +((v)=(RealVect *)MALLOC_ATOMIC(sizeof(RealVect)+4*sizeof(int)),\ + (v)->len=4,(v)->body[0]=(x),(v)->body[1]=(y),(v)->body[2]=(z),(v)->body[3]=(u),(v)->body[4]=(w)) + +#define RV_POINT 1 +#define RV_LINE 2 +#define RV_ARC 3 + struct canvas { int index; -#if defined(THINK_C) - Rect rect; - WindowRecord record; - WindowPtr window; -#ifndef COPYBITS - PicHandle pix; +#if defined(VISUAL) +/* for Visual C++ */ + void *window; /* pointer to CMainFrame */ + HWND hwnd; /* handle to the canvas window */ + HDC pix; /* shadow DC on memory */ + char *prefix; + int percentage; + struct canvas *real_can; #else - BitMap pix,wbits; - RgnHandle rgnsav; -#endif -#else Widget shell,xcoord,ycoord,xdone,ydone,level,wideb,preciseb,noaxisb; Window window; Pixmap pix; @@ -126,25 +208,126 @@ struct canvas { double xmin,xmax; double ymin,ymax; double zmin,zmax; + double vmin,vmax; int nzstep; Q qxmin,qxmax; Q qymin,qymax; struct pa *pa; + /* to register the history in the interactive mode */ + NODE history; + int color; + int division; }; extern struct canvas *canvas[]; +extern struct canvas *closed_canvas[]; extern struct canvas *current_can; +#if defined(INTERVAL) +extern Pixel BackPixel; +extern int Itvplot; +#endif -#ifdef INET extern VL CO; extern int stream; -#endif extern DISPLAY *display; extern CURSOR normalcur,runningcur,errorcur; -#if !defined(THINK_C) +#if defined(VISUAL) +extern POINT start_point,end_point; +extern SIZE cansize; +#else extern Window rootwin; -extern GC drawGC,dashGC,hlGC,scaleGC,clearGC,xorGC,colorGC; +extern GC drawGC,dashGC,hlGC,scaleGC,clearGC,xorGC,colorGC,cdrawGC; extern XFontStruct *sffs; +#endif + +struct xcolorForPS { + unsigned long pixel; + double r,g,b; + int print; +}; + +/* prototypes */ +void calc(double **,struct canvas *,int); +double usubstrp(P,double); +void qcalc(char **,struct canvas *); +void sturmseq(VL,P,VECT *); +void seproot(VECT,int,int,int *); +int numch(VECT,Q,Q); +void usubstqp(P,Q,Q *); +void plotcalc(struct canvas *); +int open_canvas(NODE); +int plot(NODE,int); +int ifplotold(NODE); +int polarplot(NODE); +int conplotD(NODE); +int memory_plot(NODE,LIST *); +int plotover(NODE); +int plotoverD(NODE); +int drawcircle(NODE); +int draw_obj(NODE); +int clear_canvas(NODE); +int arrayplot(NODE); +int ineqnover(NODE); +int ineqnand(NODE); +int ineqnor(NODE); +int ineqnxor(NODE); +void ineqnmain(struct canvas *, int, int); +void conplotmainD(struct canvas *); +void obj_op(struct canvas *, struct canvas *, int); +void area_print(DISPLAY *,double **, struct canvas *, int); +#if defined(INTERVAL) +int itvifplot(NODE); +//int itvplot1(NODE); +//int itvplot2(NODE); +//int itvplot3(NODE); +//int itvplot4(NODE); +int objcp(NODE); +int ineqn(NODE); +void itvcalc(double **, struct canvas *, int); +void itvplotmain(struct canvas *, int); +void itvplotmain1(struct canvas *); +#endif +void ifplot_resize(struct canvas *,POINT,POINT); +void plot_resize(struct canvas *,POINT,POINT); +void ifplotmainOld(struct canvas *); +void ifplotmain(struct canvas *); +void ifplotmains(struct canvas *); +void qifplotmain(struct canvas *); +void if_print(DISPLAY *,double **,struct canvas *,int); +void if_printOld(DISPLAY *,double **,struct canvas *); +void memory_if_print(double **,struct canvas *,BYTEARRAY *); +void con_print(DISPLAY *,double **,struct canvas *); +void memory_con_print(double **,struct canvas *,BYTEARRAY *); +void qif_print(DISPLAY *,char **,struct canvas *); +void plot_print(DISPLAY *,struct canvas *); +void draw_point(DISPLAY *,struct canvas *,int,int,int); +void draw_line(DISPLAY *,struct canvas *,int,int,int,int,int); +void pline(DISPLAY *,struct canvas *,DRAWABLE); +double adjust_scale(double,double); +void initmarker(struct canvas *,char *); +void marker(struct canvas *,int,int); +void define_cursor(WINDOW,CURSOR); +void count_and_flush(); +void flush(); + +#if defined(VISUAL) +int search_canvas(); +int search_active_canvas(); +void create_canvas(struct canvas *can); +void destroy_canvas(struct canvas *can); +void clear_pixmap(struct canvas *can); +void alloc_pixmap(struct canvas *can); +void copy_to_canvas(struct canvas *can); +void copy_subimage(struct canvas *subcan,struct canvas *can,POINT pos); +void draw_wideframe(struct canvas *can,DRAWABLE d); +void create_brushes(); +void draw_frame0(DRAWABLE d,POINT spos,POINT epos); + +void reset_current_computation(); +void set_selection(); +void reset_selection(); +void set_busy(); +void reset_busy(); #endif