Reorganization
Allan Cornet [Fri, 1 Sep 2006 11:02:15 +0000 (11:02 +0000)]
data_structures module

remove routines directory

103 files changed:
scilab/Makefile.incl.mak
scilab/Scilab.sln
scilab/configheaders.bat
scilab/imp/SEpsf.c
scilab/imp/Slatexpr.c
scilab/libs/LibScilab/DllmainLibscilab.c
scilab/modules/core/src/c/callinterf.h
scilab/modules/core/src/fortran/mkindx.f
scilab/modules/core/src/fortran/mklist.f
scilab/modules/data_structures/help/eng/definedfields.xml [new file with mode: 0644]
scilab/modules/data_structures/help/eng/getfield.xml [new file with mode: 0644]
scilab/modules/data_structures/help/eng/list.xml [new file with mode: 0644]
scilab/modules/data_structures/help/eng/lsslist.xml [new file with mode: 0644]
scilab/modules/data_structures/help/eng/lstcat.xml [new file with mode: 0644]
scilab/modules/data_structures/help/eng/mlist.xml [new file with mode: 0644]
scilab/modules/data_structures/help/eng/rlist.xml [new file with mode: 0644]
scilab/modules/data_structures/help/eng/setfield.xml [new file with mode: 0644]
scilab/modules/data_structures/help/eng/tlist.xml [new file with mode: 0644]
scilab/modules/data_structures/help/fr/definedfields.xml [new file with mode: 0644]
scilab/modules/data_structures/help/fr/getfield.xml [new file with mode: 0644]
scilab/modules/data_structures/help/fr/list.xml [new file with mode: 0644]
scilab/modules/data_structures/help/fr/lsslist.xml [new file with mode: 0644]
scilab/modules/data_structures/help/fr/lstcat.xml [new file with mode: 0644]
scilab/modules/data_structures/help/fr/mlist.xml [new file with mode: 0644]
scilab/modules/data_structures/help/fr/rlist.xml [new file with mode: 0644]
scilab/modules/data_structures/help/fr/setfield.xml [new file with mode: 0644]
scilab/modules/data_structures/help/fr/tlist.xml [new file with mode: 0644]
scilab/modules/data_structures/includes/gw_data_structures1.h [moved from scilab/routines/interf/gw_data_structures1.h with 100% similarity]
scilab/modules/data_structures/includes/gw_data_structures2.h [moved from scilab/routines/interf/gw_data_structures2.h with 100% similarity]
scilab/modules/data_structures/sci_gateway/c/gw_data_structures1.c [moved from scilab/routines/interf/gw_data_structures1.c with 95% similarity]
scilab/modules/data_structures/sci_gateway/c/gw_data_structures2.c [moved from scilab/routines/interf/gw_data_structures2.c with 95% similarity]
scilab/modules/data_structures/sci_gateway/c/sci_definedfields.c [moved from scilab/routines/interf/sci_definedfields.c with 90% similarity]
scilab/modules/data_structures/sci_gateway/c/sci_glist.c [moved from scilab/routines/interf/sci_glist.c with 94% similarity]
scilab/modules/data_structures/sci_gateway/c/sci_list.c [moved from scilab/routines/interf/sci_list.c with 93% similarity]
scilab/modules/data_structures/sci_gateway/c/sci_lsslist.c [moved from scilab/routines/interf/sci_lsslist.c with 93% similarity]
scilab/modules/data_structures/sci_gateway/c/sci_lstcat.c [moved from scilab/routines/interf/sci_lstcat.c with 93% similarity]
scilab/modules/data_structures/sci_gateway/c/sci_lstsize.c [moved from scilab/routines/interf/sci_lstsize.c with 93% similarity]
scilab/modules/data_structures/sci_gateway/c/sci_mlist.c [moved from scilab/routines/interf/sci_mlist.c with 93% similarity]
scilab/modules/data_structures/sci_gateway/c/sci_rlist.c [moved from scilab/routines/interf/sci_rlist.c with 94% similarity]
scilab/modules/data_structures/sci_gateway/c/sci_tlist.c [moved from scilab/routines/interf/sci_tlist.c with 93% similarity]
scilab/modules/data_structures/sci_gateway/fortran/sci_definedfields.f [moved from scilab/routines/interf/sci_definedfields.f with 93% similarity]
scilab/modules/data_structures/sci_gateway/fortran/sci_getfield.f [moved from scilab/routines/interf/sci_getfield.f with 95% similarity]
scilab/modules/data_structures/sci_gateway/fortran/sci_list.f [moved from scilab/routines/interf/sci_list.f with 93% similarity]
scilab/modules/data_structures/sci_gateway/fortran/sci_lstcat.f [moved from scilab/routines/interf/sci_lstcat.f with 94% similarity]
scilab/modules/data_structures/sci_gateway/fortran/sci_lstsize.f [moved from scilab/routines/interf/sci_lstsize.f with 92% similarity]
scilab/modules/data_structures/sci_gateway/fortran/sci_setfield.f [moved from scilab/routines/interf/sci_setfield.f with 93% similarity]
scilab/modules/data_structures/src/c/data_structures.vcproj [moved from scilab/routines/interf/interf.vcproj with 61% similarity]
scilab/modules/data_structures/src/c/hmops.c [moved from scilab/routines/interf/hmops.c with 99% similarity]
scilab/modules/data_structures/src/c/stcreate.c [moved from scilab/routines/interf/stcreate.c with 98% similarity]
scilab/modules/data_structures/src/fortran/data_structures_f.vfproj [new file with mode: 0644]
scilab/modules/data_structures/src/fortran/extractfields.f [moved from scilab/routines/interf/extractfields.f with 95% similarity]
scilab/modules/data_structures/src/fortran/followpath.f [moved from scilab/routines/interf/followpath.f with 99% similarity]
scilab/modules/data_structures/src/fortran/forcerhs.f [moved from scilab/routines/interf/forcerhs.f with 92% similarity]
scilab/modules/data_structures/src/fortran/gratyp.f [moved from scilab/routines/interf/gratyp.f with 100% similarity]
scilab/modules/data_structures/src/fortran/insertfield.f [moved from scilab/routines/interf/insertfield.f with 99% similarity]
scilab/modules/data_structures/src/fortran/intl_e.f [moved from scilab/routines/interf/intl_e.f with 99% similarity]
scilab/modules/data_structures/src/fortran/intl_i.f [moved from scilab/routines/interf/intl_i.f with 99% similarity]
scilab/modules/data_structures/src/fortran/lsstyp.f [moved from scilab/routines/interf/lsstyp.f with 100% similarity]
scilab/modules/data_structures/src/fortran/lstops.f [moved from scilab/routines/interf/lstops.f with 98% similarity]
scilab/modules/data_structures/src/fortran/mlist.f [moved from scilab/routines/interf/mlist.f with 93% similarity]
scilab/modules/data_structures/src/fortran/rattyp.f [moved from scilab/routines/interf/rattyp.f with 100% similarity]
scilab/modules/data_structures/src/fortran/udptr.f [moved from scilab/routines/interf/udptr.f with 92% similarity]
scilab/modules/graphics/includes/ObjectStructure.h
scilab/modules/graphics/sci_gateway/sci_draw.c
scilab/modules/pvm/src/pvm_grp.c
scilab/modules/pvm/src/pvm_recv.c
scilab/modules/pvm/src/pvm_send.c
scilab/routines/Make.lib [deleted file]
scilab/routines/Make.lib.mak [deleted file]
scilab/routines/Makefile.in [deleted file]
scilab/routines/callinter.h [deleted file]
scilab/routines/graphics/DestroyObjects.h [deleted file]
scilab/routines/graphics/DrawObjects.h [deleted file]
scilab/routines/graphics/Events.h [deleted file]
scilab/routines/graphics/GetProperty.h [deleted file]
scilab/routines/graphics/Graphics.h [deleted file]
scilab/routines/graphics/HandleManagement.h [deleted file]
scilab/routines/graphics/Math.h [deleted file]
scilab/routines/graphics/ObjectStructure.h [deleted file]
scilab/routines/graphics/PloEch.h [deleted file]
scilab/routines/graphics/StringMatrix.h [deleted file]
scilab/routines/graphics/Vect2Matrix.h [deleted file]
scilab/routines/graphics/bcg.h [deleted file]
scilab/routines/graphics/intcommongraphics.h [deleted file]
scilab/routines/graphics/matdes.h [deleted file]
scilab/routines/graphics/sciMatrix.h [deleted file]
scilab/routines/graphics/scigraphic.h [deleted file]
scilab/routines/interf/Makefile.in [deleted file]
scilab/routines/interf/interf_f/interf_f.vfproj [deleted file]
scilab/routines/interf/stack1.h [deleted file]
scilab/routines/interf/stack1.info [deleted file]
scilab/routines/interf/stack2.h [deleted file]
scilab/routines/interf/stack3.h [deleted file]
scilab/routines/machine-h.vc [deleted file]
scilab/routines/machine.h.in [deleted file]
scilab/routines/os_specific/sci_mem_alloc.h [deleted file]
scilab/routines/os_specific/win_mem_alloc.h [deleted file]
scilab/routines/sci_mem_alloc.h [deleted file]
scilab/routines/stack-c.h [deleted file]
scilab/routines/stack-def.h [deleted file]
scilab/routines/stack.h [deleted file]
scilab/routines/version-h.vc [deleted file]
scilab/routines/version.h.in [deleted file]

index 4785d6f..8a49e11 100644 (file)
@@ -84,7 +84,7 @@ XLIBSBIN=$(TKLIBSBIN) $(PVMLIB) $(GUILIBS) "$(SCIDIR1)\bin\atlas.lib" "$(SCIDIR1
 !IF "$(USE_F2C)" == "YES"
 .f.obj :
        @echo ----------- Compile file $*.f (using f2c) -------------
-       @"$(SCIDIR1)\bin\f2c.exe" $(FFLAGS) $*.f 
+       @"$(SCIDIR1)\bin\f2c.exe" -I"$(SCIDIR1)\modules\core\includes" $(FFLAGS) $*.f 
        @$(CC) $(CFLAGS) $*.c 
        -del $*.c 
 !ELSE 
index ca11da7..488ede3 100644 (file)
@@ -2,12 +2,12 @@ Microsoft Visual Studio Solution File, Format Version 9.00
 # Visual Studio 2005
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "WScilex", "modules\gui\src\c\wsci\WScilex\WScilex.vcproj", "{CCD80549-EB9C-42AA-9B86-D687377E94F6}"
        ProjectSection(ProjectDependencies) = postProject
-               {66F2FB48-5D68-4445-A856-119F685A371B} = {66F2FB48-5D68-4445-A856-119F685A371B}
-               {7DCD755A-2906-47B8-9084-2FE6D7F5D5C3} = {7DCD755A-2906-47B8-9084-2FE6D7F5D5C3}
-               {64BC155E-292F-484F-9404-76EE6AE67A43} = {64BC155E-292F-484F-9404-76EE6AE67A43}
-               {982BF37F-42C4-4D37-8D14-60521B141503} = {982BF37F-42C4-4D37-8D14-60521B141503}
-               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
                {9BA6F7E4-AE64-4FD9-A5A7-0996A8B73B77} = {9BA6F7E4-AE64-4FD9-A5A7-0996A8B73B77}
+               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
+               {982BF37F-42C4-4D37-8D14-60521B141503} = {982BF37F-42C4-4D37-8D14-60521B141503}
+               {64BC155E-292F-484F-9404-76EE6AE67A43} = {64BC155E-292F-484F-9404-76EE6AE67A43}
+               {7DCD755A-2906-47B8-9084-2FE6D7F5D5C3} = {7DCD755A-2906-47B8-9084-2FE6D7F5D5C3}
+               {66F2FB48-5D68-4445-A856-119F685A371B} = {66F2FB48-5D68-4445-A856-119F685A371B}
        EndProjectSection
 EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "BEpsf", "imp\BEpsf\BEpsf.vcproj", "{114F3B77-2A32-4EC8-AC23-B3F910622BD9}"
@@ -69,90 +69,90 @@ Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "statistics", "modules\stati
 EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "LibScilab", "libs\LibScilab\LibScilab.vcproj", "{64BC155E-292F-484F-9404-76EE6AE67A43}"
        ProjectSection(ProjectDependencies) = postProject
-               {22F14F8F-67C6-49B1-A730-CE70FFE9EB61} = {22F14F8F-67C6-49B1-A730-CE70FFE9EB61}
                {69296D00-0DE1-4F4B-B0CE-FE4F3CB43923} = {69296D00-0DE1-4F4B-B0CE-FE4F3CB43923}
                {798D5602-CF39-4B2F-B780-0EF282E7CEA0} = {798D5602-CF39-4B2F-B780-0EF282E7CEA0}
-               {D5DD1407-3926-4F6C-AD7B-3A6B2DE56049} = {D5DD1407-3926-4F6C-AD7B-3A6B2DE56049}
-               {51240B08-5E4E-439B-B745-C870D5B513BF} = {51240B08-5E4E-439B-B745-C870D5B513BF}
-               {05D8F60B-332A-4161-B946-B8AB30ED439C} = {05D8F60B-332A-4161-B946-B8AB30ED439C}
-               {ECFFEB0C-1EDA-45EE-9A10-B18143852E17} = {ECFFEB0C-1EDA-45EE-9A10-B18143852E17}
-               {DBC45B0D-6E0A-4107-B284-5A3B0C5BB50D} = {DBC45B0D-6E0A-4107-B284-5A3B0C5BB50D}
-               {45CA5B12-7601-4968-AE16-16069FD1A152} = {45CA5B12-7601-4968-AE16-16069FD1A152}
-               {73AA7612-4297-4339-B521-8C2870E7BEC1} = {73AA7612-4297-4339-B521-8C2870E7BEC1}
-               {836EC214-02DD-474F-91C9-C8C46C183D48} = {836EC214-02DD-474F-91C9-C8C46C183D48}
-               {2DAEC214-B0B4-4BC3-96B2-77C6AD1450CD} = {2DAEC214-B0B4-4BC3-96B2-77C6AD1450CD}
-               {C6E2BC17-34D8-46E4-85F3-6293CB21ADCD} = {C6E2BC17-34D8-46E4-85F3-6293CB21ADCD}
-               {A3AD381E-C0DD-45BB-ACB2-C0A0DB33A606} = {A3AD381E-C0DD-45BB-ACB2-C0A0DB33A606}
-               {FE9EB721-B3C1-41D8-B585-3FB3A0083CEC} = {FE9EB721-B3C1-41D8-B585-3FB3A0083CEC}
-               {13082624-97F9-47DB-A9A1-AD7D6BF3856A} = {13082624-97F9-47DB-A9A1-AD7D6BF3856A}
-               {B3805031-D315-4275-9D1D-5C43F8E92616} = {B3805031-D315-4275-9D1D-5C43F8E92616}
-               {45ECEB36-A12B-42F5-9D7A-216A0E70601D} = {45ECEB36-A12B-42F5-9D7A-216A0E70601D}
-               {B7A0273E-8E71-4663-8497-0895945ED54D} = {B7A0273E-8E71-4663-8497-0895945ED54D}
-               {80C0F142-184B-4E08-A8EE-5E71437CF904} = {80C0F142-184B-4E08-A8EE-5E71437CF904}
-               {C8C13A46-DEB8-44AA-8BF8-C9BBC7FA0B46} = {C8C13A46-DEB8-44AA-8BF8-C9BBC7FA0B46}
-               {C2EDD447-BB60-41A1-973B-8213FCA9ECD4} = {C2EDD447-BB60-41A1-973B-8213FCA9ECD4}
-               {4FC72D4A-80EE-4B1A-8724-0201C1A35621} = {4FC72D4A-80EE-4B1A-8724-0201C1A35621}
-               {566E524B-D327-4416-A865-9C83503FAB7B} = {566E524B-D327-4416-A865-9C83503FAB7B}
-               {97B3664E-1186-400A-AEC0-AC3F23087689} = {97B3664E-1186-400A-AEC0-AC3F23087689}
-               {DAA1FD4E-02E2-4E85-B60A-81B067E8FBA0} = {DAA1FD4E-02E2-4E85-B60A-81B067E8FBA0}
-               {BC462A57-C5B3-4F93-8067-80363827DCDA} = {BC462A57-C5B3-4F93-8067-80363827DCDA}
-               {C4C3EA58-1C27-4EFB-A5BF-0DB24EC5F87A} = {C4C3EA58-1C27-4EFB-A5BF-0DB24EC5F87A}
-               {03773159-155A-48E0-9B26-119D0BF35B2B} = {03773159-155A-48E0-9B26-119D0BF35B2B}
-               {2652D55A-391C-4341-A299-6B7BDCE45F0C} = {2652D55A-391C-4341-A299-6B7BDCE45F0C}
-               {DFA0D75B-F7EF-4D02-B33F-486829405315} = {DFA0D75B-F7EF-4D02-B33F-486829405315}
-               {7B77E45C-9E80-4DDA-A3C8-C6C8FEBAA190} = {7B77E45C-9E80-4DDA-A3C8-C6C8FEBAA190}
-               {F0190B5D-FB21-47A2-99AC-06627CDD0F8A} = {F0190B5D-FB21-47A2-99AC-06627CDD0F8A}
-               {1D5E735D-176E-4C6D-B980-3C2EC7051F90} = {1D5E735D-176E-4C6D-B980-3C2EC7051F90}
-               {34F8E361-D2D9-43B0-93D2-F6CF5FAF6CEB} = {34F8E361-D2D9-43B0-93D2-F6CF5FAF6CEB}
-               {5B110267-7C18-437C-B87D-DBA2B50729E9} = {5B110267-7C18-437C-B87D-DBA2B50729E9}
-               {B50F726C-8536-4DAC-8CEF-D97706ACACCC} = {B50F726C-8536-4DAC-8CEF-D97706ACACCC}
-               {BB8D4E6F-F09E-49FC-8BCB-9F496F639F60} = {BB8D4E6F-F09E-49FC-8BCB-9F496F639F60}
-               {B5945471-7E91-43B1-8728-37E37ADB7EE2} = {B5945471-7E91-43B1-8728-37E37ADB7EE2}
-               {0BB16C71-0FCD-4FB9-B7C0-F2601330C980} = {0BB16C71-0FCD-4FB9-B7C0-F2601330C980}
-               {25F06272-3E27-46E4-BEE0-8D24F60CE451} = {25F06272-3E27-46E4-BEE0-8D24F60CE451}
-               {E9741474-5C3A-4101-8B85-AC5221018C05} = {E9741474-5C3A-4101-8B85-AC5221018C05}
-               {114F3B77-2A32-4EC8-AC23-B3F910622BD9} = {114F3B77-2A32-4EC8-AC23-B3F910622BD9}
-               {3396F078-1296-47EB-B817-78CB36265DD1} = {3396F078-1296-47EB-B817-78CB36265DD1}
-               {8D45767A-9B03-4905-97F6-D2F3F79141EA} = {8D45767A-9B03-4905-97F6-D2F3F79141EA}
-               {C352587B-F5E4-457C-80EE-A1AEAB176C8E} = {C352587B-F5E4-457C-80EE-A1AEAB176C8E}
-               {425B887B-9FC5-4CD2-B632-DBFC000E3E25} = {425B887B-9FC5-4CD2-B632-DBFC000E3E25}
-               {D2B63E7D-1E66-4EFC-892E-FA6DAF4E5895} = {D2B63E7D-1E66-4EFC-892E-FA6DAF4E5895}
-               {982BF37F-42C4-4D37-8D14-60521B141503} = {982BF37F-42C4-4D37-8D14-60521B141503}
-               {A2207388-FB55-46B2-A24D-D76C0FE796F8} = {A2207388-FB55-46B2-A24D-D76C0FE796F8}
-               {495C9E8A-439A-426E-AA2C-0B22653875F9} = {495C9E8A-439A-426E-AA2C-0B22653875F9}
-               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
-               {3DBBFF93-F344-4484-A317-14F985434BBC} = {3DBBFF93-F344-4484-A317-14F985434BBC}
-               {1D219098-007C-4F76-9AE6-271ABBB7D393} = {1D219098-007C-4F76-9AE6-271ABBB7D393}
-               {104D88A6-C72A-411C-B32F-D6819DDBB737} = {104D88A6-C72A-411C-B32F-D6819DDBB737}
-               {620D8FA7-3704-438E-BB1E-391C84401A2E} = {620D8FA7-3704-438E-BB1E-391C84401A2E}
-               {E61FEBA7-C98E-4C42-96CA-FC03F0DB26B2} = {E61FEBA7-C98E-4C42-96CA-FC03F0DB26B2}
-               {8BA2DDA8-BD04-4D4D-8EE6-6CAA955F7470} = {8BA2DDA8-BD04-4D4D-8EE6-6CAA955F7470}
-               {C7865CAA-EC7C-41EB-8324-2B81C384CA20} = {C7865CAA-EC7C-41EB-8324-2B81C384CA20}
-               {6F1E57AB-01D9-488D-9E7A-A5065848D693} = {6F1E57AB-01D9-488D-9E7A-A5065848D693}
-               {C456D5B8-8A32-496A-A2EE-164B0D734126} = {C456D5B8-8A32-496A-A2EE-164B0D734126}
-               {D575A6BA-094A-45EC-8F8D-2DF7A2C37AA6} = {D575A6BA-094A-45EC-8F8D-2DF7A2C37AA6}
-               {500443BC-F67D-442B-8713-8E2A03BB3C8D} = {500443BC-F67D-442B-8713-8E2A03BB3C8D}
-               {53AAB5BC-2C08-4BBA-9793-C36140A404F8} = {53AAB5BC-2C08-4BBA-9793-C36140A404F8}
-               {6638C3BC-D85D-414D-8AC3-9BD514CA23E1} = {6638C3BC-D85D-414D-8AC3-9BD514CA23E1}
-               {8CCDD3C2-B025-4A12-A986-1AA28D7C0C33} = {8CCDD3C2-B025-4A12-A986-1AA28D7C0C33}
-               {B678A0CA-E006-415A-83E4-46F6060282C4} = {B678A0CA-E006-415A-83E4-46F6060282C4}
-               {28E4E9CA-3EEC-43EE-9F15-56259C6677B8} = {28E4E9CA-3EEC-43EE-9F15-56259C6677B8}
-               {78BD64CE-181D-4D3F-9254-5C4F55C1EDC9} = {78BD64CE-181D-4D3F-9254-5C4F55C1EDC9}
-               {4C0B22D1-F74D-42DF-B90D-71CBC1B43DC4} = {4C0B22D1-F74D-42DF-B90D-71CBC1B43DC4}
-               {FD0F48D8-9D0B-42A8-A743-B57198FAB41E} = {FD0F48D8-9D0B-42A8-A743-B57198FAB41E}
-               {18F043DA-1DB5-464F-B67D-CF1C23BE7EA0} = {18F043DA-1DB5-464F-B67D-CF1C23BE7EA0}
-               {3A131FDF-BDA9-4216-91AD-DFFCEF46F89A} = {3A131FDF-BDA9-4216-91AD-DFFCEF46F89A}
-               {3FF921DF-3084-4F09-BD14-362F60B0D037} = {3FF921DF-3084-4F09-BD14-362F60B0D037}
-               {34F953E3-9A2C-4359-A8C5-41CEBD0ECE45} = {34F953E3-9A2C-4359-A8C5-41CEBD0ECE45}
-               {4467FBE5-45A6-4CA7-AD8C-48419B656137} = {4467FBE5-45A6-4CA7-AD8C-48419B656137}
-               {E3A01BE7-815F-4A06-9F0A-C95E80873966} = {E3A01BE7-815F-4A06-9F0A-C95E80873966}
-               {FAF6A7EB-8A36-4278-B34E-34EA89E55304} = {FAF6A7EB-8A36-4278-B34E-34EA89E55304}
-               {B0817AEC-2DA0-4C95-9599-4E01F2B547CD} = {B0817AEC-2DA0-4C95-9599-4E01F2B547CD}
-               {8AB8ECEC-8C22-475E-80D0-E14696F5A19B} = {8AB8ECEC-8C22-475E-80D0-E14696F5A19B}
-               {3A72C3ED-98F7-49C7-B59C-2C6C47FF9390} = {3A72C3ED-98F7-49C7-B59C-2C6C47FF9390}
-               {D407D7F1-A4D4-40F2-A5A1-D291B5D28C35} = {D407D7F1-A4D4-40F2-A5A1-D291B5D28C35}
-               {3735EFF9-925B-45B1-82CF-762658E69E70} = {3735EFF9-925B-45B1-82CF-762658E69E70}
+               {8091E9B6-4C08-4218-A63D-742867CCFE9F} = {8091E9B6-4C08-4218-A63D-742867CCFE9F}
+               {B7A168A0-DFC0-4C6D-B0CC-6079912A4A76} = {B7A168A0-DFC0-4C6D-B0CC-6079912A4A76}
                {959384FC-016C-4B01-B848-1B18D26B6CC4} = {959384FC-016C-4B01-B848-1B18D26B6CC4}
+               {3735EFF9-925B-45B1-82CF-762658E69E70} = {3735EFF9-925B-45B1-82CF-762658E69E70}
+               {D407D7F1-A4D4-40F2-A5A1-D291B5D28C35} = {D407D7F1-A4D4-40F2-A5A1-D291B5D28C35}
+               {3A72C3ED-98F7-49C7-B59C-2C6C47FF9390} = {3A72C3ED-98F7-49C7-B59C-2C6C47FF9390}
+               {8AB8ECEC-8C22-475E-80D0-E14696F5A19B} = {8AB8ECEC-8C22-475E-80D0-E14696F5A19B}
+               {B0817AEC-2DA0-4C95-9599-4E01F2B547CD} = {B0817AEC-2DA0-4C95-9599-4E01F2B547CD}
+               {FAF6A7EB-8A36-4278-B34E-34EA89E55304} = {FAF6A7EB-8A36-4278-B34E-34EA89E55304}
+               {E3A01BE7-815F-4A06-9F0A-C95E80873966} = {E3A01BE7-815F-4A06-9F0A-C95E80873966}
+               {4467FBE5-45A6-4CA7-AD8C-48419B656137} = {4467FBE5-45A6-4CA7-AD8C-48419B656137}
+               {34F953E3-9A2C-4359-A8C5-41CEBD0ECE45} = {34F953E3-9A2C-4359-A8C5-41CEBD0ECE45}
+               {3FF921DF-3084-4F09-BD14-362F60B0D037} = {3FF921DF-3084-4F09-BD14-362F60B0D037}
+               {18F043DA-1DB5-464F-B67D-CF1C23BE7EA0} = {18F043DA-1DB5-464F-B67D-CF1C23BE7EA0}
+               {FD0F48D8-9D0B-42A8-A743-B57198FAB41E} = {FD0F48D8-9D0B-42A8-A743-B57198FAB41E}
+               {4C0B22D1-F74D-42DF-B90D-71CBC1B43DC4} = {4C0B22D1-F74D-42DF-B90D-71CBC1B43DC4}
+               {78BD64CE-181D-4D3F-9254-5C4F55C1EDC9} = {78BD64CE-181D-4D3F-9254-5C4F55C1EDC9}
+               {28E4E9CA-3EEC-43EE-9F15-56259C6677B8} = {28E4E9CA-3EEC-43EE-9F15-56259C6677B8}
+               {B678A0CA-E006-415A-83E4-46F6060282C4} = {B678A0CA-E006-415A-83E4-46F6060282C4}
+               {8CCDD3C2-B025-4A12-A986-1AA28D7C0C33} = {8CCDD3C2-B025-4A12-A986-1AA28D7C0C33}
+               {6638C3BC-D85D-414D-8AC3-9BD514CA23E1} = {6638C3BC-D85D-414D-8AC3-9BD514CA23E1}
+               {53AAB5BC-2C08-4BBA-9793-C36140A404F8} = {53AAB5BC-2C08-4BBA-9793-C36140A404F8}
+               {500443BC-F67D-442B-8713-8E2A03BB3C8D} = {500443BC-F67D-442B-8713-8E2A03BB3C8D}
+               {D575A6BA-094A-45EC-8F8D-2DF7A2C37AA6} = {D575A6BA-094A-45EC-8F8D-2DF7A2C37AA6}
+               {C456D5B8-8A32-496A-A2EE-164B0D734126} = {C456D5B8-8A32-496A-A2EE-164B0D734126}
+               {6F1E57AB-01D9-488D-9E7A-A5065848D693} = {6F1E57AB-01D9-488D-9E7A-A5065848D693}
+               {C7865CAA-EC7C-41EB-8324-2B81C384CA20} = {C7865CAA-EC7C-41EB-8324-2B81C384CA20}
+               {8BA2DDA8-BD04-4D4D-8EE6-6CAA955F7470} = {8BA2DDA8-BD04-4D4D-8EE6-6CAA955F7470}
+               {E61FEBA7-C98E-4C42-96CA-FC03F0DB26B2} = {E61FEBA7-C98E-4C42-96CA-FC03F0DB26B2}
+               {620D8FA7-3704-438E-BB1E-391C84401A2E} = {620D8FA7-3704-438E-BB1E-391C84401A2E}
+               {104D88A6-C72A-411C-B32F-D6819DDBB737} = {104D88A6-C72A-411C-B32F-D6819DDBB737}
+               {1D219098-007C-4F76-9AE6-271ABBB7D393} = {1D219098-007C-4F76-9AE6-271ABBB7D393}
+               {22F14F8F-67C6-49B1-A730-CE70FFE9EB61} = {22F14F8F-67C6-49B1-A730-CE70FFE9EB61}
+               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
+               {495C9E8A-439A-426E-AA2C-0B22653875F9} = {495C9E8A-439A-426E-AA2C-0B22653875F9}
+               {A2207388-FB55-46B2-A24D-D76C0FE796F8} = {A2207388-FB55-46B2-A24D-D76C0FE796F8}
+               {982BF37F-42C4-4D37-8D14-60521B141503} = {982BF37F-42C4-4D37-8D14-60521B141503}
+               {D2B63E7D-1E66-4EFC-892E-FA6DAF4E5895} = {D2B63E7D-1E66-4EFC-892E-FA6DAF4E5895}
+               {425B887B-9FC5-4CD2-B632-DBFC000E3E25} = {425B887B-9FC5-4CD2-B632-DBFC000E3E25}
+               {C352587B-F5E4-457C-80EE-A1AEAB176C8E} = {C352587B-F5E4-457C-80EE-A1AEAB176C8E}
+               {8D45767A-9B03-4905-97F6-D2F3F79141EA} = {8D45767A-9B03-4905-97F6-D2F3F79141EA}
+               {3396F078-1296-47EB-B817-78CB36265DD1} = {3396F078-1296-47EB-B817-78CB36265DD1}
+               {114F3B77-2A32-4EC8-AC23-B3F910622BD9} = {114F3B77-2A32-4EC8-AC23-B3F910622BD9}
+               {E9741474-5C3A-4101-8B85-AC5221018C05} = {E9741474-5C3A-4101-8B85-AC5221018C05}
+               {25F06272-3E27-46E4-BEE0-8D24F60CE451} = {25F06272-3E27-46E4-BEE0-8D24F60CE451}
+               {0BB16C71-0FCD-4FB9-B7C0-F2601330C980} = {0BB16C71-0FCD-4FB9-B7C0-F2601330C980}
+               {B5945471-7E91-43B1-8728-37E37ADB7EE2} = {B5945471-7E91-43B1-8728-37E37ADB7EE2}
+               {BB8D4E6F-F09E-49FC-8BCB-9F496F639F60} = {BB8D4E6F-F09E-49FC-8BCB-9F496F639F60}
+               {B50F726C-8536-4DAC-8CEF-D97706ACACCC} = {B50F726C-8536-4DAC-8CEF-D97706ACACCC}
+               {5B110267-7C18-437C-B87D-DBA2B50729E9} = {5B110267-7C18-437C-B87D-DBA2B50729E9}
+               {34F8E361-D2D9-43B0-93D2-F6CF5FAF6CEB} = {34F8E361-D2D9-43B0-93D2-F6CF5FAF6CEB}
+               {1D5E735D-176E-4C6D-B980-3C2EC7051F90} = {1D5E735D-176E-4C6D-B980-3C2EC7051F90}
+               {F0190B5D-FB21-47A2-99AC-06627CDD0F8A} = {F0190B5D-FB21-47A2-99AC-06627CDD0F8A}
+               {7B77E45C-9E80-4DDA-A3C8-C6C8FEBAA190} = {7B77E45C-9E80-4DDA-A3C8-C6C8FEBAA190}
+               {DFA0D75B-F7EF-4D02-B33F-486829405315} = {DFA0D75B-F7EF-4D02-B33F-486829405315}
+               {2652D55A-391C-4341-A299-6B7BDCE45F0C} = {2652D55A-391C-4341-A299-6B7BDCE45F0C}
+               {03773159-155A-48E0-9B26-119D0BF35B2B} = {03773159-155A-48E0-9B26-119D0BF35B2B}
+               {C4C3EA58-1C27-4EFB-A5BF-0DB24EC5F87A} = {C4C3EA58-1C27-4EFB-A5BF-0DB24EC5F87A}
+               {BC462A57-C5B3-4F93-8067-80363827DCDA} = {BC462A57-C5B3-4F93-8067-80363827DCDA}
+               {DAA1FD4E-02E2-4E85-B60A-81B067E8FBA0} = {DAA1FD4E-02E2-4E85-B60A-81B067E8FBA0}
+               {97B3664E-1186-400A-AEC0-AC3F23087689} = {97B3664E-1186-400A-AEC0-AC3F23087689}
+               {566E524B-D327-4416-A865-9C83503FAB7B} = {566E524B-D327-4416-A865-9C83503FAB7B}
+               {4FC72D4A-80EE-4B1A-8724-0201C1A35621} = {4FC72D4A-80EE-4B1A-8724-0201C1A35621}
+               {C2EDD447-BB60-41A1-973B-8213FCA9ECD4} = {C2EDD447-BB60-41A1-973B-8213FCA9ECD4}
+               {C8C13A46-DEB8-44AA-8BF8-C9BBC7FA0B46} = {C8C13A46-DEB8-44AA-8BF8-C9BBC7FA0B46}
+               {80C0F142-184B-4E08-A8EE-5E71437CF904} = {80C0F142-184B-4E08-A8EE-5E71437CF904}
+               {B7A0273E-8E71-4663-8497-0895945ED54D} = {B7A0273E-8E71-4663-8497-0895945ED54D}
+               {45ECEB36-A12B-42F5-9D7A-216A0E70601D} = {45ECEB36-A12B-42F5-9D7A-216A0E70601D}
+               {B3805031-D315-4275-9D1D-5C43F8E92616} = {B3805031-D315-4275-9D1D-5C43F8E92616}
+               {13082624-97F9-47DB-A9A1-AD7D6BF3856A} = {13082624-97F9-47DB-A9A1-AD7D6BF3856A}
+               {FE9EB721-B3C1-41D8-B585-3FB3A0083CEC} = {FE9EB721-B3C1-41D8-B585-3FB3A0083CEC}
+               {A3AD381E-C0DD-45BB-ACB2-C0A0DB33A606} = {A3AD381E-C0DD-45BB-ACB2-C0A0DB33A606}
+               {C6E2BC17-34D8-46E4-85F3-6293CB21ADCD} = {C6E2BC17-34D8-46E4-85F3-6293CB21ADCD}
+               {2DAEC214-B0B4-4BC3-96B2-77C6AD1450CD} = {2DAEC214-B0B4-4BC3-96B2-77C6AD1450CD}
+               {836EC214-02DD-474F-91C9-C8C46C183D48} = {836EC214-02DD-474F-91C9-C8C46C183D48}
+               {73AA7612-4297-4339-B521-8C2870E7BEC1} = {73AA7612-4297-4339-B521-8C2870E7BEC1}
+               {45CA5B12-7601-4968-AE16-16069FD1A152} = {45CA5B12-7601-4968-AE16-16069FD1A152}
+               {DBC45B0D-6E0A-4107-B284-5A3B0C5BB50D} = {DBC45B0D-6E0A-4107-B284-5A3B0C5BB50D}
+               {ECFFEB0C-1EDA-45EE-9A10-B18143852E17} = {ECFFEB0C-1EDA-45EE-9A10-B18143852E17}
+               {05D8F60B-332A-4161-B946-B8AB30ED439C} = {05D8F60B-332A-4161-B946-B8AB30ED439C}
+               {51240B08-5E4E-439B-B745-C870D5B513BF} = {51240B08-5E4E-439B-B745-C870D5B513BF}
+               {D5DD1407-3926-4F6C-AD7B-3A6B2DE56049} = {D5DD1407-3926-4F6C-AD7B-3A6B2DE56049}
        EndProjectSection
 EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "core", "modules\core\src\c\core.vcproj", "{C6E2BC17-34D8-46E4-85F3-6293CB21ADCD}"
@@ -181,8 +181,8 @@ Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "graphics", "modules\graphic
 EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "integer", "modules\integer\src\c\integer.vcproj", "{C7865CAA-EC7C-41EB-8324-2B81C384CA20}"
        ProjectSection(ProjectDependencies) = postProject
-               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
                {3170E4C2-1173-4264-A222-7EE8CCB3DDF7} = {3170E4C2-1173-4264-A222-7EE8CCB3DDF7}
+               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
        EndProjectSection
 EndProject
 Project("{6989167D-11E4-40FE-8C1A-2192A86A7E90}") = "integer_f", "modules\integer\src\fortran\integer_f.vfproj", "{FD0F48D8-9D0B-42A8-A743-B57198FAB41E}"
@@ -190,16 +190,6 @@ Project("{6989167D-11E4-40FE-8C1A-2192A86A7E90}") = "integer_f", "modules\intege
                {3170E4C2-1173-4264-A222-7EE8CCB3DDF7} = {3170E4C2-1173-4264-A222-7EE8CCB3DDF7}
        EndProjectSection
 EndProject
-Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "interf", "routines\interf\interf.vcproj", "{3A131FDF-BDA9-4216-91AD-DFFCEF46F89A}"
-       ProjectSection(ProjectDependencies) = postProject
-               {3170E4C2-1173-4264-A222-7EE8CCB3DDF7} = {3170E4C2-1173-4264-A222-7EE8CCB3DDF7}
-       EndProjectSection
-EndProject
-Project("{6989167D-11E4-40FE-8C1A-2192A86A7E90}") = "interf_f", "routines\interf\interf_f\interf_f.vfproj", "{3DBBFF93-F344-4484-A317-14F985434BBC}"
-       ProjectSection(ProjectDependencies) = postProject
-               {3170E4C2-1173-4264-A222-7EE8CCB3DDF7} = {3170E4C2-1173-4264-A222-7EE8CCB3DDF7}
-       EndProjectSection
-EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "intersci", "modules\intersci\src\lib\intersci.vcproj", "{DFA0D75B-F7EF-4D02-B33F-486829405315}"
        ProjectSection(ProjectDependencies) = postProject
                {3170E4C2-1173-4264-A222-7EE8CCB3DDF7} = {3170E4C2-1173-4264-A222-7EE8CCB3DDF7}
@@ -246,8 +236,8 @@ Project("{6989167D-11E4-40FE-8C1A-2192A86A7E90}") = "optim_f", "modules\optimiza
 EndProject
 Project("{6989167D-11E4-40FE-8C1A-2192A86A7E90}") = "polynomials_f", "modules\polynomials\src\fortran\polynomials_f.vfproj", "{3A72C3ED-98F7-49C7-B59C-2C6C47FF9390}"
        ProjectSection(ProjectDependencies) = postProject
-               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
                {3170E4C2-1173-4264-A222-7EE8CCB3DDF7} = {3170E4C2-1173-4264-A222-7EE8CCB3DDF7}
+               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
        EndProjectSection
 EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "pvm", "modules\pvm\pvm.vcproj", "{63352867-3983-48E3-94FE-DD8F0D6E921F}"
@@ -312,10 +302,10 @@ Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "xdr", "modules\graphics\src
 EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "CScilex", "modules\gui\src\c\wsci\CScilex\CScilex.vcproj", "{9BA6F7E4-AE64-4FD9-A5A7-0996A8B73B77}"
        ProjectSection(ProjectDependencies) = postProject
-               {7DCD755A-2906-47B8-9084-2FE6D7F5D5C3} = {7DCD755A-2906-47B8-9084-2FE6D7F5D5C3}
-               {64BC155E-292F-484F-9404-76EE6AE67A43} = {64BC155E-292F-484F-9404-76EE6AE67A43}
-               {982BF37F-42C4-4D37-8D14-60521B141503} = {982BF37F-42C4-4D37-8D14-60521B141503}
                {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
+               {982BF37F-42C4-4D37-8D14-60521B141503} = {982BF37F-42C4-4D37-8D14-60521B141503}
+               {64BC155E-292F-484F-9404-76EE6AE67A43} = {64BC155E-292F-484F-9404-76EE6AE67A43}
+               {7DCD755A-2906-47B8-9084-2FE6D7F5D5C3} = {7DCD755A-2906-47B8-9084-2FE6D7F5D5C3}
        EndProjectSection
 EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "Forwin", "tools\forwin\Forwin.vcproj", "{500443BC-F67D-442B-8713-8E2A03BB3C8D}"
@@ -338,23 +328,23 @@ Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "Modelicac", "modules\scicos
 EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "libmex", "modules\mexlib\src\libmex\libmex.vcproj", "{0AEC8745-BB5B-4E66-A59A-7251412C3605}"
        ProjectSection(ProjectDependencies) = postProject
-               {64BC155E-292F-484F-9404-76EE6AE67A43} = {64BC155E-292F-484F-9404-76EE6AE67A43}
-               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
                {3170E4C2-1173-4264-A222-7EE8CCB3DDF7} = {3170E4C2-1173-4264-A222-7EE8CCB3DDF7}
+               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
+               {64BC155E-292F-484F-9404-76EE6AE67A43} = {64BC155E-292F-484F-9404-76EE6AE67A43}
        EndProjectSection
 EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "libmx", "modules\mexlib\src\libmx\libmx.vcproj", "{CEF88C5F-6820-46D4-BCCD-44D5581481C5}"
        ProjectSection(ProjectDependencies) = postProject
-               {64BC155E-292F-484F-9404-76EE6AE67A43} = {64BC155E-292F-484F-9404-76EE6AE67A43}
-               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
                {3170E4C2-1173-4264-A222-7EE8CCB3DDF7} = {3170E4C2-1173-4264-A222-7EE8CCB3DDF7}
+               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
+               {64BC155E-292F-484F-9404-76EE6AE67A43} = {64BC155E-292F-484F-9404-76EE6AE67A43}
        EndProjectSection
 EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "libmat", "modules\mexlib\src\libmat\libmat.vcproj", "{8A508625-C2AA-4295-AA76-16E4E456D13D}"
        ProjectSection(ProjectDependencies) = postProject
-               {64BC155E-292F-484F-9404-76EE6AE67A43} = {64BC155E-292F-484F-9404-76EE6AE67A43}
-               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
                {3170E4C2-1173-4264-A222-7EE8CCB3DDF7} = {3170E4C2-1173-4264-A222-7EE8CCB3DDF7}
+               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
+               {64BC155E-292F-484F-9404-76EE6AE67A43} = {64BC155E-292F-484F-9404-76EE6AE67A43}
        EndProjectSection
 EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "SetupAtlas", "tools\SetupAtlas\SetupAtlas.vcproj", "{AAFF2053-3F1E-4B8B-B174-4407A6B98FA5}"
@@ -373,8 +363,8 @@ Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "tclsci", "modules\tclsci\tc
 EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "Javasci", "modules\Javasci\Javasci.vcproj", "{0BD503EF-5CB6-4277-BAC4-8955C97F247D}"
        ProjectSection(ProjectDependencies) = postProject
-               {64BC155E-292F-484F-9404-76EE6AE67A43} = {64BC155E-292F-484F-9404-76EE6AE67A43}
                {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
+               {64BC155E-292F-484F-9404-76EE6AE67A43} = {64BC155E-292F-484F-9404-76EE6AE67A43}
        EndProjectSection
 EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "BuildChm", "modules\helptools\src\BuildChm\BuildChm.vcproj", "{D319F719-F429-4842-A6F9-B1227FE2A54D}"
@@ -384,15 +374,15 @@ Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "BuildChm", "modules\helptoo
 EndProject
 Project("{6989167D-11E4-40FE-8C1A-2192A86A7E90}") = "lapack_DLL", "libs\lapack\lapack_f\lapack_DLL.vfproj", "{69296D00-0DE1-4F4B-B0CE-FE4F3CB43923}"
        ProjectSection(ProjectDependencies) = postProject
-               {3170E4C2-1173-4264-A222-7EE8CCB3DDF7} = {3170E4C2-1173-4264-A222-7EE8CCB3DDF7}
                {78BD64CE-181D-4D3F-9254-5C4F55C1EDC9} = {78BD64CE-181D-4D3F-9254-5C4F55C1EDC9}
+               {3170E4C2-1173-4264-A222-7EE8CCB3DDF7} = {3170E4C2-1173-4264-A222-7EE8CCB3DDF7}
        EndProjectSection
 EndProject
 Project("{6989167D-11E4-40FE-8C1A-2192A86A7E90}") = "arpack_DLL", "modules\arnoldi\src\arpack\arpack_f\arpack_DLL.vfproj", "{34F953E3-9A2C-4359-A8C5-41CEBD0ECE45}"
        ProjectSection(ProjectDependencies) = postProject
-               {69296D00-0DE1-4F4B-B0CE-FE4F3CB43923} = {69296D00-0DE1-4F4B-B0CE-FE4F3CB43923}
-               {3170E4C2-1173-4264-A222-7EE8CCB3DDF7} = {3170E4C2-1173-4264-A222-7EE8CCB3DDF7}
                {78BD64CE-181D-4D3F-9254-5C4F55C1EDC9} = {78BD64CE-181D-4D3F-9254-5C4F55C1EDC9}
+               {3170E4C2-1173-4264-A222-7EE8CCB3DDF7} = {3170E4C2-1173-4264-A222-7EE8CCB3DDF7}
+               {69296D00-0DE1-4F4B-B0CE-FE4F3CB43923} = {69296D00-0DE1-4F4B-B0CE-FE4F3CB43923}
        EndProjectSection
 EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "time", "modules\time\time.vcproj", "{05D8F60B-332A-4161-B946-B8AB30ED439C}"
@@ -407,21 +397,21 @@ Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "sound", "modules\sound\soun
 EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "localization", "modules\localization\src\localization.vcproj", "{ECFFEB0C-1EDA-45EE-9A10-B18143852E17}"
        ProjectSection(ProjectDependencies) = postProject
-               {2DAEC214-B0B4-4BC3-96B2-77C6AD1450CD} = {2DAEC214-B0B4-4BC3-96B2-77C6AD1450CD}
-               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
                {3170E4C2-1173-4264-A222-7EE8CCB3DDF7} = {3170E4C2-1173-4264-A222-7EE8CCB3DDF7}
+               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
+               {2DAEC214-B0B4-4BC3-96B2-77C6AD1450CD} = {2DAEC214-B0B4-4BC3-96B2-77C6AD1450CD}
        EndProjectSection
 EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "hashtable", "libs\hashtable\hashtable.vcproj", "{2DAEC214-B0B4-4BC3-96B2-77C6AD1450CD}"
        ProjectSection(ProjectDependencies) = postProject
-               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
                {3170E4C2-1173-4264-A222-7EE8CCB3DDF7} = {3170E4C2-1173-4264-A222-7EE8CCB3DDF7}
+               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
        EndProjectSection
 EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "libjvm", "modules\jvm\src\libjvm.vcproj", "{8BA2DDA8-BD04-4D4D-8EE6-6CAA955F7470}"
        ProjectSection(ProjectDependencies) = postProject
-               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
                {3170E4C2-1173-4264-A222-7EE8CCB3DDF7} = {3170E4C2-1173-4264-A222-7EE8CCB3DDF7}
+               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
        EndProjectSection
 EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "SciGUIConsole", "modules\gui\src\c\SciGUIConsole\SciGUIConsole.vcproj", "{B3805031-D315-4275-9D1D-5C43F8E92616}"
@@ -447,8 +437,8 @@ Project("{6989167D-11E4-40FE-8C1A-2192A86A7E90}") = "io_f", "modules\io\src\fort
 EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "string", "modules\string\src\c\string.vcproj", "{8D45767A-9B03-4905-97F6-D2F3F79141EA}"
        ProjectSection(ProjectDependencies) = postProject
-               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
                {3170E4C2-1173-4264-A222-7EE8CCB3DDF7} = {3170E4C2-1173-4264-A222-7EE8CCB3DDF7}
+               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
        EndProjectSection
 EndProject
 Project("{6989167D-11E4-40FE-8C1A-2192A86A7E90}") = "string_f", "modules\string\src\fortran\string_f.vfproj", "{FAF6A7EB-8A36-4278-B34E-34EA89E55304}"
@@ -458,32 +448,32 @@ Project("{6989167D-11E4-40FE-8C1A-2192A86A7E90}") = "string_f", "modules\string\
 EndProject
 Project("{6989167D-11E4-40FE-8C1A-2192A86A7E90}") = "symbolic_f", "modules\symbolic\src\fortran\symbolic_f.vfproj", "{D2B63E7D-1E66-4EFC-892E-FA6DAF4E5895}"
        ProjectSection(ProjectDependencies) = postProject
-               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
                {3170E4C2-1173-4264-A222-7EE8CCB3DDF7} = {3170E4C2-1173-4264-A222-7EE8CCB3DDF7}
+               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
        EndProjectSection
 EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "symbolic", "modules\symbolic\src\c\symbolic.vcproj", "{A2207388-FB55-46B2-A24D-D76C0FE796F8}"
        ProjectSection(ProjectDependencies) = postProject
-               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
                {3170E4C2-1173-4264-A222-7EE8CCB3DDF7} = {3170E4C2-1173-4264-A222-7EE8CCB3DDF7}
+               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
        EndProjectSection
 EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "polynomials", "modules\polynomials\src\c\polynomials.vcproj", "{620D8FA7-3704-438E-BB1E-391C84401A2E}"
        ProjectSection(ProjectDependencies) = postProject
-               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
                {3170E4C2-1173-4264-A222-7EE8CCB3DDF7} = {3170E4C2-1173-4264-A222-7EE8CCB3DDF7}
+               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
        EndProjectSection
 EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "arnoldi", "modules\arnoldi\arnoldi.vcproj", "{D575A6BA-094A-45EC-8F8D-2DF7A2C37AA6}"
        ProjectSection(ProjectDependencies) = postProject
-               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
                {3170E4C2-1173-4264-A222-7EE8CCB3DDF7} = {3170E4C2-1173-4264-A222-7EE8CCB3DDF7}
+               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
        EndProjectSection
 EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "signal", "modules\signal_processing\src\c\signal.vcproj", "{A3AD381E-C0DD-45BB-ACB2-C0A0DB33A606}"
        ProjectSection(ProjectDependencies) = postProject
-               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
                {3170E4C2-1173-4264-A222-7EE8CCB3DDF7} = {3170E4C2-1173-4264-A222-7EE8CCB3DDF7}
+               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
        EndProjectSection
 EndProject
 Project("{6989167D-11E4-40FE-8C1A-2192A86A7E90}") = "cacsd_f", "modules\cacsd\src\fortran\cacsd_f.vfproj", "{0BB16C71-0FCD-4FB9-B7C0-F2601330C980}"
@@ -493,8 +483,8 @@ Project("{6989167D-11E4-40FE-8C1A-2192A86A7E90}") = "cacsd_f", "modules\cacsd\sr
 EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "cacsd", "modules\cacsd\src\c\cacsd.vcproj", "{D5DD1407-3926-4F6C-AD7B-3A6B2DE56049}"
        ProjectSection(ProjectDependencies) = postProject
-               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
                {3170E4C2-1173-4264-A222-7EE8CCB3DDF7} = {3170E4C2-1173-4264-A222-7EE8CCB3DDF7}
+               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
        EndProjectSection
 EndProject
 Project("{6989167D-11E4-40FE-8C1A-2192A86A7E90}") = "dcd_f", "modules\statistics\src\dcdflib\dcd_f\dcd_f.vfproj", "{18F043DA-1DB5-464F-B67D-CF1C23BE7EA0}"
@@ -511,14 +501,14 @@ Project("{6989167D-11E4-40FE-8C1A-2192A86A7E90}") = "linear_algebra_f", "modules
 EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "linear_algebra", "modules\linear_algebra\src\c\linear_algebra.vcproj", "{BC462A57-C5B3-4F93-8067-80363827DCDA}"
        ProjectSection(ProjectDependencies) = postProject
-               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
                {3170E4C2-1173-4264-A222-7EE8CCB3DDF7} = {3170E4C2-1173-4264-A222-7EE8CCB3DDF7}
+               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
        EndProjectSection
 EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "special_functions", "modules\special_functions\src\c\special_functions.vcproj", "{C8C13A46-DEB8-44AA-8BF8-C9BBC7FA0B46}"
        ProjectSection(ProjectDependencies) = postProject
-               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
                {3170E4C2-1173-4264-A222-7EE8CCB3DDF7} = {3170E4C2-1173-4264-A222-7EE8CCB3DDF7}
+               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
        EndProjectSection
 EndProject
 Project("{6989167D-11E4-40FE-8C1A-2192A86A7E90}") = "special_functions_f", "modules\special_functions\src\fortran\special_functions_f.vfproj", "{E3A01BE7-815F-4A06-9F0A-C95E80873966}"
@@ -528,8 +518,8 @@ Project("{6989167D-11E4-40FE-8C1A-2192A86A7E90}") = "special_functions_f", "modu
 EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "differential_equations", "modules\differential_equations\src\c\differential_equations.vcproj", "{F0190B5D-FB21-47A2-99AC-06627CDD0F8A}"
        ProjectSection(ProjectDependencies) = postProject
-               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
                {3170E4C2-1173-4264-A222-7EE8CCB3DDF7} = {3170E4C2-1173-4264-A222-7EE8CCB3DDF7}
+               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
        EndProjectSection
 EndProject
 Project("{6989167D-11E4-40FE-8C1A-2192A86A7E90}") = "differential_equations_f", "modules\differential_equations\src\fortran\differential_equations_f.vfproj", "{28E4E9CA-3EEC-43EE-9F15-56259C6677B8}"
@@ -539,8 +529,8 @@ Project("{6989167D-11E4-40FE-8C1A-2192A86A7E90}") = "differential_equations_f",
 EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "double", "modules\double\src\c\double.vcproj", "{E61FEBA7-C98E-4C42-96CA-FC03F0DB26B2}"
        ProjectSection(ProjectDependencies) = postProject
-               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
                {3170E4C2-1173-4264-A222-7EE8CCB3DDF7} = {3170E4C2-1173-4264-A222-7EE8CCB3DDF7}
+               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
        EndProjectSection
 EndProject
 Project("{6989167D-11E4-40FE-8C1A-2192A86A7E90}") = "double_f", "modules\double\src\fortran\double_f.vfproj", "{97B3664E-1186-400A-AEC0-AC3F23087689}"
@@ -550,8 +540,8 @@ Project("{6989167D-11E4-40FE-8C1A-2192A86A7E90}") = "double_f", "modules\double\
 EndProject
 Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "boolean", "modules\boolean\src\c\boolean.vcproj", "{8AB8ECEC-8C22-475E-80D0-E14696F5A19B}"
        ProjectSection(ProjectDependencies) = postProject
-               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
                {3170E4C2-1173-4264-A222-7EE8CCB3DDF7} = {3170E4C2-1173-4264-A222-7EE8CCB3DDF7}
+               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
        EndProjectSection
 EndProject
 Project("{6989167D-11E4-40FE-8C1A-2192A86A7E90}") = "boolean_f", "modules\boolean\src\fortran\boolean_f.vfproj", "{45ECEB36-A12B-42F5-9D7A-216A0E70601D}"
@@ -565,6 +555,17 @@ Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "interpolation", "modules\in
                {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
        EndProjectSection
 EndProject
+Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "data_structures", "modules\data_structures\src\c\data_structures.vcproj", "{B7A168A0-DFC0-4C6D-B0CC-6079912A4A76}"
+       ProjectSection(ProjectDependencies) = postProject
+               {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E} = {6A84AD8C-BA18-4A3F-9C72-EC3DF0939E9E}
+               {3170E4C2-1173-4264-A222-7EE8CCB3DDF7} = {3170E4C2-1173-4264-A222-7EE8CCB3DDF7}
+       EndProjectSection
+EndProject
+Project("{6989167D-11E4-40FE-8C1A-2192A86A7E90}") = "data_structures_f", "modules\data_structures\src\fortran\data_structures_f.vfproj", "{8091E9B6-4C08-4218-A63D-742867CCFE9F}"
+       ProjectSection(ProjectDependencies) = postProject
+               {3170E4C2-1173-4264-A222-7EE8CCB3DDF7} = {3170E4C2-1173-4264-A222-7EE8CCB3DDF7}
+       EndProjectSection
+EndProject
 Global
        GlobalSection(SolutionConfigurationPlatforms) = preSolution
                Debug|Win32 = Debug|Win32
@@ -659,14 +660,6 @@ Global
                {FD0F48D8-9D0B-42A8-A743-B57198FAB41E}.Debug|Win32.Build.0 = Debug|Win32
                {FD0F48D8-9D0B-42A8-A743-B57198FAB41E}.Release|Win32.ActiveCfg = Release|Win32
                {FD0F48D8-9D0B-42A8-A743-B57198FAB41E}.Release|Win32.Build.0 = Release|Win32
-               {3A131FDF-BDA9-4216-91AD-DFFCEF46F89A}.Debug|Win32.ActiveCfg = Debug|Win32
-               {3A131FDF-BDA9-4216-91AD-DFFCEF46F89A}.Debug|Win32.Build.0 = Debug|Win32
-               {3A131FDF-BDA9-4216-91AD-DFFCEF46F89A}.Release|Win32.ActiveCfg = Release|Win32
-               {3A131FDF-BDA9-4216-91AD-DFFCEF46F89A}.Release|Win32.Build.0 = Release|Win32
-               {3DBBFF93-F344-4484-A317-14F985434BBC}.Debug|Win32.ActiveCfg = Debug|Win32
-               {3DBBFF93-F344-4484-A317-14F985434BBC}.Debug|Win32.Build.0 = Debug|Win32
-               {3DBBFF93-F344-4484-A317-14F985434BBC}.Release|Win32.ActiveCfg = Release|Win32
-               {3DBBFF93-F344-4484-A317-14F985434BBC}.Release|Win32.Build.0 = Release|Win32
                {DFA0D75B-F7EF-4D02-B33F-486829405315}.Debug|Win32.ActiveCfg = Debug|Win32
                {DFA0D75B-F7EF-4D02-B33F-486829405315}.Debug|Win32.Build.0 = Debug|Win32
                {DFA0D75B-F7EF-4D02-B33F-486829405315}.Release|Win32.ActiveCfg = Release|Win32
@@ -965,6 +958,14 @@ Global
                {22F14F8F-67C6-49B1-A730-CE70FFE9EB61}.Debug|Win32.Build.0 = Debug|Win32
                {22F14F8F-67C6-49B1-A730-CE70FFE9EB61}.Release|Win32.ActiveCfg = Release|Win32
                {22F14F8F-67C6-49B1-A730-CE70FFE9EB61}.Release|Win32.Build.0 = Release|Win32
+               {B7A168A0-DFC0-4C6D-B0CC-6079912A4A76}.Debug|Win32.ActiveCfg = Debug|Win32
+               {B7A168A0-DFC0-4C6D-B0CC-6079912A4A76}.Debug|Win32.Build.0 = Debug|Win32
+               {B7A168A0-DFC0-4C6D-B0CC-6079912A4A76}.Release|Win32.ActiveCfg = Release|Win32
+               {B7A168A0-DFC0-4C6D-B0CC-6079912A4A76}.Release|Win32.Build.0 = Release|Win32
+               {8091E9B6-4C08-4218-A63D-742867CCFE9F}.Debug|Win32.ActiveCfg = Debug|Win32
+               {8091E9B6-4C08-4218-A63D-742867CCFE9F}.Debug|Win32.Build.0 = Debug|Win32
+               {8091E9B6-4C08-4218-A63D-742867CCFE9F}.Release|Win32.ActiveCfg = Release|Win32
+               {8091E9B6-4C08-4218-A63D-742867CCFE9F}.Release|Win32.Build.0 = Release|Win32
        EndGlobalSection
        GlobalSection(SolutionProperties) = preSolution
                HideSolutionNode = FALSE
index f7da865..e1a402b 100644 (file)
@@ -1,8 +1,3 @@
 copy modules\core\includes\machine-h.vc modules\core\includes\machine.h
 copy modules\core\includes\version-h.vc modules\core\includes\version.h
-copy modules\scicos\includes\blocks-vc.h modules\scicos\includes\blocks.h
-
-
-rem /* REORGANISATION TEMPORAIRE */ 
-copy routines\machine-h.vc routines\machine.h
-copy routines\version-h.vc routines\version.h
+copy modules\scicos\includes\blocks-vc.h modules\scicos\includes\blocks.h
\ No newline at end of file
index add0ea8..f91705f 100644 (file)
@@ -13,7 +13,7 @@ char *getenv();
 #include <ctype.h>
 #include <stdio.h>
 
-#include "../routines/machine.h"
+#include "../modules/core/includes/machine.h"
 #include "util.h" 
 #define Min(x,y)  (((x)<(y))?(x):(y))
 
index 7492e6e..cea3837 100644 (file)
@@ -13,7 +13,7 @@ char *getenv();
 #include <ctype.h>
 #include <stdio.h>
 
-#include "../routines/machine.h"
+#include "../modules/core/includes/machine.h"
 #include "util.h" 
 
 static int Sed __PARAMS((int,char *,FILE *,char *,char *,char *,char *,char *,char *));
index 32d5148..3777a88 100644 (file)
@@ -34,8 +34,7 @@
 #pragma comment(lib,"../../bin/lapack.lib")
 /*-----------------------------------------------------------------------------------*/ 
 #ifndef USE_F2C
-#pragma comment(lib,"../../libs/interf_f.lib")
-
+#pragma comment(lib,"../../libs/data_structures_f.lib")
 #pragma comment(lib,"../../libs/boolean_f.lib")
 #pragma comment(lib,"../../libs/double_f.lib")
 #pragma comment(lib,"../../libs/integer_f.lib")
index 0bc4c75..3a5ad5f 100644 (file)
@@ -26,7 +26,7 @@ extern void    /* 13  */ C2F(gw_core)();
 extern void    /* 14  */ C2F(gw_user)();
 extern void    /* 15  */ C2F(gw_metanet)();
 extern void    /* 16  */ C2F(gw_polynomials)();
-extern void    /* 17  */ C2F(lstelm)();
+extern void    /* 17  */ C2F(gwdatastructures1)();
 extern void    /* 18  */ C2F(gw_signal)();
 extern void    /* 19  */ C2F(gw_interpolation)();
 extern void    /* 20  */ C2F(gw_cacsd3)();
@@ -57,7 +57,7 @@ extern void    /* 40  */ C2F(gw_tclsci)();
 #define TCLINTERF C2F(no_gw_tclsci)
 #endif
 
-extern void    /* 41  */ C2F(lstelmi)();
+extern void    /* 41  */ C2F(gwdatastructures2)();
 
 #ifdef WITH_PVM
 extern void    /* 42  */ C2F(gw_pvm)();
@@ -100,7 +100,7 @@ static OpTab Interfaces[] ={
        /* 14  */ {C2F(gw_user)},
        /* 15  */ {C2F(gw_metanet)},
        /* 16  */ {C2F(gw_polynomials)},
-       /* 17  */ {C2F(lstelm)},
+       /* 17  */ {C2F(gwdatastructures1)},
        /* 18  */ {C2F(gw_signal)},
        /* 19  */ {C2F(gw_interpolation)},
        /* 20  */ {C2F(gw_cacsd3)},
@@ -124,7 +124,7 @@ static OpTab Interfaces[] ={
     /* 38  */ {C2F(gw_randlib)},
     /* 39  */ {C2F(gw_special_functions2)},
     /* 40  */ {TCLINTERF},
-       /* 41  */ {C2F(lstelmi)},
+       /* 41  */ {C2F(gwdatastructures2)},
        /* 42  */ {PVMINTERF},
     /* 43  */ {C2F(gw_integer)},
     /* 44  */ {C2F(gw_linear_algebra2)},
index 01829ac..d04bf9a 100644 (file)
@@ -13,13 +13,13 @@ c     .  last is (i,j)
          rhs=m
          fin=1
          lhs=1
-         call lstelm
+         call gwdatastructures1
       endif
       if(n.eq.0) return
       rhs=n
       fin=1
       lhs=1
-      call lstelm
+      call gwdatastructures1
       rhs=1
       return
       end
index 88ca461..fedabc9 100644 (file)
@@ -46,7 +46,7 @@ c
 
       lhs=1
 c      call ref2val
-      call lstelm
+      call gwdatastructures1
       rhs=srhs
       lhs=slhs
       fin=sfin
diff --git a/scilab/modules/data_structures/help/eng/definedfields.xml b/scilab/modules/data_structures/help/eng/definedfields.xml
new file mode 100644 (file)
index 0000000..c925a54
--- /dev/null
@@ -0,0 +1,64 @@
+<?xml version="1.0" encoding="ISO-8859-1" standalone="no"?>
+<!DOCTYPE MAN SYSTEM "../../manrev.dtd">
+<MAN>
+  <LANGUAGE>eng</LANGUAGE>
+  <TITLE>definedfields</TITLE>
+  <TYPE>Scilab Function</TYPE>
+  <DATE>2003</DATE>
+  <SHORT_DESCRIPTION name="definedfields"> return index of list's defined fields</SHORT_DESCRIPTION>
+  <CALLING_SEQUENCE>
+    <CALLING_SEQUENCE_ITEM>k=definedfields(l)    </CALLING_SEQUENCE_ITEM>
+  </CALLING_SEQUENCE>
+  <PARAM>
+    <PARAM_INDENT>
+      <PARAM_ITEM>
+        <PARAM_NAME>l</PARAM_NAME>
+        <PARAM_DESCRIPTION>
+          <SP>: a list , tlist or mlist variable.</SP>
+        </PARAM_DESCRIPTION>
+      </PARAM_ITEM>
+      <PARAM_ITEM>
+        <PARAM_NAME>k</PARAM_NAME>
+        <PARAM_DESCRIPTION>
+          <SP>: a vector of index.</SP>
+        </PARAM_DESCRIPTION>
+      </PARAM_ITEM>
+    </PARAM_INDENT>
+  </PARAM>
+  <DESCRIPTION>
+    <P>If <VERB>l</VERB> is a  <VERB>list</VERB>  <VERB>tlist</VERB>
+    <VERB>mlist</VERB>  <VERB>k=definedfields(l)</VERB> returns in
+    <VERB>k</VERB> the indices of the defined list fields. This
+    function is useful because indexing undefined fields produces an
+    error.</P>
+  </DESCRIPTION>
+  <EXAMPLE>
+<![CDATA[
+l=list(1);l(3)=5 
+k=definedfields(l)
+
+t=tlist('x');t(5)=4
+definedfields(t)
+
+m=mlist(['m','a','b']);m.b='sdfgfgd' 
+definedfields(m)  
+ ]]>
+  </EXAMPLE>
+  <SEE_ALSO>
+    <SEE_ALSO_ITEM>
+      <LINK>list</LINK>
+    </SEE_ALSO_ITEM>
+    <SEE_ALSO_ITEM>
+      <LINK>tlist</LINK>
+    </SEE_ALSO_ITEM>
+    <SEE_ALSO_ITEM>
+      <LINK>mlist</LINK>
+    </SEE_ALSO_ITEM>
+    <SEE_ALSO_ITEM>
+      <LINK>insertion</LINK>
+    </SEE_ALSO_ITEM>
+    <SEE_ALSO_ITEM>
+      <LINK>extraction</LINK>
+    </SEE_ALSO_ITEM>
+  </SEE_ALSO>
+</MAN>
diff --git a/scilab/modules/data_structures/help/eng/getfield.xml b/scilab/modules/data_structures/help/eng/getfield.xml
new file mode 100644 (file)
index 0000000..8f05af9
--- /dev/null
@@ -0,0 +1,55 @@
+<?xml version="1.0" encoding="ISO-8859-1" standalone="no"?>
+<!DOCTYPE MAN SYSTEM "../../manrev.dtd">
+<MAN>
+  <LANGUAGE>eng</LANGUAGE>
+  <TITLE>getfield</TITLE>
+  <TYPE>Scilab Function</TYPE>
+  <DATE>September 1999</DATE>
+  <SHORT_DESCRIPTION name="getfield">  list field extraction</SHORT_DESCRIPTION>
+  <CALLING_SEQUENCE>
+    <CALLING_SEQUENCE_ITEM>[x,...]=getfield(i,l)  </CALLING_SEQUENCE_ITEM>
+  </CALLING_SEQUENCE>
+  <PARAM>
+    <PARAM_INDENT>
+      <PARAM_ITEM>
+        <PARAM_NAME>x</PARAM_NAME>
+        <PARAM_DESCRIPTION>
+          <SP>: matrix  of any  possible types</SP>
+        </PARAM_DESCRIPTION>
+      </PARAM_ITEM>
+      <PARAM_ITEM>
+        <PARAM_NAME>l</PARAM_NAME>
+        <PARAM_DESCRIPTION>
+          <SP>: list, tlist or mlist variable</SP>
+        </PARAM_DESCRIPTION>
+      </PARAM_ITEM>
+      <PARAM_ITEM>
+        <PARAM_NAME>i</PARAM_NAME>
+        <PARAM_DESCRIPTION>
+          <SP>: field index, see extraction for more details.</SP>
+        </PARAM_DESCRIPTION>
+      </PARAM_ITEM>
+    </PARAM_INDENT>
+  </PARAM>
+  <DESCRIPTION>
+    <P>
+    This function is an equivalent of <VERB>[x,...]=l(i)</VERB> syntax for field
+    extraction with the only difference that it also applies to
+    <VERB>mlist</VERB> objects.</P>
+  </DESCRIPTION>
+  <EXAMPLE>
+<![CDATA[
+l=list(1,'qwerw',%s)
+[a,b]=getfield([3 2],l)
+
+a=hypermat([2,2,2],rand(1:2^3));// hypermatrices are coded using mlists
+a(1) // the a(1,1,1) entry
+getfield(1,a) // the mlist first field
+ ]]>
+  </EXAMPLE>
+  <SEE_ALSO>
+    <SEE_ALSO_ITEM>
+      <LINK>extraction</LINK>
+    </SEE_ALSO_ITEM>
+  </SEE_ALSO>
+</MAN>
diff --git a/scilab/modules/data_structures/help/eng/list.xml b/scilab/modules/data_structures/help/eng/list.xml
new file mode 100644 (file)
index 0000000..ec66031
--- /dev/null
@@ -0,0 +1,110 @@
+<?xml version="1.0" encoding="ISO-8859-1" standalone="no"?>
+<!DOCTYPE MAN SYSTEM "../../manrev.dtd">
+<MAN>
+       <LANGUAGE>eng</LANGUAGE>
+       <TITLE>list</TITLE>
+       <TYPE>Scilab Function</TYPE>
+       <DATE>April 1993</DATE>
+       <SHORT_DESCRIPTION name="list"> Scilab object and list function definition</SHORT_DESCRIPTION>
+       
+       <CALLING_SEQUENCE>
+               <CALLING_SEQUENCE_ITEM>list(a1,....an)    </CALLING_SEQUENCE_ITEM>
+       </CALLING_SEQUENCE>
+       
+       <DESCRIPTION>
+               <P>
+               Creates a <VERB>list</VERB> with elements <VERB>ai</VERB>'s which are arbitrary Scilab 
+               objects (<VERB>matrix, list,...</VERB>). Type of <VERB>list</VERB> objects is 15.
+               <TT>list()</TT> creates the empty <VERB>list</VERB> (0 element).
+               </P>
+       </DESCRIPTION>
+       
+       <SECTION label="Operations on lists">
+               <ITEMIZE>
+                       <ITEM label="extraction">
+                               <SP>: <TT>[x,y,z...]=L(v)</TT> where <TT>v</TT> is a vector of indices; 
+                               <TT>[x,y,z]=L(:)</TT> extracts all the elements.</SP>
+                       </ITEM>
+                       <ITEM label="insertion at index i">
+                               <SP>:  <TT>L(i)=a</TT> (note that it is not an error to use <TT>L(i)=a</TT>
+                               with <EM>i &gt; 1 + size(L)</EM> but some list entries are then undefined
+                               and their extraction gives raise to an error).</SP>
+                       </ITEM>
+                       <ITEM label="append an element in queue">
+                               <SP>:  <TT>L($+1)=e</TT>.</SP>
+                       </ITEM>
+                       <ITEM label="append an element in head">
+                               <SP>:  <TT>L(0)=e</TT>. (note that after this operation <TT>e</TT> is
+                               at index 1, the initial elements being shifted on the right).</SP>
+                       </ITEM>
+                       <ITEM label="deletion">
+                               <SP>: <TT>L(i)=null()</TT> removes the i-th element of the list <TT>L</TT>.</SP>
+                       </ITEM>
+                       <ITEM label="concatenation of two lists">
+                               <SP>: <TT>L3 = lstcat(L1,L2)</TT>.</SP>
+                       </ITEM>
+                       <ITEM label="number of elements of a list">
+                               <SP>:  you can use either <TT>nb_elm = size(L)</TT> 
+                               or <TT>nb_elm = length(L)</TT>.</SP>
+                       </ITEM>
+                       <ITEM label="iterations with a list">
+                               <SP>:  it is possible to use a list <TT>L</TT> with a <LINK>for</LINK> loop: 
+                               <TT>for e=L,...,end</TT> is a loop with <TT>length(L)</TT> 
+                               iterations, the loop variable <TT>e</TT> being equal to <TT>L(i)</TT>
+                               at the i th iteration.</SP>
+                       </ITEM>
+               </ITEMIZE>
+       </SECTION>
+       
+       <SECTION label="Remarks">
+               <P>Scilab provides also other kinds of list, the <LINK>tlist</LINK> type (typed list) and
+                       the <LINK>mlist</LINK> type which are useful to define a new data type with operator 
+                       <LINK>overloading</LINK> facilities (<LINK>hypermatrices</LINK> which are 
+                       multi-dimensionnal arrays in scilab are in fact <EM>mlist</EM>).
+               </P>
+               <P>Matlab <EM>struct</EM> are also available.</P>
+       </SECTION>
+       
+       <EXAMPLE><![CDATA[
+l = list(1,["a" "b"])
+l(0) = "foo"
+l($+1) = "hello"
+l(2) = "toto"
+l(3) = rand(1,2)
+l(3) = null()
+lbis = list("gewurtz", "caipirina" ,"debug")
+lter = lstcat(l,lbis)
+size(lter) - size(lbis) - size(l)  // must be zero
+]]></EXAMPLE>
+       
+       <SEE_ALSO>
+               
+               <SEE_ALSO_ITEM>
+                       <LINK>null</LINK>
+               </SEE_ALSO_ITEM>
+               
+               <SEE_ALSO_ITEM>
+                       <LINK>lstcat</LINK>
+               </SEE_ALSO_ITEM>
+               
+               <SEE_ALSO_ITEM>
+                       <LINK>tlist</LINK>
+               </SEE_ALSO_ITEM>
+               
+               <SEE_ALSO_ITEM>
+                       <LINK>insertion</LINK>
+               </SEE_ALSO_ITEM>
+               
+               <SEE_ALSO_ITEM>
+                       <LINK>extraction</LINK>
+               </SEE_ALSO_ITEM>
+               
+               <SEE_ALSO_ITEM>
+                       <LINK>size</LINK>
+               </SEE_ALSO_ITEM>
+               
+               <SEE_ALSO_ITEM>
+                       <LINK>length</LINK>
+               </SEE_ALSO_ITEM>
+       </SEE_ALSO>
+</MAN>
diff --git a/scilab/modules/data_structures/help/eng/lsslist.xml b/scilab/modules/data_structures/help/eng/lsslist.xml
new file mode 100644 (file)
index 0000000..eff692d
--- /dev/null
@@ -0,0 +1,29 @@
+<?xml version="1.0" encoding="ISO-8859-1" standalone="no"?>
+<!DOCTYPE MAN SYSTEM "../../manrev.dtd">
+<MAN>
+  <LANGUAGE>eng</LANGUAGE>
+  <TITLE>lsslist</TITLE>
+  <TYPE>Scilab Function</TYPE>
+  <DATE>Jan 1997</DATE>
+  <SHORT_DESCRIPTION name="lsslist"> Scilab linear state space function definition</SHORT_DESCRIPTION>
+  <CALLING_SEQUENCE>
+    <CALLING_SEQUENCE_ITEM>lsslist()  </CALLING_SEQUENCE_ITEM>
+    <CALLING_SEQUENCE_ITEM>lsslist(a1,....an)    </CALLING_SEQUENCE_ITEM>
+  </CALLING_SEQUENCE>
+  <DESCRIPTION>
+    <P><VERB>lsslist(a1,....an)</VERB> is a shortcut to
+    <VERB>tlist(['lss','A';'B';'C';'X0','dt'], a1,....an)</VERB></P>
+    <P>
+    Creates a <VERB>tlist</VERB> with  <VERB>['lss','A';'B';'C';'X0','dt']</VERB> as
+    first entry and  <VERB>ai</VERB>'s as next entries if any. No type nor size
+    checking is done on <VERB>ai</VERB>'s.</P>
+  </DESCRIPTION>
+  <SEE_ALSO>
+    <SEE_ALSO_ITEM>
+      <LINK>tlist</LINK>
+    </SEE_ALSO_ITEM>
+    <SEE_ALSO_ITEM>
+      <LINK>syslin</LINK>
+    </SEE_ALSO_ITEM>
+  </SEE_ALSO>
+</MAN>
diff --git a/scilab/modules/data_structures/help/eng/lstcat.xml b/scilab/modules/data_structures/help/eng/lstcat.xml
new file mode 100644 (file)
index 0000000..8ef1abf
--- /dev/null
@@ -0,0 +1,44 @@
+<?xml version="1.0" encoding="ISO-8859-1" standalone="no"?>
+<!DOCTYPE MAN SYSTEM "../../manrev.dtd">
+<MAN>
+  <LANGUAGE>eng</LANGUAGE>
+  <TITLE>lstcat</TITLE>
+  <TYPE>Scilab Function</TYPE>
+  <DATE>Jan 1997</DATE>
+  <SHORT_DESCRIPTION name="lstcat"> list concatenation</SHORT_DESCRIPTION>
+  <CALLING_SEQUENCE>
+    <CALLING_SEQUENCE_ITEM>lc=lstcat(l1,..ln)  </CALLING_SEQUENCE_ITEM>
+  </CALLING_SEQUENCE>
+  <PARAM>
+    <PARAM_INDENT>
+      <PARAM_ITEM>
+        <PARAM_NAME>li</PARAM_NAME>
+        <PARAM_DESCRIPTION>
+          <SP>: list or any other type of variable</SP>
+        </PARAM_DESCRIPTION>
+      </PARAM_ITEM>
+      <PARAM_ITEM>
+        <PARAM_NAME>lc</PARAM_NAME>
+        <PARAM_DESCRIPTION>
+          <SP>: a list</SP>
+        </PARAM_DESCRIPTION>
+      </PARAM_ITEM>
+    </PARAM_INDENT>
+  </PARAM>
+  <DESCRIPTION>
+    <P><VERB>lc=lstcat(l1,..ln)</VERB> catenates components of <VERB>li</VERB> lists in a
+    single list. If the <VERB>li</VERB> are other type of variables they are simply
+    added to the resulting list.</P>
+  </DESCRIPTION>
+  <EXAMPLE>
+<![CDATA[
+lstcat(list(1,2,3),33,list('foo',%s))
+lstcat(1,2,3)
+ ]]>
+  </EXAMPLE>
+  <SEE_ALSO>
+    <SEE_ALSO_ITEM>
+      <LINK>list</LINK>
+    </SEE_ALSO_ITEM>
+  </SEE_ALSO>
+</MAN>
diff --git a/scilab/modules/data_structures/help/eng/mlist.xml b/scilab/modules/data_structures/help/eng/mlist.xml
new file mode 100644 (file)
index 0000000..faf4336
--- /dev/null
@@ -0,0 +1,107 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE MAN SYSTEM "../../manrev.dtd">
+<MAN>
+  <LANGUAGE>eng</LANGUAGE>
+
+  <TITLE>mlist</TITLE>
+
+  <TYPE>Scilab Function</TYPE>
+
+  <DATE>September 1995</DATE>
+
+  <SHORT_DESCRIPTION name="mlist">Scilab object, matrix oriented typed list
+  definition.</SHORT_DESCRIPTION>
+
+  <CALLING_SEQUENCE>
+    <CALLING_SEQUENCE_ITEM>mlist(typ,a1,....an )</CALLING_SEQUENCE_ITEM>
+  </CALLING_SEQUENCE>
+
+  <PARAM>
+    <PARAM_INDENT>
+      <PARAM_ITEM>
+        <PARAM_NAME>typ</PARAM_NAME>
+
+        <PARAM_DESCRIPTION>
+          <SP>: vector of character strings</SP>
+        </PARAM_DESCRIPTION>
+      </PARAM_ITEM>
+
+      <PARAM_ITEM>
+        <PARAM_NAME>ai</PARAM_NAME>
+
+        <PARAM_DESCRIPTION>
+          <SP>: any Scilab object (<VERB>matrix, list,string...</VERB>).</SP>
+        </PARAM_DESCRIPTION>
+      </PARAM_ITEM>
+    </PARAM_INDENT>
+  </PARAM>
+
+  <DESCRIPTION>
+    <P>mlist object are very similar to tlist objects. But if <VERB>M</VERB>
+    is an mlist, for any index <VERB>i</VERB> which is not a field name,
+    <VERB>M(i)</VERB> is not the <VERB>i</VERB>th field of the list but is
+    interpreted as the <VERB>i</VERB> th entry of <VERB>M</VERB> seen as a
+    vector. This is the only difference between <VERB>mlist</VERB> and
+    <VERB>tlist</VERB>.</P>
+
+    <P>mlist fields must then be designed by their names. They can also be
+    handled using the <VERB>getfield</VERB> and <VERB>setfield</VERB>
+    functions.</P>
+  </DESCRIPTION>
+
+  <EXAMPLE><![CDATA[
+
+M=mlist(['V','name','value'],['a','b','c'],[1 2 3]);
+//define display
+deff('%V_p(M)','disp(M.name+'':''+string(M.value))')
+//define extraction operation
+deff('r=%V_e(i,M)',..
+'r=mlist([''V'',''name'',''value''],M.name(i),M.value(i))')
+M(2) // the second entry of the vector M
+M.value 
+
+//define M as a tlist
+M=tlist(['V','name','value'],['a','b','c'],[1 2 3]);
+M(2)
+
+M('name')
+
+//with two  indices
+M=mlist(['V','name','value'],['a','b';'c' 'd'],[1 2;3 4]);
+deff('r=%V_e(varargin)',[
+    'M=varargin($)';
+    'H=[''V'',''name'',''value'']'
+    'r=mlist(H,M.name(varargin(1:$-1)),M.value(varargin(1:$-1)))'])
+
+M(:,2)
+// multidimensionnal array
+str=['a','b','c','d','e','f','g','h'];
+n=hypermat([2,2,2],str);
+v=hypermat([2,2,2],1:8);
+M=mlist(['V','name','value'],n,v);
+M(1,1:2,2)
+  ]]></EXAMPLE>
+
+  <SEE_ALSO>
+    <SEE_ALSO_ITEM>
+      <LINK>tlist</LINK>
+    </SEE_ALSO_ITEM>
+
+    <SEE_ALSO_ITEM>
+      <LINK>list</LINK>
+    </SEE_ALSO_ITEM>
+
+    <SEE_ALSO_ITEM>
+      <LINK>overloading</LINK>
+    </SEE_ALSO_ITEM>
+
+    <SEE_ALSO_ITEM>
+      <LINK>getfield</LINK>
+    </SEE_ALSO_ITEM>
+
+    <SEE_ALSO_ITEM>
+      <LINK>setfield</LINK>
+    </SEE_ALSO_ITEM>
+  </SEE_ALSO>
+</MAN>
\ No newline at end of file
diff --git a/scilab/modules/data_structures/help/eng/rlist.xml b/scilab/modules/data_structures/help/eng/rlist.xml
new file mode 100644 (file)
index 0000000..2c3ec04
--- /dev/null
@@ -0,0 +1,29 @@
+<?xml version="1.0" encoding="ISO-8859-1" standalone="no"?>
+<!DOCTYPE MAN SYSTEM "../../manrev.dtd">
+<MAN>
+  <LANGUAGE>eng</LANGUAGE>
+  <TITLE>rlist</TITLE>
+  <TYPE>Scilab Function</TYPE>
+  <DATE>Jan 1997</DATE>
+  <SHORT_DESCRIPTION name="rlist"> Scilab rational fraction function definition</SHORT_DESCRIPTION>
+  <CALLING_SEQUENCE>
+    <CALLING_SEQUENCE_ITEM>rlist()  </CALLING_SEQUENCE_ITEM>
+    <CALLING_SEQUENCE_ITEM>rlist(a1,....an)    </CALLING_SEQUENCE_ITEM>
+  </CALLING_SEQUENCE>
+  <DESCRIPTION>
+    <P><VERB>rlist(a1,....an)</VERB> is a shortcut  to
+    <VERB>tlist(['r','num';'den','dt'], a1,....an)</VERB></P>
+    <P>
+    Creates a <VERB>tlist</VERB> with  <VERB>['r','num';'den','dt']</VERB> as
+    first entry and  <VERB>ai</VERB>'s as next entries if any. No type nor size
+    checking is done on <VERB>ai</VERB>'s.</P>
+  </DESCRIPTION>
+  <SEE_ALSO>
+    <SEE_ALSO_ITEM>
+      <LINK>tlist</LINK>
+    </SEE_ALSO_ITEM>
+    <SEE_ALSO_ITEM>
+      <LINK>syslin</LINK>
+    </SEE_ALSO_ITEM>
+  </SEE_ALSO>
+</MAN>
diff --git a/scilab/modules/data_structures/help/eng/setfield.xml b/scilab/modules/data_structures/help/eng/setfield.xml
new file mode 100644 (file)
index 0000000..13a4f13
--- /dev/null
@@ -0,0 +1,57 @@
+<?xml version="1.0" encoding="ISO-8859-1" standalone="no"?>
+<!DOCTYPE MAN SYSTEM "../../manrev.dtd">
+<MAN>
+  <LANGUAGE>eng</LANGUAGE>
+  <TITLE>setfield</TITLE>
+  <TYPE>Scilab Function</TYPE>
+  <DATE>September 1999</DATE>
+  <SHORT_DESCRIPTION name="setfield">  list field insertion</SHORT_DESCRIPTION>
+  <CALLING_SEQUENCE>
+    <CALLING_SEQUENCE_ITEM>setfield(i,x,l)  </CALLING_SEQUENCE_ITEM>
+  </CALLING_SEQUENCE>
+  <PARAM>
+    <PARAM_INDENT>
+      <PARAM_ITEM>
+        <PARAM_NAME>x</PARAM_NAME>
+        <PARAM_DESCRIPTION>
+          <SP>: matrix  of any  possible types</SP>
+        </PARAM_DESCRIPTION>
+      </PARAM_ITEM>
+      <PARAM_ITEM>
+        <PARAM_NAME>l</PARAM_NAME>
+        <PARAM_DESCRIPTION>
+          <SP>: list, tlist or mlist variable</SP>
+        </PARAM_DESCRIPTION>
+      </PARAM_ITEM>
+      <PARAM_ITEM>
+        <PARAM_NAME>i</PARAM_NAME>
+        <PARAM_DESCRIPTION>
+          <SP>: field index, see insertion for more details.</SP>
+        </PARAM_DESCRIPTION>
+      </PARAM_ITEM>
+    </PARAM_INDENT>
+  </PARAM>
+  <DESCRIPTION>
+    <P>
+    This function is an equivalent of <VERB>l(i)=x</VERB> syntax for field
+    extraction with the only difference that it also applies to
+    <VERB>mlist</VERB> objects.</P>
+  </DESCRIPTION>
+  <EXAMPLE>
+<![CDATA[
+l=list(1,'qwerw',%s)
+l(1)='Changed'
+l(0)='Added'
+l(6)=['one more';'added']
+//
+
+a=hypermat([2,2,2],rand(1:2^3));// hypermatrices are coded using mlists
+setfield(3,1:8,a);a // set the field value to 1:8
+ ]]>
+  </EXAMPLE>
+  <SEE_ALSO>
+    <SEE_ALSO_ITEM>
+      <LINK>insertion</LINK>
+    </SEE_ALSO_ITEM>
+  </SEE_ALSO>
+</MAN>
diff --git a/scilab/modules/data_structures/help/eng/tlist.xml b/scilab/modules/data_structures/help/eng/tlist.xml
new file mode 100644 (file)
index 0000000..88a0f07
--- /dev/null
@@ -0,0 +1,87 @@
+<?xml version="1.0" encoding="ISO-8859-1" standalone="no"?>
+<!DOCTYPE MAN SYSTEM "../../manrev.dtd">
+<MAN>
+  <LANGUAGE>eng</LANGUAGE>
+  <TITLE>tlist</TITLE>
+  <TYPE>Scilab Function</TYPE>
+  <DATE>September 1995</DATE>
+  <SHORT_DESCRIPTION name="tlist"> Scilab object and typed list definition.  </SHORT_DESCRIPTION>
+  <CALLING_SEQUENCE>
+    <CALLING_SEQUENCE_ITEM>tlist(typ,a1,....an )    </CALLING_SEQUENCE_ITEM>
+  </CALLING_SEQUENCE>
+  <PARAM>
+    <PARAM_INDENT>
+      <PARAM_ITEM>
+        <PARAM_NAME>typ</PARAM_NAME>
+        <PARAM_DESCRIPTION>
+          <SP>: Character string or vector of character strings</SP>
+        </PARAM_DESCRIPTION>
+      </PARAM_ITEM>
+      <PARAM_ITEM>
+        <PARAM_NAME>ai</PARAM_NAME>
+        <PARAM_DESCRIPTION>
+          <SP>: Any Scilab object (<VERB>matrix, list,string...</VERB>).</SP>
+        </PARAM_DESCRIPTION>
+      </PARAM_ITEM>
+    </PARAM_INDENT>
+  </PARAM>
+  <DESCRIPTION>
+    <P>
+    Creates a <VERB>typed-list</VERB> with elements <VERB>ai</VERB>'s. The <VERB>typ</VERB>
+    argument specifies the list type. Such <VERB>typed-list</VERB> allow the user
+    to define new operations working on these object through scilab
+    functions. The only difference between <VERB>typed-list</VERB> and <VERB>list</VERB>
+    is the value of the type (16 instead of 15).</P>
+    <P><VERB>typ(1)</VERB> specifies the list type (character string used to define
+    soft coded operations)</P>
+    <P>
+    if specified <VERB>typ(i)</VERB> may give the <VERB>i+1</VERB>th element formal name</P>
+    <P>
+    Standard Operations on <VERB>list</VERB> work similarly for <VERB>typed-list</VERB>:</P>
+    <P>
+     extraction 
+    : <VERB>[x,y,z...]=l(v)</VERB> where <VERB>v</VERB> is a vector of indices; 
+    <VERB>[x,y,z]=l(:)</VERB> extracts all the elements.</P>
+    <P>
+      insertion
+    : <VERB>l(i)=a</VERB></P>
+    <P>
+     deletion
+    : <VERB>l(i)=null()</VERB> removes the i-th element of the <VERB>tlist l</VERB>.</P>
+    <P>
+     display</P>
+    <P>
+    Moreover if <VERB>typ(2:n+1)</VERB> are specified, user may point elements by
+    their names</P>
+    <P>
+    We give below examples where tlist are used.</P>
+    <P>
+    Linear systems are represented by specific <VERB>typed-list</VERB> e.g. a
+    linear system <VERB>[A,B,C,D]</VERB> is represented by the tlist
+    <VERB>Sys=tlist(['lss';'A';'B';'C';'D';'X0';'dt'],A,B,C,D,x0,'c')</VERB> 
+    and this specific list may be created by the function <VERB>syslin</VERB>.</P>
+    <P>
+    Sys(2), Sys('A') or Sys.A is the state-matrix and Sys('dt') or Sys.dt is the time domain</P>
+    <P>
+    A rational matrix <VERB>H</VERB> is represented by the <VERB>typed-list</VERB>
+    <VERB>H=tlist(['r';'num';'den';'dt'],Num,Den,[])</VERB> where <VERB>Num</VERB> and <VERB>Den</VERB> are two
+    polynomial matrices and a  (e.g. continuous time) linear system with
+    transfer matrix <VERB>H</VERB> maybe created by <VERB>syslin('c',H)</VERB>.</P>
+    <P>
+    H(2), H('num') or H.num is the transfer matrix numerator</P>
+  </DESCRIPTION>
+  <SEE_ALSO>
+    <SEE_ALSO_ITEM>
+      <LINK>null</LINK>
+    </SEE_ALSO_ITEM>
+    <SEE_ALSO_ITEM>
+      <LINK>percent</LINK>
+    </SEE_ALSO_ITEM>
+    <SEE_ALSO_ITEM>
+      <LINK>syslin</LINK>
+    </SEE_ALSO_ITEM>
+    <SEE_ALSO_ITEM>
+      <LINK>list</LINK>
+    </SEE_ALSO_ITEM>
+  </SEE_ALSO>
+</MAN>
diff --git a/scilab/modules/data_structures/help/fr/definedfields.xml b/scilab/modules/data_structures/help/fr/definedfields.xml
new file mode 100644 (file)
index 0000000..c925a54
--- /dev/null
@@ -0,0 +1,64 @@
+<?xml version="1.0" encoding="ISO-8859-1" standalone="no"?>
+<!DOCTYPE MAN SYSTEM "../../manrev.dtd">
+<MAN>
+  <LANGUAGE>eng</LANGUAGE>
+  <TITLE>definedfields</TITLE>
+  <TYPE>Scilab Function</TYPE>
+  <DATE>2003</DATE>
+  <SHORT_DESCRIPTION name="definedfields"> return index of list's defined fields</SHORT_DESCRIPTION>
+  <CALLING_SEQUENCE>
+    <CALLING_SEQUENCE_ITEM>k=definedfields(l)    </CALLING_SEQUENCE_ITEM>
+  </CALLING_SEQUENCE>
+  <PARAM>
+    <PARAM_INDENT>
+      <PARAM_ITEM>
+        <PARAM_NAME>l</PARAM_NAME>
+        <PARAM_DESCRIPTION>
+          <SP>: a list , tlist or mlist variable.</SP>
+        </PARAM_DESCRIPTION>
+      </PARAM_ITEM>
+      <PARAM_ITEM>
+        <PARAM_NAME>k</PARAM_NAME>
+        <PARAM_DESCRIPTION>
+          <SP>: a vector of index.</SP>
+        </PARAM_DESCRIPTION>
+      </PARAM_ITEM>
+    </PARAM_INDENT>
+  </PARAM>
+  <DESCRIPTION>
+    <P>If <VERB>l</VERB> is a  <VERB>list</VERB>  <VERB>tlist</VERB>
+    <VERB>mlist</VERB>  <VERB>k=definedfields(l)</VERB> returns in
+    <VERB>k</VERB> the indices of the defined list fields. This
+    function is useful because indexing undefined fields produces an
+    error.</P>
+  </DESCRIPTION>
+  <EXAMPLE>
+<![CDATA[
+l=list(1);l(3)=5 
+k=definedfields(l)
+
+t=tlist('x');t(5)=4
+definedfields(t)
+
+m=mlist(['m','a','b']);m.b='sdfgfgd' 
+definedfields(m)  
+ ]]>
+  </EXAMPLE>
+  <SEE_ALSO>
+    <SEE_ALSO_ITEM>
+      <LINK>list</LINK>
+    </SEE_ALSO_ITEM>
+    <SEE_ALSO_ITEM>
+      <LINK>tlist</LINK>
+    </SEE_ALSO_ITEM>
+    <SEE_ALSO_ITEM>
+      <LINK>mlist</LINK>
+    </SEE_ALSO_ITEM>
+    <SEE_ALSO_ITEM>
+      <LINK>insertion</LINK>
+    </SEE_ALSO_ITEM>
+    <SEE_ALSO_ITEM>
+      <LINK>extraction</LINK>
+    </SEE_ALSO_ITEM>
+  </SEE_ALSO>
+</MAN>
diff --git a/scilab/modules/data_structures/help/fr/getfield.xml b/scilab/modules/data_structures/help/fr/getfield.xml
new file mode 100644 (file)
index 0000000..62dce91
--- /dev/null
@@ -0,0 +1,56 @@
+<?xml version="1.0" encoding="ISO-8859-1" standalone="no"?> 
+<!DOCTYPE MAN SYSTEM "../../manrev.dtd">
+<MAN>
+  <LANGUAGE>fr</LANGUAGE>
+  <TITLE>getfield  </TITLE>
+  <TYPE>Scilab Function  </TYPE>
+  <DATE>September 1999  </DATE>
+  <SHORT_DESCRIPTION name="getfield">  extraction d&apos;un champ d&apos;une liste  </SHORT_DESCRIPTION>
+  <CALLING_SEQUENCE>
+  <CALLING_SEQUENCE_ITEM>[x,...]=getfield(i,l)  </CALLING_SEQUENCE_ITEM>
+  </CALLING_SEQUENCE>
+  <PARAM>
+ <PARAM_INDENT>
+  <PARAM_ITEM>
+  <PARAM_NAME>x  </PARAM_NAME>
+  <PARAM_DESCRIPTION>
+  <SP>
+    : matrice de tout type
+</SP>
+  </PARAM_DESCRIPTION> 
+  </PARAM_ITEM>
+  <PARAM_ITEM>
+  <PARAM_NAME>l  </PARAM_NAME>
+  <PARAM_DESCRIPTION>
+  <SP>
+    : variable de type list, tlist ou mlist
+</SP>
+  </PARAM_DESCRIPTION> 
+  </PARAM_ITEM>
+  <PARAM_ITEM>
+  <PARAM_NAME>i  </PARAM_NAME>
+  <PARAM_DESCRIPTION>
+  <SP>
+    : indice du champ, voir <VERB>extraction</VERB> pour plus de détails
+</SP>
+  </PARAM_DESCRIPTION> 
+  </PARAM_ITEM>
+ </PARAM_INDENT>
+  </PARAM>
+  <DESCRIPTION>
+  <P>
+    Cette fonction est un équivalent de la syntaxe <VERB>[x,...]=l(i)</VERB> pour l&apos;extraction de champs avec la seule différence qu&apos;elle s&apos;applique aussi aux objets de type <VERB>mlist</VERB>.
+  </P>
+  </DESCRIPTION>
+  <EXAMPLE><![CDATA[
+l=list(1,'qwerw',%s)
+[a,b]=getfield([3 2],l)
+
+a=hypermat([2,2,2],rand(1:2^3));// les hypermatrices sont stockées dans des mlist
+a(1) // le terme a(1,1,1)
+getfield(1,a) // le premier champ de la mlist
+ ]]></EXAMPLE>
+  <SEE_ALSO>
+    <SEE_ALSO_ITEM> <LINK>extraction</LINK> </SEE_ALSO_ITEM>
+  </SEE_ALSO>
+</MAN>
diff --git a/scilab/modules/data_structures/help/fr/list.xml b/scilab/modules/data_structures/help/fr/list.xml
new file mode 100644 (file)
index 0000000..0d6911c
--- /dev/null
@@ -0,0 +1,122 @@
+<?xml version="1.0" encoding="ISO-8859-1" standalone="no"?> 
+<!DOCTYPE MAN SYSTEM "../../manrev.dtd">
+<MAN>
+       
+       <LANGUAGE>fr</LANGUAGE>
+       <TITLE>list  </TITLE>
+       <TYPE>Scilab Function  </TYPE>
+       <DATE>April 1993  </DATE>
+       <SHORT_DESCRIPTION name="list"> Objet Scilab, Définition d&apos;une liste  </SHORT_DESCRIPTION>
+       
+       <CALLING_SEQUENCE>
+               <CALLING_SEQUENCE_ITEM>list(a1,....an)    </CALLING_SEQUENCE_ITEM>
+       </CALLING_SEQUENCE>
+       
+       <DESCRIPTION>
+               <P>
+               Crée une <VERB>liste</VERB> avec les éléments <VERB>ai</VERB> 
+               qui sont des objets Scilab arbitraires (<VERB>matrice, 
+               liste, ...</VERB>). Le numéro de type des objets <EM>liste</EM> 
+               (renvoyé par la fonction <VERB>type</VERB>) est 15.
+               </P>
+               <P>
+                       <VERB>list()</VERB> crée une liste vide (0 élément).
+               </P>
+       </DESCRIPTION>
+       
+       <SECTION label="Operations sur les listes">
+               <ITEMIZE>
+                       <ITEM label="extraction">
+                               <SP>: <TT>[x,y,z...]=L(v)</TT> où <TT>v</TT> est un vecteur d'indices; 
+                               <TT>[x,y,z]=L(:)</TT>  extrait tous les éléments.</SP>
+                       </ITEM>
+                       <ITEM label="insertion en position i">
+                               <SP>:  <TT>L(i)=a</TT> . Remarque : l'opération <TT>L(i)=a</TT>
+                               avec <EM>i &gt; 1 + size(L)</EM> ne génère pas d'erreur les
+                               entrées en position  <EM>1 + size(L), ..., i-1</EM> étant
+                               alors <EM>indéfinies</EM>. Par contre l'extraction d'un élément
+                               <EM>indéfini</EM> en génère une.</SP>
+                       </ITEM>
+                       <ITEM label="ajouter un élément en queue de liste">
+                               <SP>:  <TT>L($+1)=e</TT>.</SP>
+                       </ITEM>
+                       <ITEM label="ajouter un élément en tête de liste">
+                               <SP>:  <TT>L(0)=e</TT>. (remarque : après cette opération <TT>e</TT> est
+                               en position 1, la position des éléments initiaux de la liste étant 
+                               décalée vers la droite).</SP>
+                       </ITEM>
+                       <ITEM label="suppression">
+                               <SP>: <TT>L(i)=null()</TT> supprime l'élément en position i de la liste <TT>L</TT>.</SP>
+                       </ITEM>
+                       <ITEM label="concaténation de deux listes">
+                               <SP>: <TT>L3 = lstcat(L1,L2)</TT>.</SP>
+                       </ITEM>
+                       <ITEM label="nombre d'éléments d'une liste">
+                               <SP>:  vous pouvez utiliser <TT>nb_elm = size(L)</TT> 
+                               ou encore <TT>nb_elm = length(L)</TT>.</SP>
+                       </ITEM>
+                       <ITEM label="itérer avec une liste">
+                               <SP>:  il est possible d'utiliser une liste <TT>L</TT> pour piloter une boucle <LINK>for</LINK> : 
+                               <TT>for e=L,...,end</TT> est une boucle avec <TT>length(L)</TT> 
+                               itérations, la variable <TT>e</TT> de la boucle prenant la valeur <TT>L(i)</TT>
+                               à l'itération i.</SP>
+                       </ITEM>
+               </ITEMIZE>
+       </SECTION>
+       
+       <SECTION label="Remarques">
+               <P>Scilab propose deux autres sortes de liste, les <LINK>tlist</LINK> (pour listes typées)
+                       et les <LINK>mlist</LINK> qui sont très utiles pour définir de nouveaux types de 
+                       données avec possibilité de surcharge des opérateurs classiques (voir <LINK>overloading</LINK>).
+                       Les tableaux multidimensionnels de scilab (les <LINK>hypermatrices</LINK>) sont en fait
+                       codés comme des <EM>mlist</EM>.
+               </P>
+               <P>Les structures Matlab (<EM>struct</EM>) sont aussi utilisables.</P>
+       </SECTION>
+       
+       <EXAMPLE><![CDATA[
+l = list(1,["a" "b"])
+l(0) = "foo"
+l($+1) = "hello"
+l(2) = "toto"
+l(3) = rand(1,2)
+l(3) = null()
+lbis = list("gewurtz", "caipirina" ,"debug")
+lter = lstcat(l,lbis)
+size(lter) - size(lbis) - size(l)  // doit être nul
+]]></EXAMPLE>
+       
+       <SEE_ALSO>
+       
+               <SEE_ALSO_ITEM>
+                       <LINK>null</LINK>
+               </SEE_ALSO_ITEM>
+               
+               <SEE_ALSO_ITEM>
+                       <LINK>lstcat</LINK>
+               </SEE_ALSO_ITEM>
+               
+               <SEE_ALSO_ITEM>
+                       <LINK>tlist</LINK>
+               </SEE_ALSO_ITEM>
+               
+               <SEE_ALSO_ITEM>
+                       <LINK>insertion</LINK>
+               </SEE_ALSO_ITEM>
+               
+               <SEE_ALSO_ITEM>
+                       <LINK>extraction</LINK>
+               </SEE_ALSO_ITEM>
+               
+               <SEE_ALSO_ITEM>
+                       <LINK>size</LINK>
+               </SEE_ALSO_ITEM>
+               
+               <SEE_ALSO_ITEM>
+                       <LINK>length</LINK>
+               </SEE_ALSO_ITEM>
+               
+       </SEE_ALSO>
+       
+</MAN>
+
diff --git a/scilab/modules/data_structures/help/fr/lsslist.xml b/scilab/modules/data_structures/help/fr/lsslist.xml
new file mode 100644 (file)
index 0000000..331fe75
--- /dev/null
@@ -0,0 +1,27 @@
+<?xml version="1.0" encoding="ISO-8859-1" standalone="no"?> 
+<!DOCTYPE MAN SYSTEM "../../manrev.dtd">
+<MAN>
+  <LANGUAGE>fr</LANGUAGE>
+  <TITLE>lsslist  </TITLE>
+  <TYPE>Scilab Function  </TYPE>
+  <DATE>Jan 1997  </DATE>
+  <SHORT_DESCRIPTION name="lsslist"> Définition d&apos;un système dynamique linéaire  </SHORT_DESCRIPTION>
+  <CALLING_SEQUENCE>
+  <CALLING_SEQUENCE_ITEM>lsslist()  </CALLING_SEQUENCE_ITEM>
+  <CALLING_SEQUENCE_ITEM>lsslist(a1,....an)    </CALLING_SEQUENCE_ITEM>
+  </CALLING_SEQUENCE>
+  <DESCRIPTION>
+  <P>
+    <VERB>lsslist(a1,....an)</VERB> est équivalent à la commande
+    <VERB>tlist([&apos;lss&apos;,&apos;A&apos;;&apos;B&apos;;&apos;C&apos;;&apos;X0&apos;,&apos;dt&apos;], a1,....an)</VERB> 
+  </P>
+  <P>
+    Crée une <VERB>tlist</VERB> avec <VERB>[&apos;lss&apos;,&apos;A&apos;;&apos;B&apos;;&apos;C&apos;;&apos;X0&apos;,&apos;dt&apos;]</VERB> pour le premier champ et les <VERB>ai</VERB> pour les termes suivants, s&apos;ils sont spécifiés. Aucune vérification de taille ou de type n&apos;est faite sur les <VERB>ai</VERB>.
+  </P>
+  <P>
+  </P>
+  </DESCRIPTION>
+  <SEE_ALSO>
+    <SEE_ALSO_ITEM> <LINK>tlist</LINK> </SEE_ALSO_ITEM>     <SEE_ALSO_ITEM> <LINK>syslin</LINK> </SEE_ALSO_ITEM>
+  </SEE_ALSO>
+</MAN>
diff --git a/scilab/modules/data_structures/help/fr/lstcat.xml b/scilab/modules/data_structures/help/fr/lstcat.xml
new file mode 100644 (file)
index 0000000..747f245
--- /dev/null
@@ -0,0 +1,44 @@
+<?xml version="1.0" encoding="ISO-8859-1" standalone="no"?> 
+<!DOCTYPE MAN SYSTEM "../../manrev.dtd">
+<MAN>
+  <LANGUAGE>fr</LANGUAGE>
+  <TITLE>lstcat  </TITLE>
+  <TYPE>Scilab Function  </TYPE>
+  <DATE>Jan 1997  </DATE>
+  <SHORT_DESCRIPTION name="lstcat"> concaténation de listes  </SHORT_DESCRIPTION>
+  <CALLING_SEQUENCE>
+  <CALLING_SEQUENCE_ITEM>lc=lstcat(l1,..ln)  </CALLING_SEQUENCE_ITEM>
+  </CALLING_SEQUENCE>
+  <PARAM>
+ <PARAM_INDENT>
+  <PARAM_ITEM>
+  <PARAM_NAME>li  </PARAM_NAME>
+  <PARAM_DESCRIPTION>
+  <SP>
+    : une liste ou une variable de type indifférent
+</SP>
+  </PARAM_DESCRIPTION> 
+  </PARAM_ITEM>
+  <PARAM_ITEM>
+  <PARAM_NAME>lc  </PARAM_NAME>
+  <PARAM_DESCRIPTION>
+  <SP>
+    : une liste
+</SP>
+  </PARAM_DESCRIPTION> 
+  </PARAM_ITEM>
+ </PARAM_INDENT>
+  </PARAM>
+  <DESCRIPTION>
+  <P>
+    <VERB>lc=lstcat(l1,..ln)</VERB> concatène les composantes des listes <VERB>li</VERB> sous forme d&apos;une liste unique. Si les <VERB>li</VERB> sont des variables d&apos;un autre type elles sont tout simplement ajoutées comme termes supplémentaires dans la liste.
+  </P>
+  </DESCRIPTION>
+  <EXAMPLE><![CDATA[
+lstcat(list(1,2,3),33,list('foo',%s))
+lstcat(1,2,3)
+ ]]></EXAMPLE>
+  <SEE_ALSO>
+    <SEE_ALSO_ITEM> <LINK>list</LINK> </SEE_ALSO_ITEM>
+  </SEE_ALSO>
+</MAN>
diff --git a/scilab/modules/data_structures/help/fr/mlist.xml b/scilab/modules/data_structures/help/fr/mlist.xml
new file mode 100644 (file)
index 0000000..c5ee79a
--- /dev/null
@@ -0,0 +1,110 @@
+<?xml version="1.0" encoding="ISO-8859-1" standalone="no"?>
+<!DOCTYPE MAN SYSTEM "../../manrev.dtd">
+<MAN>
+  <LANGUAGE>fr</LANGUAGE>
+
+  <TITLE>mlist</TITLE>
+
+  <TYPE>Scilab Function</TYPE>
+
+  <DATE>September 1995</DATE>
+
+  <SHORT_DESCRIPTION name="mlist">Objet Scilab, définition d'une liste
+  typée</SHORT_DESCRIPTION>
+
+  <CALLING_SEQUENCE>
+    <CALLING_SEQUENCE_ITEM>mlist(typ,a1,....an )</CALLING_SEQUENCE_ITEM>
+  </CALLING_SEQUENCE>
+
+  <PARAM>
+    <PARAM_INDENT>
+      <PARAM_ITEM>
+        <PARAM_NAME>typ</PARAM_NAME>
+
+        <PARAM_DESCRIPTION>
+          <SP>: vecteur de chaînes de caractères</SP>
+        </PARAM_DESCRIPTION>
+      </PARAM_ITEM>
+
+      <PARAM_ITEM>
+        <PARAM_NAME>ai</PARAM_NAME>
+
+        <PARAM_DESCRIPTION>
+          <SP>: objet Scilab (<VERB>matrice, liste, chaîne...</VERB>).</SP>
+        </PARAM_DESCRIPTION>
+      </PARAM_ITEM>
+    </PARAM_INDENT>
+  </PARAM>
+
+  <DESCRIPTION>
+    <P>Les objets de type <VERB>mlist</VERB> sont très similaires aux objets
+    de type <VERB>tlist</VERB>. Si <VERB>M</VERB> est de type mlist, pour tout
+    indice <VERB>i</VERB> qui n'est pas le nom d'un champ de la liste,
+    <VERB>M(i)</VERB> n'est pas le <VERB>i</VERB>-ème champ de la liste mais
+    est interprété comme le <VERB>i</VERB>-ème terme de <VERB>M</VERB> vu
+    comme un vecteur. C'est la seule différence entre <VERB>mlist</VERB> et
+    <VERB>tlist</VERB>.</P>
+
+    <P></P>
+
+    <P>Les champs des mlist doivent donc être manipulés par leur noms. Il
+    peuvent aussi être manipulés avec les fonctions <VERB>getfield</VERB> et
+    <VERB>setfield</VERB>.</P>
+
+    <P></P>
+  </DESCRIPTION>
+
+  <EXAMPLE><![CDATA[
+M=mlist(['V','name','value'],['a','b','c'],[1 2 3]);
+// définition de la fonction d'affichage
+deff('%V_p(M)','disp(M.name+'':''+string(M.value))')
+// définition de la fonction d'extraction
+deff('r=%V_e(i,M)',..
+'r=mlist([''V'',''name'',''value''],M.name(i),M.value(i))')
+M(2) // Le deuxième terme du vecteur M
+M.value 
+
+// définition de M comme une tlist
+M=tlist(['V','name','value'],['a','b','c'],[1 2 3]);
+M(2)
+
+M('name')
+
+// avec deux indices
+M=mlist(['V','name','value'],['a','b';'c' 'd'],[1 2;3 4]);
+deff('r=%V_e(varargin)',[
+    'M=varargin($)';
+    'H=[''V'',''name'',''value'']'
+    'r=mlist(H,M.name(varargin(1:$-1)),M.value(varargin(1:$-1)))'])
+
+M(:,2)
+// tableau multidimensionnel
+str=['a','b','c','d','e','f','g','h'];
+n=hypermat([2,2,2],str);
+v=hypermat([2,2,2],1:8);
+M=mlist(['V','name','value'],n,v);
+M(1,1:2,2)
+ ]]></EXAMPLE>
+
+  <SEE_ALSO>
+    <SEE_ALSO_ITEM>
+      <LINK>tlist</LINK>
+    </SEE_ALSO_ITEM>
+
+    <SEE_ALSO_ITEM>
+      <LINK>list</LINK>
+    </SEE_ALSO_ITEM>
+
+    <SEE_ALSO_ITEM>
+      <LINK>overloading</LINK>
+    </SEE_ALSO_ITEM>
+
+    <SEE_ALSO_ITEM>
+      <LINK>getfield</LINK>
+    </SEE_ALSO_ITEM>
+
+    <SEE_ALSO_ITEM>
+      <LINK>setfield</LINK>
+    </SEE_ALSO_ITEM>
+  </SEE_ALSO>
+</MAN>
\ No newline at end of file
diff --git a/scilab/modules/data_structures/help/fr/rlist.xml b/scilab/modules/data_structures/help/fr/rlist.xml
new file mode 100644 (file)
index 0000000..6d8f10e
--- /dev/null
@@ -0,0 +1,27 @@
+<?xml version="1.0" encoding="ISO-8859-1" standalone="no"?> 
+<!DOCTYPE MAN SYSTEM "../../manrev.dtd">
+<MAN>
+  <LANGUAGE>fr</LANGUAGE>
+  <TITLE>rlist  </TITLE>
+  <TYPE>Scilab Function  </TYPE>
+  <DATE>Jan 1997  </DATE>
+  <SHORT_DESCRIPTION name="rlist"> définition d&apos;une fraction rationnelle  </SHORT_DESCRIPTION>
+  <CALLING_SEQUENCE>
+  <CALLING_SEQUENCE_ITEM>rlist()  </CALLING_SEQUENCE_ITEM>
+  <CALLING_SEQUENCE_ITEM>rlist(a1,....an)    </CALLING_SEQUENCE_ITEM>
+  </CALLING_SEQUENCE>
+  <DESCRIPTION>
+  <P>
+    <VERB>rlist(a1,....an)</VERB> est équivalent à
+    <VERB>tlist([&apos;r&apos;,&apos;num&apos;;&apos;den&apos;,&apos;dt&apos;], a1,....an)</VERB> 
+  </P>
+  <P>
+    Crée une <VERB>tlist</VERB> avec <VERB>[&apos;r&apos;,&apos;num&apos;;&apos;den&apos;,&apos;dt&apos;]</VERB> comme premier argument et les <VERB>ai</VERB> comme termes suivants s&apos;ils sont présents dans les arguments. Aucune vérification de type ou de taille n&apos;est faite sur les <VERB>ai</VERB>.
+  </P>
+  <P>
+  </P>
+  </DESCRIPTION>
+  <SEE_ALSO>
+    <SEE_ALSO_ITEM> <LINK>tlist</LINK> </SEE_ALSO_ITEM>     <SEE_ALSO_ITEM> <LINK>syslin</LINK> </SEE_ALSO_ITEM>
+  </SEE_ALSO>
+</MAN>
diff --git a/scilab/modules/data_structures/help/fr/setfield.xml b/scilab/modules/data_structures/help/fr/setfield.xml
new file mode 100644 (file)
index 0000000..27e61e3
--- /dev/null
@@ -0,0 +1,58 @@
+<?xml version="1.0" encoding="ISO-8859-1" standalone="no"?> 
+<!DOCTYPE MAN SYSTEM "../../manrev.dtd">
+<MAN>
+  <LANGUAGE>fr</LANGUAGE>
+  <TITLE>setfield  </TITLE>
+  <TYPE>Scilab Function  </TYPE>
+  <DATE>September 1999  </DATE>
+  <SHORT_DESCRIPTION name="setfield"> insertion dans un champ d&apos;une liste  </SHORT_DESCRIPTION>
+  <CALLING_SEQUENCE>
+  <CALLING_SEQUENCE_ITEM>setfield(i,x,l)  </CALLING_SEQUENCE_ITEM>
+  </CALLING_SEQUENCE>
+  <PARAM>
+ <PARAM_INDENT>
+  <PARAM_ITEM>
+  <PARAM_NAME>x  </PARAM_NAME>
+  <PARAM_DESCRIPTION>
+  <SP>
+    : matrice de tout type
+</SP>
+  </PARAM_DESCRIPTION> 
+  </PARAM_ITEM>
+  <PARAM_ITEM>
+  <PARAM_NAME>l  </PARAM_NAME>
+  <PARAM_DESCRIPTION>
+  <SP>
+    : variable de type list, tlist ou mlist
+</SP>
+  </PARAM_DESCRIPTION> 
+  </PARAM_ITEM>
+  <PARAM_ITEM>
+  <PARAM_NAME>i  </PARAM_NAME>
+  <PARAM_DESCRIPTION>
+  <SP>
+    : indice de champ, voir <VERB>insertion</VERB> pour plus de détails.
+</SP>
+  </PARAM_DESCRIPTION> 
+  </PARAM_ITEM>
+ </PARAM_INDENT>
+  </PARAM>
+  <DESCRIPTION>
+  <P>
+    Cette fonction est équivalente à la syntaxe <VERB>l(i)=x</VERB> pour l&apos;extraction avec la seule différence qu&apos;elle s&apos;applique aussi aux objets de type <VERB>mlist</VERB>.
+  </P>
+  </DESCRIPTION>
+  <EXAMPLE><![CDATA[
+l=list(1,'qwerw',%s)
+l(1)='change'
+l(0)='ajoute'
+l(6)=['un de plus';'ajoute']
+//
+
+a=hypermat([2,2,2],rand(1:2^3));// les hypermatrices sont des mlist
+setfield(3,1:8,a);a // affectation du champ
+ ]]></EXAMPLE>
+  <SEE_ALSO>
+    <SEE_ALSO_ITEM> <LINK>insertion</LINK> </SEE_ALSO_ITEM>
+  </SEE_ALSO>
+</MAN>
diff --git a/scilab/modules/data_structures/help/fr/tlist.xml b/scilab/modules/data_structures/help/fr/tlist.xml
new file mode 100644 (file)
index 0000000..eab95ef
--- /dev/null
@@ -0,0 +1,94 @@
+<?xml version="1.0" encoding="ISO-8859-1" standalone="no"?> 
+<!DOCTYPE MAN SYSTEM "../../manrev.dtd">
+<MAN>
+  <LANGUAGE>fr</LANGUAGE>
+  <TITLE>tlist  </TITLE>
+  <TYPE>Scilab Function  </TYPE>
+  <DATE>September 1995  </DATE>
+  <SHORT_DESCRIPTION name="tlist"> Objet Scilab. Définition d&apos;une liste typée  </SHORT_DESCRIPTION>
+  <CALLING_SEQUENCE>
+  <CALLING_SEQUENCE_ITEM>tlist(typ,a1,....an )    </CALLING_SEQUENCE_ITEM>
+  </CALLING_SEQUENCE>
+  <PARAM>
+ <PARAM_INDENT>
+  <PARAM_ITEM>
+  <PARAM_NAME>typ  </PARAM_NAME>
+  <PARAM_DESCRIPTION>
+  <SP>
+    : chaîne de caractères ou matrice de chaînes de caractères
+</SP>
+  </PARAM_DESCRIPTION> 
+  </PARAM_ITEM>
+  <PARAM_ITEM>
+  <PARAM_NAME>ai  </PARAM_NAME>
+  <PARAM_DESCRIPTION>
+  <SP>
+    : objet Scilab (<VERB>matrice, liste, chaîne...</VERB>).
+</SP>
+  </PARAM_DESCRIPTION> 
+  </PARAM_ITEM>
+ </PARAM_INDENT>
+  </PARAM>
+  <DESCRIPTION>
+  <P>
+    Crée une <VERB>liste typée</VERB> avec les éléments <VERB>ai</VERB>. L&apos;argument <VERB>typ</VERB>
+    spécifie le nom du type. L&apos;utilisateur peut redéfinir
+    les opérateurs et primitives de Scilab pour ces nouveaux objets à l&apos;aide de fonctions Scilab (voir <VERB>overloading</VERB>). La seule différence entre les listes typées et les listes (voir <VERB>list</VERB>)
+    est la valeur numérique du type (16 au lieu de 15).
+  </P>
+  <P>
+    <VERB>typ(1)</VERB> spécifie le nom du type (cette chaîne de caractères est utilisée dans les noms des fonctions surchargeant les opérateurs et primitives).
+  </P>
+  <P>
+    S&apos;il est spécifié, <VERB>typ(i)</VERB> donne le nom formel de l&apos;élément <VERB>i+1</VERB> (voir plus bas dans les exemples).
+  </P>
+  <P>
+    Les opérations standard sur les listes fonctionnent similairement pour les listes typées (tlist). 
+  </P>
+  <P>
+     extraction 
+    : <VERB>[x,y,z...]=l(v)</VERB> ou <VERB>v</VERB> est un vecteur d&apos;indices; 
+    <VERB>[x,y,z]=l(:)</VERB> extrait tous les éléments.
+  </P>
+  <P>
+      insertion
+    : <VERB>l(i)=a</VERB>
+  </P>
+  <P>
+     suppression
+    : <VERB>l(i)=null()</VERB> supprime le i-ème élément de la <VERB>tlist l</VERB>.
+  </P>
+  <P>
+     affichage
+  </P>
+  <P>
+    De plus si les composantes <VERB>typ(2:n+1)</VERB> sont spécifiées, les éléments peuvent être désignés par leur noms formels.
+  </P>
+  <P>
+    Voici quelques exemples d&apos;utilisation des liste typées :
+  </P>
+  <P>
+    Dans Scilab, les systèmes dynamiques linéaires sont définis par une liste typée :
+    le quadruplet <VERB>[A,B,C,D]</VERB> est représenté par la tlist
+    <VERB>Sys=tlist([&apos;lss&apos;;&apos;A&apos;;&apos;B&apos;;&apos;C&apos;;&apos;D&apos;;&apos;X0&apos;;&apos;dt&apos;],A,B,C,D,x0,&apos;c&apos;)</VERB> 
+    et cette tlist spécifique est créée par la fonction <VERB>syslin</VERB>.
+  </P>
+  <P>
+    Sys(2), Sys(&apos;A&apos;) ou Sys.A est la matrice d&apos;état et Sys(&apos;dt&apos;) ou Sys.dt est le domaine temporel.
+  </P>
+  <P>
+    Une matrice rationnelle <VERB>H</VERB> est représentée par la tlist
+    <VERB>H=tlist([&apos;r&apos;;&apos;num&apos;;&apos;den&apos;;&apos;dt&apos;],Num,Den,[])</VERB> où <VERB>Num</VERB> et <VERB>Den</VERB> sont deux
+    matrices polynomiales et un système dynamique linéaire (en temps continu) peut être créé sous la forme d&apos;une
+    matrice de transfert <VERB>H</VERB> par <VERB>syslin(&apos;c&apos;,H)</VERB>.
+  </P>
+  <P>
+    H(2), H(&apos;num&apos;) ou H.num est le numérateur de la matrice de transfert
+  </P>
+  </DESCRIPTION>
+  <SEE_ALSO>
+    <SEE_ALSO_ITEM> <LINK>null</LINK> </SEE_ALSO_ITEM>     <SEE_ALSO_ITEM> <LINK>percent</LINK> </SEE_ALSO_ITEM>     <SEE_ALSO_ITEM> <LINK>syslin</LINK> </SEE_ALSO_ITEM>     <SEE_ALSO_ITEM> <LINK>list</LINK> </SEE_ALSO_ITEM>
+  </SEE_ALSO>
+</MAN>
@@ -34,7 +34,7 @@ static DataStructures1Table Tab[]=
        {C2F(sci_lstsize),"lstsize"}\r
 };\r
 /*-----------------------------------------------------------------------------------*/\r
-int C2F(lstelm)()\r
+int C2F(gwdatastructures1)()\r
 { \r
        Rhs=Max(Rhs,0);\r
        if (C2F(vstk).top - C2F(com).rhs + C2F(com).lhs + 1 >= C2F(vstk).bot) \r
@@ -33,7 +33,7 @@ static DataStructures2Table Tab[]=
        {C2F(sci_setfield),"setfield"}\r
 };\r
 /*-----------------------------------------------------------------------------------*/\r
-int C2F(lstelmi)()\r
+int C2F(gwdatastructures2)()\r
 { \r
        Rhs=Max(Rhs,0);\r
        if (C2F(vstk).top - C2F(com).rhs + C2F(com).lhs + 1 >= C2F(vstk).bot) \r
@@ -2,7 +2,7 @@
 /* INRIA 2006 */\r
 /* Allan CORNET */\r
 /*-----------------------------------------------------------------------------------*/\r
-#include "../machine.h"\r
+#include "machine.h"\r
 /*-----------------------------------------------------------------------------------*/\r
 extern C2F(definedfields)();\r
 /*-----------------------------------------------------------------------------------*/\r
@@ -2,7 +2,7 @@
 /* INRIA 2006 */\r
 /* Allan CORNET */\r
 /*-----------------------------------------------------------------------------------*/\r
-#include "../machine.h"\r
+#include "machine.h"\r
 /*-----------------------------------------------------------------------------------*/\r
 extern int C2F(gratyp)();\r
 extern int C2F(mtlist)();\r
similarity index 93%
rename from scilab/routines/interf/sci_list.c
rename to scilab/modules/data_structures/sci_gateway/c/sci_list.c
index 627fa79..efc2f97 100644 (file)
@@ -2,7 +2,7 @@
 /* INRIA 2006 */\r
 /* Allan CORNET */\r
 /*-----------------------------------------------------------------------------------*/\r
-#include "../machine.h"\r
+#include "machine.h"\r
 /*-----------------------------------------------------------------------------------*/\r
 extern int C2F(scilist)();\r
 /*-----------------------------------------------------------------------------------*/\r
@@ -2,7 +2,7 @@
 /* INRIA 2006 */\r
 /* Allan CORNET */\r
 /*-----------------------------------------------------------------------------------*/\r
-#include "../machine.h"\r
+#include "machine.h"\r
 /*-----------------------------------------------------------------------------------*/\r
 extern C2F(mtlist)();\r
 extern C2F(lsstyp)();\r
@@ -2,7 +2,7 @@
 /* INRIA 2006 */\r
 /* Allan CORNET */\r
 /*-----------------------------------------------------------------------------------*/\r
-#include "../machine.h"\r
+#include "machine.h"\r
 /*-----------------------------------------------------------------------------------*/\r
 extern int C2F(intlstcat)();\r
 /*-----------------------------------------------------------------------------------*/\r
@@ -2,7 +2,7 @@
 /* INRIA 2006 */\r
 /* Allan CORNET */\r
 /*-----------------------------------------------------------------------------------*/\r
-#include "../machine.h"\r
+#include "machine.h"\r
 /*-----------------------------------------------------------------------------------*/\r
 extern int C2F(intlstsize)();\r
 /*-----------------------------------------------------------------------------------*/\r
@@ -2,7 +2,7 @@
 /* INRIA 2006 */\r
 /* Allan CORNET */\r
 /*-----------------------------------------------------------------------------------*/\r
-#include "../machine.h"\r
+#include "machine.h"\r
 /*-----------------------------------------------------------------------------------*/\r
 extern C2F(scilist)();\r
 /*-----------------------------------------------------------------------------------*/\r
@@ -2,7 +2,7 @@
 /* INRIA 2006 */\r
 /* Allan CORNET */\r
 /*-----------------------------------------------------------------------------------*/\r
-#include "../machine.h"\r
+#include "machine.h"\r
 /*-----------------------------------------------------------------------------------*/\r
 extern int C2F(mtlist)();\r
 extern int C2F(rattyp)();\r
@@ -2,7 +2,7 @@
 /* INRIA 2006 */\r
 /* Allan CORNET */\r
 /*-----------------------------------------------------------------------------------*/\r
-#include "../machine.h"\r
+#include "machine.h"\r
 /*-----------------------------------------------------------------------------------*/\r
 extern int C2F(scilist)();\r
 /*-----------------------------------------------------------------------------------*/\r
@@ -1,6 +1,6 @@
       subroutine definedfields\r
 c     returns index of defined fields of a list\r
-      include '../stack.h'\r
+      include 'stack.h'\r
       integer iadr,sadr\r
 c\r
       iadr(l)=l+l-1\r
@@ -1,6 +1,6 @@
 \r
       subroutine intgetfield()\r
-      include '../stack.h'\r
+      include 'stack.h'\r
       integer top0,tops,vol,vol2,vol1\r
       integer strpos\r
       external strpos\r
@@ -1,7 +1,7 @@
       subroutine scilist(fname)\r
       \r
       character*(*) fname\r
-      include '../stack.h'\r
+      include 'stack.h'\r
       integer ltyp\r
       integer iadr,sadr\r
       \r
@@ -1,7 +1,7 @@
       \r
       subroutine intlstcat\r
 c     catenate two or more lists\r
-      include '../stack.h'\r
+      include 'stack.h'\r
       integer iadr,sadr\r
 c\r
       iadr(l)=l+l-1\r
@@ -1,6 +1,6 @@
       subroutine intlstsize\r
 c     WARNING : argument of this interface may be passed by reference\r
-      INCLUDE '../stack.h'\r
+      include 'stack.h'\r
       integer iadr,sadr\r
 c     \r
       iadr(l)=l+l-1\r
@@ -1,5 +1,5 @@
       subroutine intsetfield()\r
-      include '../stack.h'\r
+      include 'stack.h'\r
       integer typs,topk\r
       logical eptover\r
 c\r
-<?xml version="1.0" encoding="Windows-1252"?>
-<VisualStudioProject
-       ProjectType="Visual C++"
-       Version="8,00"
-       Name="interf"
-       ProjectGUID="{3A131FDF-BDA9-4216-91AD-DFFCEF46F89A}"
-       >
-       <Platforms>
-               <Platform
-                       Name="Win32"
-               />
-       </Platforms>
-       <ToolFiles>
-       </ToolFiles>
-       <Configurations>
-               <Configuration
-                       Name="Debug|Win32"
-                       OutputDirectory="$(ConfigurationName)"
-                       IntermediateDirectory="$(ConfigurationName)"
-                       ConfigurationType="4"
-                       UseOfMFC="0"
-                       ATLMinimizesCRunTimeLibraryUsage="false"
-                       CharacterSet="2"
-                       >
-                       <Tool
-                               Name="VCPreBuildEventTool"
-                       />
-                       <Tool
-                               Name="VCCustomBuildTool"
-                       />
-                       <Tool
-                               Name="VCXMLDataGeneratorTool"
-                       />
-                       <Tool
-                               Name="VCWebServiceProxyGeneratorTool"
-                       />
-                       <Tool
-                               Name="VCMIDLTool"
-                       />
-                       <Tool
-                               Name="VCCLCompilerTool"
-                               Optimization="0"
-                               AdditionalIncludeDirectories="..\..\modules\core\includes"
-                               PreprocessorDefinitions="_LIB;STRICT;WITH_TK;_DEBUG;_CRT_SECURE_NO_DEPRECATE;WIN32"
-                               BasicRuntimeChecks="3"
-                               RuntimeLibrary="1"
-                               UsePrecompiledHeader="0"
-                               PrecompiledHeaderFile=""
-                               AssemblerListingLocation="$(ConfigurationName)/"
-                               ObjectFile="$(ConfigurationName)/"
-                               ProgramDataBaseFileName="$(ConfigurationName)/"
-                               WarningLevel="3"
-                               SuppressStartupBanner="true"
-                               DebugInformationFormat="3"
-                               CompileAs="0"
-                       />
-                       <Tool
-                               Name="VCManagedResourceCompilerTool"
-                       />
-                       <Tool
-                               Name="VCResourceCompilerTool"
-                               PreprocessorDefinitions="_DEBUG"
-                               Culture="1036"
-                       />
-                       <Tool
-                               Name="VCPreLinkEventTool"
-                       />
-                       <Tool
-                               Name="VCLibrarianTool"
-                               OutputFile="../../libs/interf.lib"
-                               SuppressStartupBanner="true"
-                       />
-                       <Tool
-                               Name="VCALinkTool"
-                       />
-                       <Tool
-                               Name="VCXDCMakeTool"
-                       />
-                       <Tool
-                               Name="VCBscMakeTool"
-                       />
-                       <Tool
-                               Name="VCFxCopTool"
-                       />
-                       <Tool
-                               Name="VCPostBuildEventTool"
-                               CommandLine="cd $(IntDir) &gt; nul&#x0D;&#x0A;for %%f in (*.obj) do  ..\..\..\bin\dumpexts -o %%~nf.def -n libscilab.dll %%f &gt;nul&#x0D;&#x0A;copy *.def interf.def &gt;nul&#x0D;&#x0A;copy interf.def ..\..\..\libs\interf.def &gt;nul&#x0D;&#x0A;del *.def &gt;nul&#x0D;&#x0A;cd .. &gt;nul&#x0D;&#x0A;"
-                       />
-               </Configuration>
-               <Configuration
-                       Name="Release|Win32"
-                       OutputDirectory="$(ConfigurationName)"
-                       IntermediateDirectory="$(ConfigurationName)"
-                       ConfigurationType="4"
-                       UseOfMFC="0"
-                       ATLMinimizesCRunTimeLibraryUsage="false"
-                       CharacterSet="2"
-                       >
-                       <Tool
-                               Name="VCPreBuildEventTool"
-                       />
-                       <Tool
-                               Name="VCCustomBuildTool"
-                       />
-                       <Tool
-                               Name="VCXMLDataGeneratorTool"
-                       />
-                       <Tool
-                               Name="VCWebServiceProxyGeneratorTool"
-                       />
-                       <Tool
-                               Name="VCMIDLTool"
-                       />
-                       <Tool
-                               Name="VCCLCompilerTool"
-                               Optimization="2"
-                               InlineFunctionExpansion="1"
-                               FavorSizeOrSpeed="1"
-                               AdditionalIncludeDirectories="..\..\modules\core\includes"
-                               PreprocessorDefinitions="NDEBUG;_LIB;STRICT;WITH_TK;_CRT_SECURE_NO_DEPRECATE"
-                               StringPooling="true"
-                               RuntimeLibrary="0"
-                               EnableFunctionLevelLinking="true"
-                               EnableEnhancedInstructionSet="1"
-                               UsePrecompiledHeader="0"
-                               PrecompiledHeaderFile=""
-                               AssemblerListingLocation="$(ConfigurationName)/"
-                               ObjectFile="$(ConfigurationName)/"
-                               ProgramDataBaseFileName="$(ConfigurationName)/"
-                               WarningLevel="3"
-                               SuppressStartupBanner="true"
-                               CompileAs="0"
-                       />
-                       <Tool
-                               Name="VCManagedResourceCompilerTool"
-                       />
-                       <Tool
-                               Name="VCResourceCompilerTool"
-                               PreprocessorDefinitions="NDEBUG"
-                               Culture="1036"
-                       />
-                       <Tool
-                               Name="VCPreLinkEventTool"
-                       />
-                       <Tool
-                               Name="VCLibrarianTool"
-                               OutputFile="../../libs/interf.lib"
-                               SuppressStartupBanner="true"
-                       />
-                       <Tool
-                               Name="VCALinkTool"
-                       />
-                       <Tool
-                               Name="VCXDCMakeTool"
-                       />
-                       <Tool
-                               Name="VCBscMakeTool"
-                       />
-                       <Tool
-                               Name="VCFxCopTool"
-                       />
-                       <Tool
-                               Name="VCPostBuildEventTool"
-                               CommandLine="cd $(IntDir) &gt; nul&#x0D;&#x0A;for %%f in (*.obj) do  ..\..\..\bin\dumpexts -o %%~nf.def -n libscilab.dll %%f &gt;nul&#x0D;&#x0A;copy *.def interf.def &gt;nul&#x0D;&#x0A;copy interf.def ..\..\..\libs\interf.def &gt;nul&#x0D;&#x0A;del *.def &gt;nul&#x0D;&#x0A;cd .. &gt;nul&#x0D;&#x0A;"
-                       />
-               </Configuration>
-       </Configurations>
-       <References>
-       </References>
-       <Files>
-               <Filter
-                       Name="Source Files"
-                       Filter="cpp;c;cxx;rc;def;r;odl;idl;hpj;bat"
-                       >
-                       <File
-                               RelativePath=".\gw_data_structures1.c"
-                               >
-                       </File>
-                       <File
-                               RelativePath=".\gw_data_structures2.c"
-                               >
-                       </File>
-                       <File
-                               RelativePath=".\hmops.c"
-                               >
-                       </File>
-                       <File
-                               RelativePath=".\sci_definedfields.c"
-                               >
-                       </File>
-                       <File
-                               RelativePath=".\sci_glist.c"
-                               >
-                       </File>
-                       <File
-                               RelativePath=".\sci_list.c"
-                               >
-                       </File>
-                       <File
-                               RelativePath=".\sci_lsslist.c"
-                               >
-                       </File>
-                       <File
-                               RelativePath=".\sci_lstcat.c"
-                               >
-                       </File>
-                       <File
-                               RelativePath=".\sci_lstsize.c"
-                               >
-                       </File>
-                       <File
-                               RelativePath=".\sci_mlist.c"
-                               >
-                       </File>
-                       <File
-                               RelativePath=".\sci_rlist.c"
-                               >
-                       </File>
-                       <File
-                               RelativePath=".\sci_tlist.c"
-                               >
-                       </File>
-                       <File
-                               RelativePath=".\stcreate.c"
-                               >
-                       </File>
-               </Filter>
-               <Filter
-                       Name="Header Files"
-                       Filter="h;hpp;hxx;hm;inl"
-                       >
-                       <File
-                               RelativePath=".\gw_data_structures1.h"
-                               >
-                       </File>
-                       <File
-                               RelativePath=".\gw_data_structures2.h"
-                               >
-                       </File>
-                       <File
-                               RelativePath="stack1.h"
-                               >
-                       </File>
-                       <File
-                               RelativePath="stack2.h"
-                               >
-                       </File>
-                       <File
-                               RelativePath="stack3.h"
-                               >
-                       </File>
-               </Filter>
-       </Files>
-       <Globals>
-       </Globals>
-</VisualStudioProject>
+<?xml version="1.0" encoding="Windows-1252"?>\r
+<VisualStudioProject\r
+       ProjectType="Visual C++"\r
+       Version="8,00"\r
+       Name="data_structures"\r
+       ProjectGUID="{B7A168A0-DFC0-4C6D-B0CC-6079912A4A76}"\r
+       >\r
+       <Platforms>\r
+               <Platform\r
+                       Name="Win32"\r
+               />\r
+       </Platforms>\r
+       <ToolFiles>\r
+       </ToolFiles>\r
+       <Configurations>\r
+               <Configuration\r
+                       Name="Debug|Win32"\r
+                       OutputDirectory="$(ConfigurationName)"\r
+                       IntermediateDirectory="$(ConfigurationName)"\r
+                       ConfigurationType="4"\r
+                       UseOfMFC="0"\r
+                       ATLMinimizesCRunTimeLibraryUsage="false"\r
+                       CharacterSet="2"\r
+                       >\r
+                       <Tool\r
+                               Name="VCPreBuildEventTool"\r
+                       />\r
+                       <Tool\r
+                               Name="VCCustomBuildTool"\r
+                       />\r
+                       <Tool\r
+                               Name="VCXMLDataGeneratorTool"\r
+                       />\r
+                       <Tool\r
+                               Name="VCWebServiceProxyGeneratorTool"\r
+                       />\r
+                       <Tool\r
+                               Name="VCMIDLTool"\r
+                       />\r
+                       <Tool\r
+                               Name="VCCLCompilerTool"\r
+                               Optimization="0"\r
+                               AdditionalIncludeDirectories="../../includes;../../../core/includes;../../../../libs/MALLOC/includes;"\r
+                               PreprocessorDefinitions="_LIB;STRICT;_DEBUG;_CRT_SECURE_NO_DEPRECATE"\r
+                               BasicRuntimeChecks="3"\r
+                               RuntimeLibrary="1"\r
+                               UsePrecompiledHeader="0"\r
+                               PrecompiledHeaderFile=""\r
+                               AssemblerListingLocation="$(ConfigurationName)/"\r
+                               ObjectFile="$(ConfigurationName)/"\r
+                               ProgramDataBaseFileName="$(ConfigurationName)/"\r
+                               WarningLevel="3"\r
+                               SuppressStartupBanner="true"\r
+                               DebugInformationFormat="3"\r
+                               CompileAs="0"\r
+                       />\r
+                       <Tool\r
+                               Name="VCManagedResourceCompilerTool"\r
+                       />\r
+                       <Tool\r
+                               Name="VCResourceCompilerTool"\r
+                               PreprocessorDefinitions="_DEBUG"\r
+                               Culture="1036"\r
+                       />\r
+                       <Tool\r
+                               Name="VCPreLinkEventTool"\r
+                       />\r
+                       <Tool\r
+                               Name="VCLibrarianTool"\r
+                               OutputFile="../../../../libs/data_structures.lib"\r
+                               SuppressStartupBanner="true"\r
+                       />\r
+                       <Tool\r
+                               Name="VCALinkTool"\r
+                       />\r
+                       <Tool\r
+                               Name="VCXDCMakeTool"\r
+                       />\r
+                       <Tool\r
+                               Name="VCBscMakeTool"\r
+                       />\r
+                       <Tool\r
+                               Name="VCFxCopTool"\r
+                       />\r
+                       <Tool\r
+                               Name="VCPostBuildEventTool"\r
+                               CommandLine="cd &quot;$(IntDir)&quot; &gt;nul&#x0D;&#x0A;for %%f in (*.obj) do  ..\..\..\..\..\bin\dumpexts -o %%~nf.def -n libscilab.dll %%f &gt;nul&#x0D;&#x0A;copy *.def data_structures.def &gt;nul&#x0D;&#x0A;copy data_structures.def ..\..\..\..\..\libs\data_structures.def &gt;nul&#x0D;&#x0A;del *.def &gt;nul&#x0D;&#x0A;cd .. &gt;nul&#x0D;&#x0A;"\r
+                       />\r
+               </Configuration>\r
+               <Configuration\r
+                       Name="Release|Win32"\r
+                       OutputDirectory="$(ConfigurationName)"\r
+                       IntermediateDirectory="$(ConfigurationName)"\r
+                       ConfigurationType="4"\r
+                       UseOfMFC="0"\r
+                       ATLMinimizesCRunTimeLibraryUsage="false"\r
+                       CharacterSet="2"\r
+                       >\r
+                       <Tool\r
+                               Name="VCPreBuildEventTool"\r
+                       />\r
+                       <Tool\r
+                               Name="VCCustomBuildTool"\r
+                       />\r
+                       <Tool\r
+                               Name="VCXMLDataGeneratorTool"\r
+                       />\r
+                       <Tool\r
+                               Name="VCWebServiceProxyGeneratorTool"\r
+                       />\r
+                       <Tool\r
+                               Name="VCMIDLTool"\r
+                       />\r
+                       <Tool\r
+                               Name="VCCLCompilerTool"\r
+                               Optimization="2"\r
+                               InlineFunctionExpansion="1"\r
+                               FavorSizeOrSpeed="1"\r
+                               AdditionalIncludeDirectories="../../includes;../../../core/includes;../../../../libs/MALLOC/includes;"\r
+                               PreprocessorDefinitions="NDEBUG;_LIB;STRICT;_CRT_SECURE_NO_DEPRECATE"\r
+                               StringPooling="true"\r
+                               RuntimeLibrary="0"\r
+                               EnableFunctionLevelLinking="true"\r
+                               EnableEnhancedInstructionSet="1"\r
+                               UsePrecompiledHeader="0"\r
+                               PrecompiledHeaderFile=""\r
+                               AssemblerListingLocation="$(ConfigurationName)/"\r
+                               ObjectFile="$(ConfigurationName)/"\r
+                               ProgramDataBaseFileName="$(ConfigurationName)/"\r
+                               WarningLevel="3"\r
+                               SuppressStartupBanner="true"\r
+                               CompileAs="0"\r
+                       />\r
+                       <Tool\r
+                               Name="VCManagedResourceCompilerTool"\r
+                       />\r
+                       <Tool\r
+                               Name="VCResourceCompilerTool"\r
+                               PreprocessorDefinitions="NDEBUG"\r
+                               Culture="1036"\r
+                       />\r
+                       <Tool\r
+                               Name="VCPreLinkEventTool"\r
+                       />\r
+                       <Tool\r
+                               Name="VCLibrarianTool"\r
+                               OutputFile="../../../../libs/data_structures.lib"\r
+                               SuppressStartupBanner="true"\r
+                       />\r
+                       <Tool\r
+                               Name="VCALinkTool"\r
+                       />\r
+                       <Tool\r
+                               Name="VCXDCMakeTool"\r
+                       />\r
+                       <Tool\r
+                               Name="VCBscMakeTool"\r
+                       />\r
+                       <Tool\r
+                               Name="VCFxCopTool"\r
+                       />\r
+                       <Tool\r
+                               Name="VCPostBuildEventTool"\r
+                               CommandLine="cd &quot;$(IntDir)&quot; &gt;nul&#x0D;&#x0A;for %%f in (*.obj) do  ..\..\..\..\..\bin\dumpexts -o %%~nf.def -n libscilab.dll %%f &gt;nul&#x0D;&#x0A;copy *.def data_structures.def &gt;nul&#x0D;&#x0A;copy data_structures.def ..\..\..\..\..\libs\data_structures.def &gt;nul&#x0D;&#x0A;del *.def &gt;nul&#x0D;&#x0A;cd .. &gt;nul&#x0D;&#x0A;"\r
+                       />\r
+               </Configuration>\r
+       </Configurations>\r
+       <References>\r
+       </References>\r
+       <Files>\r
+               <Filter\r
+                       Name="Source Files"\r
+                       Filter="cpp;c;cxx;rc;def;r;odl;idl;hpj;bat"\r
+                       >\r
+                       <File\r
+                               RelativePath="..\..\sci_gateway\c\gw_data_structures1.c"\r
+                               >\r
+                       </File>\r
+                       <File\r
+                               RelativePath="..\..\sci_gateway\c\gw_data_structures2.c"\r
+                               >\r
+                       </File>\r
+                       <File\r
+                               RelativePath=".\hmops.c"\r
+                               >\r
+                       </File>\r
+                       <File\r
+                               RelativePath="..\..\sci_gateway\c\sci_definedfields.c"\r
+                               >\r
+                       </File>\r
+                       <File\r
+                               RelativePath="..\..\sci_gateway\c\sci_glist.c"\r
+                               >\r
+                       </File>\r
+                       <File\r
+                               RelativePath="..\..\sci_gateway\c\sci_list.c"\r
+                               >\r
+                       </File>\r
+                       <File\r
+                               RelativePath="..\..\sci_gateway\c\sci_lsslist.c"\r
+                               >\r
+                       </File>\r
+                       <File\r
+                               RelativePath="..\..\sci_gateway\c\sci_lstcat.c"\r
+                               >\r
+                       </File>\r
+                       <File\r
+                               RelativePath="..\..\sci_gateway\c\sci_lstsize.c"\r
+                               >\r
+                       </File>\r
+                       <File\r
+                               RelativePath="..\..\sci_gateway\c\sci_mlist.c"\r
+                               >\r
+                       </File>\r
+                       <File\r
+                               RelativePath="..\..\sci_gateway\c\sci_rlist.c"\r
+                               >\r
+                       </File>\r
+                       <File\r
+                               RelativePath="..\..\sci_gateway\c\sci_tlist.c"\r
+                               >\r
+                       </File>\r
+                       <File\r
+                               RelativePath=".\stcreate.c"\r
+                               >\r
+                       </File>\r
+               </Filter>\r
+               <Filter\r
+                       Name="Header Files"\r
+                       Filter="h;hpp;hxx;hm;inl"\r
+                       >\r
+                       <File\r
+                               RelativePath="..\..\includes\gw_data_structures1.h"\r
+                               >\r
+                       </File>\r
+                       <File\r
+                               RelativePath="..\..\includes\gw_data_structures2.h"\r
+                               >\r
+                       </File>\r
+               </Filter>\r
+               <File\r
+                       RelativePath="..\..\sci_gateway\data_structures1.fundef"\r
+                       >\r
+               </File>\r
+               <File\r
+                       RelativePath="..\..\sci_gateway\data_structures2.fundef"\r
+                       >\r
+               </File>\r
+       </Files>\r
+       <Globals>\r
+       </Globals>\r
+</VisualStudioProject>\r
similarity index 99%
rename from scilab/routines/interf/hmops.c
rename to scilab/modules/data_structures/src/c/hmops.c
index d8ca86e..f178e46 100644 (file)
@@ -14,7 +14,7 @@
  *  modifications pour le champs dim en int32 maintenant
  */
 
-#include "../stack-c.h"
+#include "stack-c.h"
 #include <math.h>
 #include <stdlib.h>
 
similarity index 98%
rename from scilab/routines/interf/stcreate.c
rename to scilab/modules/data_structures/src/c/stcreate.c
index b618dd9..5a2a6a1 100644 (file)
@@ -1,6 +1,6 @@
-#include "../stack-c.h"
+#include "stack-c.h"
 #define memused(it,mn) ((((mn)*( it % 10))/sizeof(int))+1)
-#include "../stack-c.h"
+#include "stack-c.h"
 
 #include <string.h>
 
diff --git a/scilab/modules/data_structures/src/fortran/data_structures_f.vfproj b/scilab/modules/data_structures/src/fortran/data_structures_f.vfproj
new file mode 100644 (file)
index 0000000..2d6871c
--- /dev/null
@@ -0,0 +1,59 @@
+<?xml version="1.0" encoding="UTF-8"?>\r
+<VisualStudioProject ProjectType="typeStaticLibrary" ProjectCreator="Intel Fortran" Keyword="Static Library" Version="9.10" ProjectIdGuid="{8091E9B6-4C08-4218-A63D-742867CCFE9F}">\r
+       <Platforms>\r
+               <Platform Name="Win32"/></Platforms>\r
+       <Configurations>\r
+               <Configuration Name="Debug|Win32" DeleteExtensionsOnClean="*.obj;*.mod;*.pdb;*.asm;*.map;*.dyn;*.dpi;*.tmp;*.log;*.lib;$(TargetPath)" ConfigurationType="typeStaticLibrary">\r
+                               <Tool Name="VFMidlTool" SuppressStartupBanner="true" TypeLibraryName="$(IntDir)/$(InputName).tlb"/>\r
+                               <Tool Name="VFPreBuildEventTool"/>\r
+                               <Tool Name="VFPostBuildEventTool" CommandLine="cd $(IntDir)\r
+for %%f in (*.obj) do  ..\..\..\..\..\bin\dumpexts -o %%~nf.def -n scilex.dll %%f &gt;nul\r
+copy *.def data_structures_f.def &gt;nul\r
+copy data_structures_f.def ..\..\..\..\..\libs\data_structures_f.def &gt;nul\r
+del *.def &gt;nul\r
+cd .."/>\r
+                               <Tool Name="VFFortranCompilerTool" SuppressStartupBanner="true" DebugInformationFormat="debugEnabled" Optimization="optimizeDisabled" OptimizeForProcessor="procOptimizeBlended" AdditionalIncludeDirectories="../../includes;../../../core/includes;" AlternateParameterSyntax="false" F77RuntimeCompatibility="true" FPS4Libs="false" CallingConvention="callConventionCRef" ExternalNameUnderscore="true" ModulePath="$(INTDIR)/" ObjectFile="$(INTDIR)/" RuntimeLibrary="rtMultiThreadedDebug" DisableDefaultLibSearch="true" CompileOnly="true"/>\r
+                               <Tool Name="VFCustomBuildTool"/>\r
+                               <Tool Name="VFLibrarianTool" OutputFile="../../../../libs/data_structures_f.lib" SuppressStartupBanner="true"/>\r
+                               <Tool Name="VFPreLinkEventTool"/>\r
+                               <Tool Name="VFResourceCompilerTool" ResourceOutputFileName="$(IntDir)/$(InputName).res"/></Configuration>\r
+               <Configuration Name="Release|Win32" DeleteExtensionsOnClean="*.obj;*.mod;*.pdb;*.asm;*.map;*.dyn;*.dpi;*.tmp;*.log;*.lib;$(TargetPath)" ConfigurationType="typeStaticLibrary">\r
+                               <Tool Name="VFMidlTool" SuppressStartupBanner="true" TypeLibraryName="$(IntDir)/$(InputName).tlb"/>\r
+                               <Tool Name="VFPreBuildEventTool"/>\r
+                               <Tool Name="VFPostBuildEventTool" CommandLine="cd $(IntDir)\r
+for %%f in (*.obj) do  ..\..\..\..\..\bin\dumpexts -o %%~nf.def -n scilex.dll %%f &gt;nul\r
+copy *.def data_structures_f.def &gt;nul\r
+copy data_structures_f.def ..\..\..\..\..\libs\data_structures_f.def &gt;nul\r
+del *.def &gt;nul\r
+cd .."/>\r
+                               <Tool Name="VFFortranCompilerTool" SuppressStartupBanner="true" OptimizeForProcessor="procOptimizePentiumProThruIII" AdditionalIncludeDirectories="../../includes;../../../core/includes;" PreprocessorDefinitions="WIN32" AlternateParameterSyntax="false" F77RuntimeCompatibility="true" FPS4Libs="false" CallingConvention="callConventionCRef" ExternalNameUnderscore="true" ModulePath="$(INTDIR)/" ObjectFile="$(INTDIR)/" RuntimeLibrary="static /threads" DisableDefaultLibSearch="true" CompileOnly="true"/>\r
+                               <Tool Name="VFCustomBuildTool"/>\r
+                               <Tool Name="VFLinkerTool" MustRebuild="true" OutputFile="$(OutDir)/$(ProjectName)" SuppressStartupBanner="true"/>\r
+                               <Tool Name="VFLibrarianTool" MustRebuild="true" OutputFile="../../../../libs/data_structures_f.lib" SuppressStartupBanner="true"/>\r
+                               <Tool Name="VFPreLinkEventTool"/>\r
+                               <Tool Name="VFResourceCompilerTool" ResourceOutputFileName="$(IntDir)/$(InputName).res"/></Configuration></Configurations>\r
+       <Files>\r
+               <Filter Name="Source Files" Filter="f90;for;f;fpp;ftn;def;odl;idl">\r
+               <File RelativePath="extractfields.f"/>\r
+               <File RelativePath="followpath.f"/>\r
+               <File RelativePath="forcerhs.f"/>\r
+               <File RelativePath="gratyp.f"/>\r
+               <File RelativePath="insertfield.f"/>\r
+               <File RelativePath="intl_e.f"/>\r
+               <File RelativePath="intl_i.f"/>\r
+               <File RelativePath="lsstyp.f"/>\r
+               <File RelativePath="lstops.f"/>\r
+               <File RelativePath="mlist.f"/>\r
+               <File RelativePath="rattyp.f"/>\r
+               <File RelativePath="..\..\sci_gateway\fortran\sci_definedfields.f"/>\r
+               <File RelativePath="..\..\sci_gateway\fortran\sci_getfield.f"/>\r
+               <File RelativePath="..\..\sci_gateway\fortran\sci_list.f"/>\r
+               <File RelativePath="..\..\sci_gateway\fortran\sci_lstcat.f"/>\r
+               <File RelativePath="..\..\sci_gateway\fortran\sci_lstsize.f"/>\r
+               <File RelativePath="..\..\sci_gateway\fortran\sci_setfield.f"/>\r
+               <File RelativePath="udptr.f"/></Filter>\r
+               <Filter Name="Header Files" Filter="fi;fd"/>\r
+               <Filter Name="Resource Files" Filter="rc;ico;cur;bmp;dlg;rc2;rct;bin;rgs;gif;jpg;jpeg;jpe"/>\r
+               <File RelativePath="..\..\sci_gateway\data_structures2.fundef"/>\r
+               <File RelativePath="..\..\sci_gateway\data_structures1.fundef"/></Files>\r
+       <Globals/></VisualStudioProject>\r
@@ -8,7 +8,7 @@ c
 c     if n==-1 all fieds are extracted\r
 c\r
 \r
-      include '../stack.h'\r
+      include 'stack.h'\r
       integer ind(*)\r
 c     \r
       integer vol2\r
@@ -32,7 +32,7 @@ c         6 : current index is 0 or greater than current sublist # of fields
 c =============================================================
 c
 c     Copyright INRIA
-      include '../stack.h'
+      include 'stack.h'
 c     
       integer indtop,listtop,ind(*)
       integer typi,count,oldcount,voll,voli
similarity index 92%
rename from scilab/routines/interf/forcerhs.f
rename to scilab/modules/data_structures/src/fortran/forcerhs.f
index 8320125..ef86709 100644 (file)
@@ -6,7 +6,7 @@ c     list. The lhs is changed  from 1 to the number of extracted
 c     variables.\r
 c\r
       integer n,ierr\r
-      include '../stack.h'\r
+      include 'stack.h'\r
 \r
       ierr=0\r
 c      write(6,'(''forcerhs'',i5)') n\r
@@ -12,7 +12,7 @@ c     is the position of the result,if info<>0
 c     info 
 c        if 0 list has been updated "in place"
 c        if 1 list needs to be stored
-      include '../stack.h'
+      include 'stack.h'
 c     
       integer volfrom,voltos,volto,dvol,ind(*)
       integer typfrom,typto
similarity index 99%
rename from scilab/routines/interf/intl_e.f
rename to scilab/modules/data_structures/src/fortran/intl_e.f
index f01c28e..d431f30 100644 (file)
@@ -4,7 +4,7 @@ c     extraction pour les list tlist, mlist
 c =============================================================
 c
 c     Copyright INRIA
-      include '../stack.h'
+      include 'stack.h'
 c
 c
       integer rhs1,vol1,vol2,vol
similarity index 99%
rename from scilab/routines/interf/intl_i.f
rename to scilab/modules/data_structures/src/fortran/intl_i.f
index d049a91..9af6b9e 100644 (file)
@@ -4,7 +4,7 @@ c     list insertions arg3(arg1)=arg2
 c =============================================================
 c
 c     Copyright INRIA
-      include '../stack.h'
+      include 'stack.h'
 c
       integer vol1,vol2,vol3,volv
       integer top3,top2,top1
similarity index 98%
rename from scilab/routines/interf/lstops.f
rename to scilab/modules/data_structures/src/fortran/lstops.f
index 0342401..25ca4f6 100644 (file)
@@ -4,7 +4,7 @@ c     elementary operations on lists
 c ==================================
 c
 c     Copyright INRIA
-      include '../stack.h'
+      include 'stack.h'
 c
 c
       logical  ishm
similarity index 93%
rename from scilab/routines/interf/mlist.f
rename to scilab/modules/data_structures/src/fortran/mlist.f
index 70b4139..ef10a99 100644 (file)
@@ -2,7 +2,7 @@
 c     create a tlist whose type description is given by external\r
 c     function typdsc\r
 c\r
-      include '../stack.h'\r
+      include 'stack.h'\r
       integer iadr,sadr\r
       external typdsc\r
 c\r
similarity index 92%
rename from scilab/routines/interf/udptr.f
rename to scilab/modules/data_structures/src/fortran/udptr.f
index 6bb414e..0735f51 100644 (file)
@@ -10,7 +10,7 @@ c     dvol: difference of the old and new sizes of the modified entry
 c!\r
       integer ind(*),dvol\r
       integer iadr,sadr\r
-      include '../stack.h'\r
+      include 'stack.h'\r
 \r
 c\r
       iadr(l)=l+l-1\r
@@ -42,7 +42,7 @@ c     nind: size of the path
 c     !\r
       integer ind(nind)\r
       integer iadr,sadr\r
-      include '../stack.h'\r
+      include 'stack.h'\r
 c     \r
       iadr(l)=l+l-1\r
       sadr(l)=(l/2)+1\r
index 17a5617..b09f098 100644 (file)
@@ -13,7 +13,7 @@
 #define __SCI_OBJECT_STRUCTURE__
 
 #ifdef _MSC_VER
-#undef Top /* REORGANISATION TEMPORAIRE */
+#undef Top 
 #include <windows.h>
 #define Top C2F(vstk).top
 #endif
index fbd5226..88d325d 100644 (file)
@@ -11,7 +11,7 @@
 #include "DrawObjects.h"
 #include "Graphics.h"
 #include "BuildObjects.h"
-#include "HandleManagement.h" /* REORGANISATION TEMPORAIRE */
+#include "HandleManagement.h"
 
 /*-----------------------------------------------------------------------------------*/
 int sci_draw( char * fname, unsigned long fname_len )
index 119509e..b21b15c 100644 (file)
   #include "pvm3.h"
 #endif
 #include "machine.h"
-
-/* REORGANISATION TEMPORAIRE */
-#include "../../../routines/calelm/sci_tools.h"
-
-
+#include "sci_tools.h"
 #include "sci_pvm.h"
 
 
index 31f35bd..a3f2f1d 100644 (file)
@@ -21,9 +21,7 @@
 #endif
 #include "machine.h"
 #include "stack-c.h"
-
-/* REORGANISATION TEMPORAIRE */
-#include "../../../routines/calelm/sci_tools.h"
+#include "sci_tools.h"
 
 
 #include "sci_pvm.h"
index 898a260..141c9e5 100644 (file)
 #endif
 #include "machine.h"
 #include "stack-c.h"
-
-
-/* REORGANISATION TEMPORAIRE */
-#include "../../../routines/calelm/sci_tools.h"
-
-
+#include "sci_tools.h"
 #include "sci_pvm.h"
 
 
diff --git a/scilab/routines/Make.lib b/scilab/routines/Make.lib
deleted file mode 100644 (file)
index 23874c2..0000000
+++ /dev/null
@@ -1,36 +0,0 @@
-# CFLAGS IS CHANGED LOCALLY FOR EACH SUBDIR 
-# CFLAGS = $(CC_OPTIONS) 
-# or 
-# CFLAGS = $(CC_OPTIONS) $(XFLAGS)
-
-# FFLAGS IS CHANGED LOCALLY FOR EACH SUBDIR
-# FFLAGS = $(FC_OPTIONS)
-# or, e.g.,
-# FFLAGS = $(FC_OPTIONS) $(EXTRA_OPTIONS)
-
-OBJS = $(OBJSC) $(OBJSF)
-
-all:: $(LIBRARY)
-
-$(LIBRARY): $(OBJS)
-       @echo Creation of $(LIBRARY)
-       @$(RM) $@
-       @$(AR) $@ $(OBJS)
-       @$(RANLIB) $@
-
-clean::
-       $(RM) $(OBJSC) $(OBJSF)
-
-cleanC :
-       $(RM) $(OBJSC)
-
-cleanF :
-       $(RM) $(OBJSF)
-
-F2CFILES=$(OBJSF:.o=.c)
-
-f2cclean       :
-       $(RM) $(F2CFILES)
-
-distclean::
-       $(RM) $(OBJSC) $(OBJSF) $(LIBRARY)
diff --git a/scilab/routines/Make.lib.mak b/scilab/routines/Make.lib.mak
deleted file mode 100755 (executable)
index 469e423..0000000
+++ /dev/null
@@ -1,55 +0,0 @@
-# CFLAGS IS CHANGED LOCALLY FOR EACH SUBDIR 
-# CFLAGS = $(CC_OPTIONS) 
-# or 
-# CFLAGS = $(CC_OPTIONS) $(XFLAGS)
-
-FFLAGS = $(FC_OPTIONS)
-
-OBJS = $(OBJSC) $(OBJSF)
-
-all:: $(LIBRARY)
-
-# standard library 
-
-$(LIBRARY): $(OBJS)
-       @echo Creation of $(LIBRARY)
-       @$(LINKER) -lib $(OBJS) /nologo /out:"$@" 
-       @echo Done
-
-# A partial def file (without headers) for the library 
-# to build a scilex.def 
-
-DEF=$(LIBRARY:.lib=.def)
-
-all:: $(DEF)
-
-$(DEF) : $(OBJS) 
-       @echo Creation of $(DEF)
-       @$(SCIDIR1)\bin\dumpexts.exe -o $(DEF) -n scilex.dll $(OBJS)
-
-# Not used up to now 
-
-DLL=$(LIBRARY:.lib=.dll)
-
-dll:: $(DLL)
-
-$(DLL) : $(OBJS) 
-       @echo Creation of dll $(DLL) and import lib 
-       $(LINKER) $(OBJS) $(DLL_LIBS) $(GUILIBS) /dll /out:"$*.dll" /implib:"$*.ilib" $(LINKER_FLAGS) /MAP:"$*.map"  /def:"$*.def"
-
-# /PDB:NONE
-
-clean:: cleanC cleanF 
-
-cleanC :
-       -del *.obj
-
-cleanF :
-       -del *.obj
-
-distclean::
-       -del *.obj
-
-
-# won't work since LIBRARY is a path with \ del $(LIBRARY)
-
diff --git a/scilab/routines/Makefile.in b/scilab/routines/Makefile.in
deleted file mode 100644 (file)
index f1ad43b..0000000
+++ /dev/null
@@ -1,43 +0,0 @@
-SHELL = /bin/sh
-
-include ../Makefile.incl
-
-SCIDIRS = graphics calelm blas  control default integ interf intersci \
-       lapack slicot arpack \
-       metanet optim poly signal sparse os_specific system system2 console\
-       menusX scicos fileio dcd randlib slicot arpack wintools\
-       gd int time sound xsci @XDRLIB@ @TCLSCIDIR@ @PVMSCIDIR@ 
-
-SUBDIRS = $(XAW_LOCAL_SUBDIR) $(DLD_SUBDIR) $(SCIDIRS) @F2C_SUBDIR@
-
-all::
-       @case '${MFLAGS}' in *[ik]*) set +e;; esac; \
-       for i in $(SUBDIRS) ;\
-       do \
-               (cd $$i ; echo "making all in routines/$$i..."; \
-               $(MAKE) $(MFLAGS) all); \
-       done
-
-distclean::
-       @case '${MFLAGS}' in *[ik]*) set +e;; esac; \
-       for i in X11 dld $(SCIDIRS) ;\
-       do \
-               (cd $$i ; echo "making distclean in routines/$$i..."; \
-               $(MAKE) $(MFLAGS)  distclean); \
-       done
-
-clean::
-       @case '${MFLAGS}' in *[ik]*) set +e;; esac; \
-       for i in $(SUBDIRS) ;\
-       do \
-               (cd $$i ; echo "making clean in routines/$$i..."; \
-               $(MAKE) $(MFLAGS) clean); \
-       done
-
-f2cclean::
-       @case '${MFLAGS}' in *[ik]*) set +e;; esac; \
-       for i in $(SUBDIRS) ;\
-       do \
-               (cd $$i ; echo "making f2cclean in routines/$$i..."; \
-               $(MAKE) $(MFLAGS) f2cclean); \
-       done
diff --git a/scilab/routines/callinter.h b/scilab/routines/callinter.h
deleted file mode 100644 (file)
index 31faf51..0000000
+++ /dev/null
@@ -1,108 +0,0 @@
-c     Copyright INRIA 
-
-c     this  include file contains code relative to interfaces calling. 
-c     We use
-c     include file instead of subroutine to avoid recursion pbs. This file
-c     must be included in each routine which compute an external
- 60   call  parse
-      if(fun.eq.99) then
-         fun=0
-         goto 200
-      endif
-      if(err.gt.0) goto 97
-c     
-
-      if(int(rstk(pt)/100).eq.9) then
-         ir=rstk(pt)-900
-         if(ir.eq.1) then
-c     .     back to matsys
-            k=13
-         elseif(ir.ge.2.and.ir.le.9) then
-c     .     back to matio
-            k=5
-         elseif(ir.eq.10) then
-c     .     end of overloaded function
-            goto 96
-         elseif(ir.gt.40) then
-c     .     back to matus2
-            k=24
-         elseif(ir.gt.20) then
-c     .     back to matusr
-            k=14
-         else
-            goto 89
-         endif
-         iflagint=0
-         goto 95
-      endif
-c
- 89   if(top.lt.rhs ) then
-         call error(22)
-         goto 97
-      endif
-
-      if(top-rhs+lhs+1.ge.bot) then
-         call error(18)
-         goto 97
-      endif
-      toperr=top-max(0,rhs)
-      goto 91
-c     
- 90   if(err.gt.0) goto 97
- 91   k=fun
-      fun=0
-      if(k.eq.krec) then
-         krec=-1
-         call error(22)
-         goto 97
-      endif
-      krec=-1
-      if (k.eq.0 ) goto 60 
- 95   continue
-
-      if (.not.allowptr(k)) call ref2val
-      krec=k
-
-      call callinterf(k,iflagint)
-C      if (k.eq.krec) krec=99999
-      krec=-1
-      if(fun.ge.0) then
-         if (top-lhs+1.gt.0) call iset(rhs,0,infstk(top-lhs+1),1)
-         if(paus.gt.0) goto 91
-        if (err1.gt.0) top=toperr
-         goto 90
-      endif
-c     called interface ask for a scilab function to perform the function (fun=-1)
-c     the function name is given in ids(1,pt+1)
-
-c     call ref2val removed here because if forces overloading function to
-C     be called by value
-c     call ref2val 
-
-      fun=0
-      call funs(ids(1,pt+1))
-      if(err.gt.0) goto 97
-      if(fun.gt.0) then
-         if (isbyref(fun).eq.0) call ref2val
-         goto 91
-      endif
-      if(fin.eq.0) then
-         call error(246)
-         if(err.gt.0) goto 97
-        goto 90
-      endif
-      pt=pt+1
-      fin=lstk(fin)
-      rstk(pt)=910
-      icall=5
-      fun=0
-c     *call*  macro
-      goto 60
- 96   pt=pt-1
-      goto 90
-c     error handling
- 97   if(niv.gt.0.and.paus.gt.0) then
-         fun=0
-         goto 60
-      endif
-      goto 9999
diff --git a/scilab/routines/graphics/DestroyObjects.h b/scilab/routines/graphics/DestroyObjects.h
deleted file mode 100644 (file)
index 4f00052..0000000
+++ /dev/null
@@ -1,71 +0,0 @@
-/*------------------------------------------------------------------------
- *    Graphic library 
- *    Copyright INRIA
- *    newGraph Library header
- *    Matthieu PHILIPPE, INRIA 2001-2002
- *    Djalel ABDEMOUCHE, INRIA 2002-2004
- *    Fabrice Leray,     INRIA 2004-xxxx
- *    Comment:
- *    This file contains all functions used to BUILD new objects : 
- - break the binding between the deleted object and its parent in the 
- existing hierarchy
- - freeing memory
- --------------------------------------------------------------------------*/
-
-#include "ObjectStructure.h"
-#include "HandleManagement.h"
-
-
-#ifndef __SCI_DESTROY__
-#define __SCI_DESTROY__
-
-
-
-extern int DestroyAllGraphicsSons (sciPointObj * pthis); /* DESTROY */
-extern int DestroyFigure (sciPointObj * pthis); /* DESTROY */
-extern int DestroyStatusBar (sciPointObj * pthis); /* DESTROY */
-extern int DestroySubWin (sciPointObj * pthis); /* DESTROY */
-extern int DestroyScrollV (sciPointObj * pthis); /* DESTROY */
-extern int DestroyScrollH (sciPointObj * pthis); /* DESTROY */
-extern int deallocateText( sciPointObj * pthis ) ;
-extern int DestroyText (sciPointObj * pthis); /* DESTROY */
-extern int DestroyTitle (sciPointObj * pthis); /* DESTROY */
-extern int DestroyLegend (sciPointObj * pthis); /* DESTROY */
-extern int DestroyPolyline (sciPointObj * pthis); /* DESTROY */
-extern int DestroyArc (sciPointObj * pthis); /* DESTROY */
-extern int DestroyRectangle (sciPointObj * pthis); /* DESTROY */
-extern int DestroySurface (sciPointObj * pthis); /* DESTROY */
-extern int DestroyMerge (sciPointObj * pthis); /* DESTROY */
-extern int DestroyGrayplot (sciPointObj * pthis); /* DESTROY */
-extern int DestroyAxes (sciPointObj * pthis); /* DESTROY */
-extern int DestroyFec (sciPointObj * pthis); /* DESTROY */
-extern int DestroySegs (sciPointObj * pthis); /* DESTROY */
-extern int DestroyCompound (sciPointObj * pthis);
-
-extern void DeleteObjs(int win); /* DESTROY */
-extern int sciUnCompound (sciPointObj * pobj); /* DESTROY */
-
-extern int sciDelGraphicObj (sciPointObj * pthis); /* DESTROY */
-
-extern int DestroyLabel (sciPointObj * pthis); /* DESTROY */
-extern int DestroyUimenu (sciPointObj * pthis); /* DESTROY */
-
-/* UNUSED : */
-
-extern int sciDelLabelsMenu (sciPointObj * pthis);
-extern int DestroyMenuContext (sciPointObj * pthis);
-extern int DestroySciMenu (sciPointObj * pthis);
-
-
-/* ADDED */
-
-extern void delete_sgwin_entities(int win_num,int v_flag);
-
-/* free the user_data */
-extern void clearUserData( sciPointObj * pObj ) ;
-
-extern void sciDeleteWindow( int winNum ) ;
-
-extern int updateMerge( sciPointObj * pSubwin ) ;
-
-#endif /* __SCI_DESTROY__ */
diff --git a/scilab/routines/graphics/DrawObjects.h b/scilab/routines/graphics/DrawObjects.h
deleted file mode 100644 (file)
index 724caa7..0000000
+++ /dev/null
@@ -1,246 +0,0 @@
-/*------------------------------------------------------------------------
- *    Graphic library 
- *    Copyright INRIA
- *    newGraph Library header
- *    Matthieu PHILIPPE, INRIA 2001-2002
- *    Djalel ABDEMOUCHE, INRIA 2002-2004
- *    Fabrice Leray,     INRIA 2004-2006
- *    Jean-Baptiste Sylvi INRIA 2006-xxxx
- *    Comment:
- *    This file contains all functions used to Draw the content of a window.
- *    The main functions is sciDrawObj that draws the objects recursively.
- --------------------------------------------------------------------------*/
-
-#include "ObjectStructure.h"
-#include "HandleManagement.h"
-
-
-#ifndef __SCI_DRAWINGS__
-#define __SCI_DRAWINGS__
-
-#define spINSIDE_SPARSE /* F.Leray to have LARGEST_REAL*/
-#if defined(THINK_C)
-#include "::sparse:spConfig.h" 
-#else
-/* REORGANISATION TEMPORAIRE */
-#include "../../modules/sparse/includes/spConfig.h"
-#endif
-
-#include "bcg.h"
-#include "PloEch.h"
-#include "Vect2Matrix.h"
-#include "StringMatrix.h"
-
-void wininfo  __PARAMS((char *fmt,...));
-
-extern void GPopupResize();
-/* static struct BCG *tmpScilabXgc; */
-
-extern void newfec __PARAMS((integer *xm,integer *ym,double *triangles,double *func,integer *Nnode,
-                            integer *Ntr,double *zminmax, integer *colminmax, integer *colout, BOOL with_mesh));
-extern void GraySquare1(integer *x, integer *y, double *z, integer n1, integer n2);
-extern void GraySquare1_NGreverse(integer *x, integer *y, double *z, integer n1, integer n2, sciPointObj * psubwin);
-
-extern void GraySquare(integer *x, integer *y, double *z, integer n1, integer n2);
-extern void GraySquareDirect(integer *x, integer *y, double *z, integer n1, integer n2); /* for NG, grayplot direct mode */
-extern void GraySquareScaled(integer *x, integer *y, double *z, integer n1, integer n2); /* for NG, grayplot direct mode */
-extern void Plo2d1RealToPixel(integer *n1, integer *n2, double *x, double *y, integer *xm, integer *ym, char *xf);
-extern void Plo2d2RealToPixel __PARAMS((integer *n1, integer *n2, double *x, double *y, integer *xm, integer *ym, char *xf));
-extern void Plo2d3RealToPixel __PARAMS((integer *n1, integer *n2, double *x, double *y, integer *xm, integer *ym, char *xf));
-extern void Plo2d4RealToPixel __PARAMS((integer *n1, integer *n2, double *x, double *y, integer *xm, integer *ym, char *xf));
-extern void sciChamp2DRealToPixel __PARAMS((integer *xm,integer *ym,integer *zm,integer *na,
-                                        integer *arsize,double *x,double *y,
-                                         double  *fx,double *fy,integer *n1,integer *n2,double *arfact, int * typeofchamp));
-
-char ** FreeUserLabels(char ** u_xlabels, int *u_nxgrads);
-double * AllocUserGrads(double * u_xgrads, int nb);
-int CopyUserGrads(double *u_xgrad_SRC, double *u_xgrad_DEST, int dim);
-char ** AllocAndSetUserLabelsFromMdl(char ** u_xlabels, char ** u_xlabels_MDL, int u_nxgrads);
-
-extern int cf_type; /* used by gcf to determine if current figure is a graphic (1) or a tksci (0) one */
-
-
-/*******************************************************/
-
-#ifdef _MSC_VER
-extern HFONT sciCreateFont (HDC hdc, char *szFaceName, int iDeciPtHeight, int iDeciPtWidth, int iAttributes, BOOL fLogRes);  /* DRAWINGS */
-extern HDC sciGetDC (sciPointObj * pobj);     /* DRAWINGS */
-/* extern HDC sciGetHDC (sciPointObj * pobj);    /\* DRAWINGS *\/ */ /* inexistant in Entities.c */
-#endif
-
-
-extern void sciRedrawFigure(); /* DRAWINGS */
-extern void sciRedrawF(int *num); /* DRAWINGS */
-extern void sciXbasc();  /* DRAWINGS */
-extern void sciXClearFigure(); /* DRAWINGS */
-extern void sciXclear(); /* DRAWINGS */
-extern void sciXdraw();  /* DRAWINGS */
-/* 3 next are in plo3d.c*/
-extern void SetEch3d1(double *xbox, double *ybox, double *zbox, double *bbox, double *teta, double *alpha, integer flag); /* DRAWINGS */
-extern void Convex_Box(double *xbox, double *ybox, integer *InsideU, integer *InsideD, char *legend, integer *flag, double *bbox); /* DRAWINGS */
-extern void DrawAxis(double *xbox, double *ybox, integer *Indices, integer style); /* DRAWINGS */
-
-extern void axis_3ddraw(sciPointObj *pobj, double *xbox, double *ybox, double *zbox, integer *InsideU, integer *InsideD); /* DRAWINGS */
-extern void triedre(sciPointObj *pobj, double *xbox, double *ybox, double *zbox, integer *InsideU, integer *InsideD); /* DRAWINGS */
-extern void Nextind(integer ind1, integer *ind2, integer *ind3); /* DRAWINGS */
-extern int trans3d(sciPointObj *pobj,integer n,integer *xm,integer *ym,double *x, double *y,double *z); /* DRAWINGS */
-extern int GradLog(double _min, double _max, double *_grads, int * n_grads, int compNgrads );
-extern BOOL Ishidden(sciPointObj *pobj); /* DRAWINGS */
-extern BOOL IsDownAxes(sciPointObj *pobj); /* DRAWINGS */
-extern void Plo2dTo3d(integer type, integer *n1, integer *n2, double *x, double *y, double *z, double *x1, double *y1, double *z1); /* DRAWINGS */
-extern void sciGetDisplayedBounds( sciPointObj * pSubWin,
-                                   double      * xmin   ,
-                                   double      * xmax   ,
-                                   double      * ymin   ,
-                                   double      * ymax   ,
-                                   double      * zmin   ,
-                                   double      * zmax    ) ;
-extern void updateScale3d( sciPointObj * pobj    ,
-                           double        dbox[6] ,
-                           double        xbox[6] ,
-                           double        ybox[6] ,
-                           double        zbox[6]  ) ;
-extern BOOL sci_update_frame_bounds_3d(sciPointObj *pobj);  /* DRAWINGS */
-extern BOOL sci_update_frame_bounds_2d(sciPointObj *pobj);  /* DRAWINGS */
-
-extern void rebuild_strflag( sciPointObj * psubwin, char * STRFLAG); /* DRAWINGS */
-extern int labels2D_draw(sciPointObj * psubwin); /* DRAWINGS */
-
-extern int ComputeC_format(sciPointObj * pobj, char * c_format); /* DRAWINGS */ /* inside matdes.c */
-extern int ComputeNbSubTics(sciPointObj * pobj, int nbtics, char logflag, double * grads, int nbsubtics_input); /* DRAWINGS */
-extern int ComputeNbSubTicsFor3dUse(sciPointObj * pobj, int nbtics, char logflag, double * grads, int nbsubtics_input);
-extern int  ComputeCorrectXindAndInsideUD(double Teta,double Alpha, double * dbox, integer *xind, integer *InsideU, integer *InsideD); /* DRAWINGS */
-extern int Axes3dStrings2(integer *ixbox, integer *iybox, integer *xind); /* DRAWINGS */
-extern int AdaptGraduationsOnZ(int x, int y, int size, integer *Ticsdir, int *fontid, sciPointObj * psubwin, double zminval, double zmaxval, double fx, double fy, double fz);
-extern int AdaptGraduationsOnXBottomRight(int iof, int x, int y, int size, integer *Ticsdir, int *fontid, sciPointObj * psubwin, double xminval, double xmaxval, double fx, double fy, double fz);
-extern int AdaptGraduationsOnYBottomRight(int iof, int x, int y, int size, integer *Ticsdir, int *fontid, sciPointObj * psubwin, double yminval, double ymaxval, double fx, double fy, double fz);
-extern int AdaptGraduationsOnXBottomLeft(int iof, int x, int y, int size, integer *Ticsdir, int *fontid, sciPointObj * psubwin, double xminval, double xmaxval, double fx, double fy, double fz);
-extern int AdaptGraduationsOnYBottomLeft(int iof, int x, int y, int size, integer *Ticsdir, int *fontid, sciPointObj * psubwin, double yminval, double ymaxval, double fx, double fy, double fz);
-
-extern int CheckDisplay(double fact_h, double fact_w, char logflag, char *foo,int *posi,int *fontid,int *old_rect);
-
-extern int IsInsideRectangle(int * rect, int *point);
-
-extern int CheckIfiisNan(int j, int dim, int * tab); /* DRAWINGS */
-extern int  BuildXYZvectForClipping_IfNanOrLogON(sciPointObj *ppolyline, sciPointObj * psubwin, int * nb_curves, 
-                                                double *** xvect, double *** yvect, double *** zvect, int ** curves_size); /* DRAWINGS */
-extern int ComputeGoodTrans3d( sciPointObj * psubwin, int n, int *xm, int *ym, double * fx, double *fy, double *fz); /* DRAWINGS */
-extern double InvAxis(double min, double max, double u); /* DRAWINGS */
-extern int ReverseDataFor3D(sciPointObj * psubwin, double * xvect, double * yvect, double * zvect, int n1); /* DRAWINGS */
-extern int ReverseDataFor3DXonly(sciPointObj * psubwin, double * xvect, int n1); /* DRAWINGS */
-extern int ReverseDataFor3DYonly(sciPointObj * psubwin, double * yvect, int n1); /* DRAWINGS */
-extern int ReverseDataFor3DZonly(sciPointObj * psubwin, double * zvect, int n1); /* DRAWINGS */
-extern void DrawAxesIfRequired(sciPointObj*); /* DRAWINGS */
-extern void DrawAxes(sciPointObj*); /* DRAWINGS */
-
-extern void UpdateSubwinScale(sciPointObj * pobj); /* DRAWINGS */
-
-extern void sciClip (sciPointObj *pobj); /* DRAWINGS */
-extern void sciUnClip (sciPointObj *pobj); /* DRAWINGS */
-
-extern int sciDrawObj (sciPointObj * pobj); /* DRAWINGS */
-extern int sciDrawObjIfRequired (sciPointObj * pobj); /* DRAWINGS */
-extern int sciRefreshObj( sciPointObj * pobj ) ; /* DRAWINGS */
-
-
-extern int ComputeXIntervals(sciPointObj *pobj, char xy_type, double **vector, int * N, int checkdim); /* DRAWINGS */ /* inside matdes.c */
-
-/* Other functions coming from Entities.c (old file) */
-
-
-/*F.Leray : Format pour imprimer un nombre de la forme k10^a ; cf. Axes.c*/
-extern void NumberFormat __PARAMS((char *str,integer k,integer a));
-extern void C2F(plot3dn)(sciPointObj *pobj, 
-                        double *x, double *y, double *z, 
-                        integer *p, integer *q, int *DPI);
-
-extern void C2F(fac3dn)(sciPointObj *pobj, 
-                       double *x, double *y, double *z, 
-                       double *cvect, integer *p, integer *q, int *DPI);
-/**DJ.Abdemouche 2003**/
-
-extern int Gen3DPoints (integer type,integer *polyx,integer *polyy,integer *fill,integer whiteid,double zmin,double zmax,double *,double *,double *,integer i,integer j,integer jj1,integer *p,integer dc,integer fg, sciPointObj *psurface); /* DRAWINGS */
-extern void Merge3d(sciPointObj *psubwin);/*DJ.A merge*/   /* DRAWINGS */
-extern void Merge3dBuildTable(sciPointObj *pparent, int *index_in_entity, long *from_entity, int *pos);
-extern int Merge3dDimension(sciPointObj *pparent);
-extern void DrawMerge3d(sciPointObj *psubwin, sciPointObj *pmerge, int *DPI);  /* DRAWINGS */
-
-extern int DrawNewMarks(sciPointObj * pobj, int n1, int *xm, int *ym, int *DPI);
-extern void DrawMarks3D(sciPointObj *pobj, int n1, int *xm, int *ym, int *DPI);
-extern int CheckPixelStatus(void);
-
-extern int DrawMark_FullDot(int x1, int yy1, double size, int foreground, int background, int pixel_offset);
-extern int DrawMark_Plus(int xmi, int ymi, int size, int foreground, int pixel_offset);
-extern int DrawMark_Cross(int xmi, int ymi, int size, int foreground, int pixel_offset);
-extern int DrawMark_FullDiamond(int xmi, int ymi, int size, int foreground, int background);
-extern int DrawMark_FullTriangleUp(int xmi, int ymi, int size, int foreground, int background);
-extern int DrawMark_FullTriangleDown(int xmi, int ymi, int size, int foreground, int background);
-extern int DrawMark_Asterisk(int xmi, int ymi, int size, int foreground, int pixel_offset);
-extern int DrawMark_FullSquare(int xmi, int ymi, int size, int foreground, int background, int pixel_offset);
-extern int DrawMark_FullTriangleRight(int xmi, int ymi, int size, int foreground, int background);
-extern int DrawMark_FullTriangleLeft(int xmi, int ymi, int size, int foreground, int background);
-extern int DrawMark_FullPentagram(int xmi, int ymi, int size, int foreground, int background);
-extern int GetDPIFromDriver(int * DPI);
-extern int ChooseFormatForOneGrad(char *c_format, double *grad);
-extern int SetMinMaxVertices(Vertices *vertices_list, double *xmin, double *ymin, double *zmin, double *xmax, double *ymax, double *zmax);
-extern int GetVerticesAt(Vertices *vertices_list, int *xm, int *ym, double *x, double *y, double *z);
-extern int RemoveNext(Vertices *pCurrent);
-extern int FreeVertices(sciPointObj * psubwin);
-extern int ChildrenCounter(sciPointObj *pparent);
-extern int GetBarNumber(sciPointObj * pobj);
-extern double FindWidth(sciPointObj * pobj, int n1, int bar_number, double *x);
-
-extern void sciGetAxisBox( double limits[6], double xbox[8], double ybox[8], double zbox[8] ) ;
-extern void sciUpdateScaleAngles( double theta, double alpha ) ;
-extern void sciAxesVerticesIndices( integer insideU[4],
-                                    integer insideD[4],
-                                    double  xbox[8]   ,
-                                    double  ybox[8]   ,
-                                    integer xind[8]    ) ;
-
-extern void matrixLine2String( char ** matrix, int matrixSize[2], int numLine, char * dest ) ;
-extern void stringBoundingRect( char ** textMatrix, int textSize[2], int textPos[2], int rect[4] ) ;
-extern void getStringBox( char   ** text         ,
-                          double    textPos[2]   ,
-                          int       textSize[2]  ,
-                          BOOL      autoSize     ,
-                          double    userSize[2]  ,
-                          double    angle        ,
-                          int       fontId       , 
-                          int       fontSize     , 
-                          double    corners[4][2] ) ;
-
-extern void getStringsPositions( StringMatrix  * strMat        ,
-                                 int           * fontId        ,
-                                 int           * fontSize      ,
-                                 int             textPos[2]    ,
-                                 BOOL            autoSize      ,
-                                 int             textSize[2]   ,
-                                 BOOL            centerPos     ,
-                                 double          angle         ,
-                                 Vect2iMatrix  * stringPosition,
-                                 int             boundingBox[4][2] ) ;
-
-extern void drawText( sciPointObj * pObj ) ;
-
-extern void rectangleDouble2Pixel( sciPointObj * parentSubWin ,
-                                   double        ulPoint[3]   ,
-                                   double        userSize[2]  ,
-                                   int           edgesX[4]    ,
-                                   int           edgesY[4]     ) ;
-extern void getTextBoundingBox( sciPointObj * pText        ,
-                                int           cornPix[4][2],
-                                double        corners[4][2] ) ;
-
-extern void rotateBoundingBox( int boundingBox[4][2], int center[2], double angle ) ;
-
-extern void getTextAabb( sciPointObj * pText     ,
-                         int           rectPix[4],
-                         int           cornPix[4][2] ) ;
-
-void computeLabelAutoPos( sciPointObj * pLabel, int axisStart[2], int axisEnd[2], int offsets[2] ) ;
-
-void sciDrawFigure( int numFigure ) ;
-
-#endif /* __SCI_DRAWINGS__ */
diff --git a/scilab/routines/graphics/Events.h b/scilab/routines/graphics/Events.h
deleted file mode 100644 (file)
index fcb1e88..0000000
+++ /dev/null
@@ -1,28 +0,0 @@
-
-typedef int (*Scig_click_handler) (int,int,int,int,int,int);
-typedef void (*Scig_deletegwin_handler) (int);
-
-extern int PushClickQueue (int win,int x,int y,int ibut,int motion,int release);
-extern int CheckClickQueue(int *win,int *x,int *y,int *ibut,int *motion,int *release);                  
-extern int ClearClickQueue (int win);
-
-extern int scig_click_handler_none (int win,int x,int y,int ibut,int motion,int release);
-extern int scig_click_handler_sci (int win,int x,int y,int ibut,int motion,int release);
-extern Scig_click_handler set_scig_click_handler (Scig_click_handler f);
-extern void reset_scig_click_handler (void);
-
-extern void scig_deletegwin_handler_none (int win);
-extern void scig_deletegwin_handler_sci (int win);
-extern Scig_deletegwin_handler set_scig_deletegwin_handler (Scig_deletegwin_handler f);
-extern void reset_scig_deletegwin_handler ();
-
-extern void seteventhandler(int *win_num,char *name,int *ierr);
-
-extern void set_delete_win_mode(void);
-extern void set_no_delete_win_mode(void);
-extern int  get_delete_win_mode(void);
-
-extern void set_wait_click(int val);
-extern int  get_wait_click();
-
-Scig_deletegwin_handler scig_deletegwin_handler;
diff --git a/scilab/routines/graphics/GetProperty.h b/scilab/routines/graphics/GetProperty.h
deleted file mode 100644 (file)
index 99d79cb..0000000
+++ /dev/null
@@ -1,193 +0,0 @@
-/*------------------------------------------------------------------------
- *    Graphic library 
- *    Copyright INRIA
- *    newGraph Library header
- *    Matthieu PHILIPPE,   INRIA 2001-2002
- *    Djalel ABDEMOUCHE,   INRIA 2002-2004
- *    Fabrice Leray,       INRIA 2004-2006
- *    Jean-Baptiste Silvy, INRIA 2005-xxxx
- *    Comment:
- *    This file contains all functions used to GET the properties of graphics
- *    objects.
- --------------------------------------------------------------------------*/
-
-#include "ObjectStructure.h"
-#include "HandleManagement.h"
-#include "StringMatrix.h"
-
-#ifndef __SCI_GET_PROPERTY__
-#define __SCI_GET_PROPERTY__
-
-extern void *sciGetPointerToFeature (sciPointObj * pobj); /* GET */
-void sciGetPointerToUserData (sciPointObj * pobj,int ***user_data_ptr, int **size_ptr); /* GET */
-extern sciEntityType sciGetEntityType (sciPointObj * pobj);  /* GET */
-extern char *sciGetCharEntityType (sciPointObj * pobj);  /* GET */
-
-/* Graphic Context Functions */
-extern sciGraphicContext *sciGetGraphicContext (sciPointObj * pobj); /* GET */
-extern int sciGetNumColors (sciPointObj * pobj); /* GET */
-extern int sciGetColormap (sciPointObj * pobj, double *rgbmat); /* GET */
-extern int sciGetNumColors( sciPointObj * pobj ) ; /* GET */
-extern int sciGetGoodIndex(sciPointObj * pobj, int colorindex);  /* GET */
-
-extern int sciGetForegroundToDisplay (sciPointObj * pobj); /* GET */
-extern int sciGetBackgroundToDisplay (sciPointObj * pobj); /* GET */
-
-extern int sciGetBackground (sciPointObj * pobj); /* GET */
-extern int sciGetForeground (sciPointObj * pobj); /* GET */
-extern int sciGetLineWidth (sciPointObj * pobj); /* GET */
-extern BOOL sciGetIsLine (sciPointObj * pobj); /* GET */
-extern int sciGetLineStyle (sciPointObj * pobj); /* GET */
-extern BOOL sciGetIsMark (sciPointObj * pobj); /* GET */
-extern BOOL sciGetIsFilled (sciPointObj * pobj); /* GET */
-EAxesBoxType sciGetBoxType( sciPointObj * pobj ) ; /* GET */
-extern BOOL sciGetIsBoxed (sciPointObj * pobj); /* GET */
-extern int sciGetMarkStyle (sciPointObj * pobj); /* GET */
-extern int sciGetMarkSize (sciPointObj * pobj); /* GET */
-extern int sciGetMarkSizeUnit (sciPointObj * pobj); /* GET */
-extern int sciGetFillStyle (sciPointObj * pobj); /* GET */
-
-/* Text Functions */
-extern sciFont *sciGetFontContext (sciPointObj * pobj);  /* GET */
-extern int sciGetFontDeciWidth (sciPointObj * pobj); /* GET */
-extern int sciGetFontOrientation (sciPointObj * pobj); /* GET */
-extern StringMatrix * sciGetText (sciPointObj * pobj); /* GET */
-extern void sciGetTextSize( sciPointObj * pobj, int * nbRow, int * nbCol ) ; /* GET */
-extern unsigned int sciGetTextLength (sciPointObj * pobj); /* GET */
-
-extern int sciGetFontBackground (sciPointObj * pobj); /* GET */
-extern int sciGetFontForeground (sciPointObj * pobj); /* GET */
-extern int sciGetMarkBackground (sciPointObj * pobj); /* GET */
-extern int sciGetMarkForeground (sciPointObj * pobj); /* GET */
-/* F.Leray 09.04.04*/
-extern int sciGetFontBackgroundToDisplay (sciPointObj * pobj); /* GET */
-extern int sciGetFontForegroundToDisplay (sciPointObj * pobj); /* GET */
-extern int sciGetMarkBackgroundToDisplay (sciPointObj * pobj); /* GET */
-extern int sciGetMarkForegroundToDisplay (sciPointObj * pobj); /* GET */
-
-extern int sciGetFontStyle (sciPointObj * pobj); /* GET */
-extern char *sciGetFontName (sciPointObj * pobj); /* GET */
-extern unsigned int sciGetFontNameLength (sciPointObj * pobj); /* GET */
-extern double sciGetTextPosX (sciPointObj * pobj); /* GET */
-extern double sciGetTextPosY (sciPointObj * pobj); /* GET */
-extern double sciGetTextPosWidth (sciPointObj * pobj); /* GET */
-extern double sciGetTextPosHeight (sciPointObj * pobj); /* GET */
-
-/*Title Functions */
-extern POINT2D sciGetTitlePos (sciPointObj * pobj); /* GET */
-extern sciTitlePlace sciGetTitlePlace (sciPointObj * pobj); /* GET */
-
-/* Legend */
-extern sciLegendPlace sciGetLegendPlace (sciPointObj * pobj);
-extern POINT2D sciGetLegendPos (sciPointObj * pobj);
-
-/* Figure / Subwin main functions */
-extern sciPointObj *sciGetParentFigure (sciPointObj * pobj); /* GET */
-extern sciPointObj *sciGetParentSubwin (sciPointObj * pobj); /* GET */
-extern int sciGetNumFigure (sciPointObj * pobj); /* GET */
-extern struct BCG *sciGetScilabXgc (sciPointObj * pobj); /* GET */
-
-/* GMODE */
-extern scigMode *sciGetGraphicMode (sciPointObj * pobj);  /* GET */
-extern int sciGetIsClipRegionValuated (sciPointObj * pobj);
-extern int sciGetIsClipping (sciPointObj * pobj); /* GET */
-extern double *sciGetClipping (sciPointObj * pobj); /* GET */
-extern BOOL sciGetHighLight (sciPointObj * pobj);  /* GET */
-extern BOOL sciGetAddPlot (sciPointObj * pobj);  /* GET */
-extern BOOL sciGetAutoScale (sciPointObj * pobj);  /* GET */
-extern BOOL sciGetZooming (sciPointObj * pobj);  /* GET */
-extern BOOL sciGetGraphicsStyle (sciPointObj * pobj);  /* GET */
-extern int sciGetXorMode (sciPointObj * pobj);  /* GET */
-extern BOOL sciGetVisibility (sciPointObj * pobj);  /* GET */
-extern BOOL sciGetResize (sciPointObj * pobj);  /* GET */
-
-
-/* Window Functions */
-extern char *sciGetName (sciPointObj * pobj);  /* GET */
-extern int sciGetNameLength (sciPointObj * pobj);  /* GET */
-extern int sciGetNum (sciPointObj * pobj);  /* GET */
-extern double sciGetWidth (sciPointObj * pobj);   /* GET */
-extern double sciGetHeight (sciPointObj * pobj);  /* GET */
-extern void sciGetDim( sciPointObj * pobj, int * pWidth, int * pHeight ) ; /* GET */
-extern int sciGetFigurePosX (sciPointObj * pobj);  /* GET */
-extern int sciGetFigurePosY (sciPointObj * pobj);  /* GET */
-extern BOOL sciGetIsFigureIconified (sciPointObj * pobj);  /* GET */
-extern int sciGetSubwindowPosX (sciPointObj * pobj);  /* GET */
-extern int sciGetSubwindowPosY (sciPointObj * pobj);  /* GET */
-extern BOOL sciGetIsSelected (sciPointObj * pobj);  /* GET */
-extern sciPointObj *sciGetSelectedSon (sciPointObj * pobj);  /* GET */
-extern sciPointObj *sciGetSelectedSubWin (sciPointObj * pparent);  /* GET */
-extern sciPointObj *sciIsExistingSubWin (double *WRect); /* GET */ /* WARNING special case here */
-extern sciPointObj *sciIsExistingFigure(int *value); /* GET */ /* WARNING special case here */
-extern int sciGetScrollPosV (sciPointObj * pobj);  /* GET */
-extern int sciGetScrollPosH (sciPointObj * pobj);  /* GET */
-
-extern sciPointObj * sciGetCurPointedFigure( void ) ; /* GET */
-extern sciPointObj * sciGetCurrentFigure (); /* GET */
-extern struct BCG *sciGetCurrentScilabXgc (); /* GET */
-extern BOOL sciGetReplay (); /* GET */
-
-
-extern double *sciGetPoint (sciPointObj * pthis, int *num, int *numco); /* GET */
-extern sciPointObj *sciGetObjClicked (sciPointObj *pthis,int x, int y); /* GET */ /* unused */
-extern BOOL sciIsClicked(sciPointObj *pthis,int x, int y);  /* GET */
-
-extern BOOL sciGetdrawmode (sciPointObj *pobj); /* GET */
-extern sciPointObj *sciGetAxes (sciPointObj *pparentfigure,sciPointObj *psubwin); /* GET */
-
-
-extern int sciType (char *marker, sciPointObj *pobj); /* GET */
-
-extern void sciGetIdFigure (int *vect, int *id, int *flag); /* GET */
-extern int version_flag(); /* GET */
-extern unsigned int sciGetFontNameLength (sciPointObj * pobj); /* GET */
-/* extern struct BCG *sciGetCurrentScilabXgc (); /\* GET *\/ */
-
-extern sciPointObj *sciGetSurface(sciPointObj *psubwin); /* GET */
-
-extern sciPointObj *CheckClickedSubwin(integer x, integer y); /* GET */
-
-/* extern BOOL GetIsAxes(sciPointObj *psubwin); /\* GET *\/ */
-extern BOOL GetIsAxes2D(sciPointObj *psubwin); /* GET */
-
-extern int CheckForCompound (long *tabpointobj, int number); /* GET */
-extern sciPointObj *sciGetMerge(sciPointObj *psubwin);  /* GET */
-
-/* UNUSED ? */
-extern sciPointObj *sciGetOriginalSubWin (sciPointObj * pfigure);
-extern HMENU sciGethPopMenu (sciPointObj * pthis);
-
-extern int *sciGetInterpVector(sciPointObj * pobj);
-extern int sciGetPosition (sciPointObj * pobj, double *x, double *y);
-
-extern BOOL sciGetAutoRotation ( sciPointObj * pObj ) ;
-extern BOOL sciGetAutoPosition ( sciPointObj * pObj ) ;
-
-extern BOOL sciGetCenterPos( sciPointObj * pObj ) ;
-
-extern BOOL sciGetIs3d( sciPointObj * pObj ) ;
-
-/**
- * for a subwindow object, return if the its labels (x,y,z) are all
- *       empty or not.
- * @param pObj the subwindow.
- */
-extern BOOL sciGetLegendDefined( sciPointObj * pObj ) ;
-
-extern BOOL sciGetAutoSize( sciPointObj * pObj ) ;
-extern sciTextAlignment sciGetAlignment( sciPointObj * pObj ) ;
-extern void sciGetUserSize( sciPointObj * pObj, double * width, double * height ) ;
-
-extern int sciGetNbChildren( sciPointObj * pObj ) ; /* GET */
-
-extern BOOL sciGetIsAccessibleChild( sciPointObj * pObj ) ; /* GET */
-
-extern int sciGetNbAccessibleChildren( sciPointObj * pObj ) ; /* GET */
-
-extern BOOL GetHandleVisibilityOnUimenu( sciPointObj * pobj ) ; /* GET */
-
-extern int sciGetSubwinNbSurf( sciPointObj * pObj ) ;
-
-extern int sciGetNbTypedObjects( sciPointObj * pObj, sciEntityType type ) ;
-
-#endif /* __SCI_GET_PROPERTY__ */
diff --git a/scilab/routines/graphics/Graphics.h b/scilab/routines/graphics/Graphics.h
deleted file mode 100644 (file)
index d87923f..0000000
+++ /dev/null
@@ -1,694 +0,0 @@
-/*------------------------------------------------------------------------
- *    Graphic library
- *    Copyright (C) 1998-2000 Enpc/Jean-Philippe Chancelier
- *    jpc@cereve.enpc.fr 
- --------------------------------------------------------------------------*/
-
-#ifndef SCIG_PROTO
-#define SCIG_PROTO
-
-#include "../machine.h"
-/* #include "ObjectStructure.h" */
-
-/* Other functions */
-
-extern void sciprint __PARAMS((char *fmt,...));
-extern void sciprint_nd __PARAMS((char *fmt,...));
-extern void Scistring __PARAMS((char *str));
-
-/*Actions.c */
-
-typedef int (*Scig_handler) __PARAMS((int));
-extern Scig_handler set_scig_handler __PARAMS(( Scig_handler f));
-extern Scig_handler scig_handler;
-
-extern int C2F(xg2psofig) __PARAMS((char *,integer *,integer *,integer *,char *,long int,long int)); 
-extern int scig_2dzoom __PARAMS((integer )); 
-extern void scig_unzoom __PARAMS((integer )); 
-extern void scig_replay __PARAMS((integer )); 
-extern void scig_expose __PARAMS((integer )); 
-extern int scig_3drot __PARAMS((integer )); 
-extern void scig_sel __PARAMS((integer )); 
-extern void scig_raise __PARAMS((integer )); 
-extern void scig_loadsg __PARAMS((int ,char *)); 
-extern void scig_resize __PARAMS((integer )); 
-extern void scig_resize_pixmap __PARAMS((integer )); 
-extern void scig_erase __PARAMS((integer )); 
-extern int scig_tops __PARAMS((integer ,integer colored,char *bufname,char *river)); 
-
-/* Alloc.c */
-
-void *graphic_alloc __PARAMS((int indice,int n,unsigned int size));
-void graphic_alloc_info __PARAMS((void));
-void graphic_alloc_free __PARAMS((void));
-
-/* Axes.c */
-
-extern void Sci_Axis __PARAMS((char,char,double *,int *,double *,int*,char *str[],int subtics,char *format,
-                             int fontsize,int textcolor,int fontstyle,int ticscolor,char logflag,int seg_flag , int axisbuild_flag));
-extern void sci_axis __PARAMS((char,char,double *,int *,double *,int*,char *str[],int subtics,char *format,
-                             int fontsize,int textcolor,int fontstyle,int ticscolor,char logflag,int seg_flag));
-extern void axis_draw  __PARAMS(( char strflag[]));
-extern void axis_draw2  __PARAMS(( char strflag[]));
-extern void DrawAxesBackground __PARAMS((void));
-
-extern void ChoixFormatE  __PARAMS((char *fmt,double xmin,double xmax,double xpas)); 
-extern void ChoixFormatE1  __PARAMS((char *fmt,double *x,integer nx)); 
-extern void C2F(aplot)  __PARAMS((integer *,double *,double *,double *,double *,integer *,integer *,char *)); 
-
-/* Champ.c */
-
-extern int C2F(champ)  __PARAMS((double *,double *,double *,double *,integer *,integer *,char *,double *,double *,integer)); 
-extern int C2F(champ1)  __PARAMS((double *,double *,double *,double *,integer *,integer *,char *,double *,double *,integer)); 
-extern void champg  __PARAMS((char *,integer ,double *,double *,double *,double *,integer *,integer *,char *,double *,double *,integer)); 
-       
-       /* Contour.c */
-
-extern int C2F(getconts) __PARAMS((double **x,double **y,integer *mm,integer *n));
-extern int C2F(contour)  __PARAMS((double *,double *,double *,integer *,integer *,integer *,integer *,double *,double *,double *,char *,integer *,double *,double *,integer)); 
-extern int C2F(contour2)  __PARAMS((double *,double *,double *,integer *,integer *,integer *,integer *,double *,integer *,char *,char *,double *,integer *,integer,integer)); 
-extern int C2F(contourif)  __PARAMS((double *,double *,double *,integer *,integer *,integer *,integer *,double *,integer *)); 
-
-       /* FeC.c */
-
-extern int C2F(fec)  __PARAMS((double *,double *,double *triangles,double *func,integer *Nnode,integer *Ntr,char *,char *,double *,integer *, double *, integer *, integer *, integer with_mesh, integer flagNax, integer,integer)); 
-
-/* extern int C2F(fec)  __PARAMS((double *,double *,double *triangles,double *func,integer *Nnode,integer *Ntr,char *,char *,double *,integer *,integer,integer));  */
-
-
-/* Gray.c */
-
-extern int C2F(xgray)  __PARAMS((double *,double *,double *,integer *,integer *,char *,double *,integer *,integer flagNax,long int l1)); 
-
-extern int C2F(xgray1) __PARAMS((double *z,integer *n1,integer *n2,char *strflag,double *brect,integer *aaint,integer flagNax,long int l1));
-
-extern int C2F(xgray2) __PARAMS((double *z,integer *n1,integer *n2,double *xrect));
-
-
-/* Math.c */
-
-extern double Mini  __PARAMS((double *vect,integer));
-extern double Maxi  __PARAMS((double *vect,integer));
-
-       /* Plo2d.c */
-
-extern int C2F(xgrid)  __PARAMS((integer *)); 
-extern void AxisDraw  __PARAMS((double *,integer *,integer *,integer *,integer *,double,double,double,double,char *,char *)); 
-extern void FrameBounds  __PARAMS((char *,double *,double *,integer *,integer *,integer *,char *,double *,double *,integer *,integer *)); 
-extern void Legends  __PARAMS(( integer *,integer *,char *)); 
-extern int C2F(plot2d)  __PARAMS((double *,double *,integer *,integer *,integer *,char *,char *,double *,integer *,integer,integer)); 
-
-/* Plo2d1.c */
-
-extern int CheckxfParam  __PARAMS((char *)); 
-extern int C2F(plot2d1)  __PARAMS((char *,double *,double *,integer *,integer *,integer *,char *,char *,double *,integer *,integer,integer,integer)); 
-
-       /* Plo2d2.c */
-
-extern int C2F(plot2d2)  __PARAMS((char *,double *,double *,integer *,integer *,integer *,char *,char *,double *,integer *,integer,integer,integer)); 
-
-/* Plo2d3.c */
-
-extern int C2F(plot2d3)  __PARAMS((char *,double *,double *,integer *,integer *,integer *,char *,char *,double *,integer *,integer,integer,integer )); 
-
-/* Plo2d4.c */
-
-extern int C2F(plot2d4)  __PARAMS((char *,double *,double *,integer *,integer *,integer *,char *,char *,double *,integer *,integer,integer,integer)); 
-
-/* Plo2dEch.c */
-
-extern void update_frame_bounds  __PARAMS((int cflag,char *xf,double *x,double *y,integer *n1,integer *n2,integer *aaint,char *strflag,double *brect));
-
-void frame_clip_on  __PARAMS((void));
-void frame_clip_off  __PARAMS((void));
-extern int C2F(xechelle2d) __PARAMS((double x[],integer x1[],integer *n1,char dir[],integer lstr));
-extern int C2F(yechelle2d) __PARAMS((double x[],integer x1[],integer *n1,char dir[],integer lstr));
-
-extern void set_scale __PARAMS((char flag[],double subwin[],double frame_values[],int aaint[],char logflag[],double axis[]));
-extern int C2F(graduate)  __PARAMS((double *,double *,double *,double *,integer *,integer *,integer *,integer *,integer *)); 
-
-/* Theticks F.Leray 21.09.04 */
-extern int C2F(theticks) __PARAMS((double *xminv, double *xmaxv, double *grads, int *ngrads));
-extern int TheTicks( double *xminv, double * xmaxv, double * grads, int * ngrads, int compNgrads ) ;
-extern int GradEqual(const double * grads,const int *ngrads);
-
-extern void Cscale2default  __PARAMS((void)); 
-
-
-extern void set_window_scale_with_default  __PARAMS((integer i));
-extern int get_window_scale  __PARAMS((integer,double * )); 
-extern void del_window_scale  __PARAMS((integer)); 
-
-extern void Scale2D  __PARAMS((integer,double *,integer *,integer *,double *,double *,double *,double *,char *));
-extern int C2F(setscale2d)  __PARAMS((double *,double *,char *,integer)); 
-extern int C2F(Nsetscale2d)  __PARAMS((double *,double *,double *,char *,integer)); 
-extern int getscale2d  __PARAMS((double *,double *,char *,double *)); 
-extern void get_margin_in_pixel(integer *);
-extern int C2F(echelle2d)  __PARAMS((double *,double *,integer *,integer *,integer *,integer *, char *,integer)); 
-extern void C2F(echelle2dl)  __PARAMS((double *,double *,integer *,integer *,integer *,integer *,char *)); 
-extern void C2F(ellipse2d)  __PARAMS((double *,integer *,integer *,char *)); 
-extern void C2F(rect2d)  __PARAMS((double *,integer *,integer *,char *)); 
-extern void C2F(axis2d)  __PARAMS((double *,double *,double *,integer *,double *)); 
-extern int zoom  __PARAMS((void)); 
-extern int zoom_get_rectangle    __PARAMS((double bbox[], int *x_pixel, int *y_pixel));
-
-extern void unzoom  __PARAMS((void)); 
-extern void Gr_Rescale  __PARAMS((char *,double *,integer *,integer *,integer *,integer *)); 
-extern void Gr_Rescale2  __PARAMS((char *,double *,integer *,integer *,integer *,integer *)); /* F.Leray 20.04.04 */
-extern void C2F(aplot1)  __PARAMS((double *,integer *,integer *,integer *,integer *npx,integer *npy,char *logflag,double scx,double scy,double xofset,double yofset)); 
-
-       /* Plo3d.c */
-
-int shade __PARAMS(( integer *polyx, integer *polyy, integer *fill, integer polysize, integer flag));
-void GetEch3d1  __PARAMS(( double (*m1)[3],double *,double *,double *,double *));
-void GetEch3d   __PARAMS((void));
-extern void AxesStrings  __PARAMS((integer,integer *,integer *,integer *,char *,double *)); 
-extern void MaxiInd  __PARAMS((double *,integer,integer *,double)); 
-extern void UpNext  __PARAMS((integer ,integer *,integer *)); 
-extern void DownNext  __PARAMS((integer ,integer *,integer *)); 
-extern void TDAxis  __PARAMS((integer flag,double FPval,double LPval,integer *nax,integer *FPoint,integer *LPoint,integer *Ticsdir)); 
-extern void C2F(TDdrawaxis)  __PARAMS((double ,double FPval,double LPval,integer *nax,integer *FPoint,integer *LPoint,integer *Ticsdir)); 
-extern void BBoxToval  __PARAMS((double *,double *,double *,integer ,double *)); 
-extern int I3dRotation  __PARAMS((void)); 
-extern int DPoints1  __PARAMS((integer *polyx,integer *polyy,integer *fill,integer whiteid,double zmin,double zmax,double *,double *,double *,integer i,integer j,integer jj1,integer *p,integer dc,integer fg)); 
-extern int DPoints  __PARAMS((integer *polyx,integer *polyy,integer *fill,integer whiteid,double zmin,double zmax,double *,double *,double *,integer i,integer j,integer jj1,integer *p,integer dc,integer fg)); 
-extern int C2F(plot3d)  __PARAMS((double *,double *,double *,integer *p,integer *q,double *teta,double *,char *,integer *,double *,integer)); 
-extern int C2F(plot3d1)  __PARAMS((double *,double *,double *,integer *p,integer *q,double *teta,double *,char *,integer *,double *,integer)); 
-extern int C2F(fac3d)  __PARAMS((double *,double *,double *,integer *cvect,integer *p,integer *q,double *teta,double *,char *,integer *,double *,integer)); 
-extern int C2F(fac3d1)  __PARAMS((double *,double *,double *,integer *cvect,integer *p,integer *q,double *teta,double *,char *,integer *,double *,integer)); 
-extern int C2F(fac3d2)  __PARAMS((double *,double *,double *,integer *cvect,integer *p,integer *q,double *teta,double *,char *,integer *,double *,integer));
-extern int C2F(fac3d3)  __PARAMS((double *,double *,double *,integer *cvect,integer *p,integer *q,double *teta,double *,char *,integer *,double *,integer));
-extern int C2F(param3d)  __PARAMS((double *,double *,double *,integer *,double *teta,double *,char *,integer *,double *,integer)); 
-extern int C2F(param3d1)  __PARAMS((double *,double *,double *,integer *,integer *,integer *,integer *colors,double *teta,double *,char *,integer *,double *,integer )); 
-extern int C2F(box3d)  __PARAMS((double *,double *,double *)); 
-extern int C2F(geom3d)  __PARAMS((double *,double *,double *,integer *n)); 
-extern void SetEch3d  __PARAMS((double *,double *,double *,double *,double *teta,double *)); 
-extern void SetEch3d1  __PARAMS((double *,double *,double *,double *,double *teta,double *,integer flag)); 
-extern void DrawAxis  __PARAMS((double *,double *,integer *Indices,integer style)); 
-extern void Convex_Box  __PARAMS((double *,double *,integer *,integer *,char *,integer *,double *)); 
-
-
-/* Rec.c */ 
-
-extern void SCPlots  __PARAMS((char *unused,integer *winnumber,integer *,double *,integer *,int,int *,double *)); 
-extern int Check3DPlots  __PARAMS((char *unused,integer *winnumber)); 
-extern int EchCheckSCPlots  __PARAMS((char *unused,integer *winnumber)); 
-extern void Tape_ReplayUndoScale  __PARAMS((char *unused,integer *winnumber)); 
-extern void Tape_ReplayNewScale  __PARAMS((char *unused,integer *winnumber,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void Tape_ReplayNewScale1  __PARAMS((char *unused,integer *winnumber,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void Tape_ReplayNewAngle  __PARAMS((char *unused,integer *winnumber,integer *,integer *,integer *,integer *,integer *,double *theta,double *,double *,double *)); 
- extern void Tape_Replay_Show  __PARAMS((char *unused,integer *winnumber,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void Tape_Replay  __PARAMS((char *unused,integer *winnumber,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void UseColorFlag  __PARAMS((int flag)); 
- extern int  Store  __PARAMS((char *type,char *plot)); 
- extern void CleanPlots  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void StoreXcall1  __PARAMS((char *,char *,integer *,integer,integer *,integer ,integer *,integer ,integer *,integer ,integer *,integer ,integer *,integer ,double *,integer ,double *,integer ,double *,integer ,double *,integer )); 
-
- extern void StoreEch  __PARAMS((char *,double *WRect,double *,char *logflag)); 
- extern void StoreNEch  __PARAMS((char *,char *flag,double *,double *,double *,char *logflag)); 
- extern void StorePlot  __PARAMS((char *,char *f,double *,double *,integer *,integer *,integer *,char *,char *,double *,integer *aint)); 
- extern void StoreGrid  __PARAMS((char *,integer *)); 
- extern void StoreParam3D  __PARAMS((char *,double *,double *,double *,integer *,double *teta,double *,char *,integer *,double *)); 
- extern void StoreParam3D1  __PARAMS((char *,double *,double *,double *,integer *,integer *,integer *,integer *colors,double *teta,double *,char *,integer *,double *)); 
- extern void StorePlot3D  __PARAMS((char *,double *,double *,double *,integer *p,integer *q,double *teta,double *,char *,integer *,double *)); 
- extern void StoreFac3D  __PARAMS((char *,double *,double *,double *,integer *cvect,integer *p,integer *q,double *teta,double *,char *,integer *,double *)); 
-
- extern void StoreFec  __PARAMS((char *,double *,double *,double *triangles,double *func,integer *Nnode,integer *Ntr,char *,char *,double *,integer *, double *, integer *, integer *, int)); 
-
-/* old  extern void StoreFec  __PARAMS((char *,double *,double *,double *triangles,double *func,integer *Nnode,integer *Ntr,char *,char *,double *,integer *)); */
- extern void StoreContour  __PARAMS((char *,double *,double *,double *,integer *,integer *,integer *,integer *,double *,double *teta,double *,char *,integer *,double *,double *zlev)); 
- extern void StoreContour2D  __PARAMS((char *,double *,double *,double *,integer *,integer *,integer *,integer *,double *,integer *,char *,char *,double *,integer *)); 
- extern void StoreGray  __PARAMS((char *,double *,double *,double *,integer *,integer *,char *,double *,integer *)); 
- extern void StoreGray1  __PARAMS((char *,double *,integer *,integer *,char *,double *,integer *)); 
- extern void StoreGray2  __PARAMS((char *,double *,integer *,integer *,double *)); 
- extern void StoreChamp  __PARAMS((char *,double *,double *,double *,double *,integer *,integer *,char *,double *,double *)); 
- extern void StoreXgc  __PARAMS((integer )); 
-extern void StoreSciAxis __PARAMS((char *name,char pos,char xy_type,double *x,int *nx,double *y,int *ny,char **str,int subtics,char *format,int fontsize,int textcolor, int fontstyle,int ticscolor,char logflag,int seg_flag));
-
-/* RecLoad.c  */
-
-extern int C2F(xloadplots)  __PARAMS((char *,integer lvx)); 
-
-/* RecSave.c */ 
-
-extern int C2F(xsaveplots)  __PARAMS((integer *winnumber,char *,integer lxv)); 
-
-/* Xcall.c */
-
-extern int C2F(dr)  __PARAMS((char *,char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *,integer ,integer )); 
-extern void C2F(SetDriver)  __PARAMS((char * ,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-
-extern void GetDriver1  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-
-extern char GetDriver  __PARAMS((void)); 
-extern int GetDriverId __PARAMS((void)); 
-extern int C2F(inttest) __PARAMS((int *)); 
-
-/* Xcall1 */
-
-extern int C2F(xsetg) __PARAMS((char *str,char *str1,integer lx0,integer lx1));
-extern int C2F(xgetg) __PARAMS((char *str,char *str1,integer *len,integer lx0,integer lx1));
-extern char *getFPF __PARAMS((void));
-extern int C2F(dr1)  __PARAMS((char * ,char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *,integer ,integer )); 
-
-/* periFig.c */
-
-extern void C2F(getcursymbolXfig)  __PARAMS((integer *,integer *,integer *,double *)); 
-extern void C2F(semptyXfig)  __PARAMS((integer *,integer *,integer *,integer *)); 
-extern void C2F(gemptyXfig)  __PARAMS((integer *,integer *,integer *,double *)); 
-extern void C2F(scilabgcgetXfig)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(scilabgcsetXfig)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(ScilabGCGetorSetXfig)  __PARAMS((char *,integer flag,integer *,integer *,integer *,integer *,integer *,integer *,integer *,double *)); 
-extern void C2F(displaystringXfig)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *angle,double *,double *,double *)); 
-extern void C2F(boundingboxXfig)  __PARAMS((char *,integer *,integer *,integer *rect,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(drawlineXfig)  __PARAMS((integer *,integer *,integer *,integer *)); 
-extern void C2F(drawsegmentsXfig)  __PARAMS((char *,integer *,integer *vy,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(drawarrowsXfig)  __PARAMS((char *,integer *,integer *vy,integer *,integer *as,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(drawrectangleXfig)  __PARAMS((char *,integer *,integer *,integer *width,integer *height,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(fillrectangleXfig)  __PARAMS((char *,integer *,integer *,integer *width,integer *height,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(drawrectanglesXfig)  __PARAMS((char *,integer *vects,integer *fillvect,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(fillarcsXfig)  __PARAMS((char *,integer *vects,integer *fillvect,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(drawarcsXfig)  __PARAMS((char *,integer *vects,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(drawarcXfig)  __PARAMS((char *,integer *,integer *,integer *width,integer *height,integer *angle1,integer *angle2,double *,double *,double *,double *)); 
-extern void C2F(xselgraphicXfig)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(fillarcXfig)  __PARAMS((char *,integer *,integer *,integer *width,integer *height,integer *angle1,integer *angle2,double *,double *,double *,double *)); 
-extern void C2F(drawpolymarkXfig)  __PARAMS((char *,integer *,integer *,integer *vy,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(drawpolylinesXfig)  __PARAMS((char *,integer *vectsx,integer *vectsy,integer *rawvect,integer *,integer *p,integer *,double *,double *,double *,double *)); 
-extern void C2F(fillpolylinesXfig)  __PARAMS((char *,integer *vectsx,integer *vectsy,integer *fillvect,integer *,integer *p,integer *,double *,double *,double *,double *)); 
-extern void C2F(drawpolylineXfig)  __PARAMS((char *,integer *,integer *,integer *vy,integer *closeflag,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(xendgraphicXfig)  __PARAMS((void)); 
-extern void C2F(fillpolylineXfig)  __PARAMS((char *,integer *,integer *,integer *vy,integer *closeareaflag,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(initgraphicXfig)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(xendXfig)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-
-extern void C2F(InitScilabGCXfig)  __PARAMS((integer *,integer *,integer *,integer *)); 
-extern void C2F(loadfamilyXfig)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(drawaxisXfig)  __PARAMS((char *,integer *,integer *nsteps,integer *,integer *initpoint,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(clearwindowXfig)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(displaynumbersXfig)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void set_pattern_or_color __PARAMS((int pat,int *areafill,int *color)); 
-/* extern void set_dash_or_color  __PARAMS((int dash,int *l_style,int *_val,int *color)); */
-extern void C2F(viderbuffXfig)  __PARAMS((void)); 
-extern void C2F(WriteGenericXfig)  __PARAMS((char *,integer nobj,integer sizeobj,integer *,integer *vy,integer sizev,integer flag,integer *fvect)); 
-extern void C2F(getwindowdimXfig)  __PARAMS((integer *,integer *,integer *,double *)); 
-extern void C2F(Write2VectXfig)  __PARAMS((integer *,integer *vy,integer,integer flag)); 
-extern void C2F(setwindowdimXfig)  __PARAMS((integer *,integer *,integer *,integer *)); 
-extern void C2F(getwindowposXfig)  __PARAMS((integer *,integer *,integer *,double *)); 
-extern void C2F(setwindowposXfig)  __PARAMS((integer *,integer *,integer *,integer *)); 
-extern void C2F(xclickXfig)  __PARAMS((char *,integer *ibutton,integer *x1,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(xclick_anyXfig)  __PARAMS((char *,integer *ibutton,integer *x1,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(xgetmouseXfig)  __PARAMS((char *,integer *ibutton,integer *x1,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(clearareaXfig)  __PARAMS((char *,integer *,integer *,integer *w,integer *h,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(setcurwinXfig)  __PARAMS((integer *intnum,integer *,integer *,integer *)); 
-extern void C2F(getcurwinXfig)  __PARAMS((integer *,integer *intnum,integer *,double *)); 
-extern void C2F(setclipXfig)  __PARAMS((integer *,integer *,integer *w,integer *h)); 
-extern void C2F(unsetclipXfig)  __PARAMS((integer *,integer *,integer *,integer *)); 
-extern void C2F(getclipXfig)  __PARAMS((integer *,integer *,integer *,double *)); 
-extern void C2F(absourelXfig)  __PARAMS((integer *num,integer *,integer *,integer *)); 
-extern void C2F(getabsourelXfig)  __PARAMS((integer *,integer *num,integer *,double *)); 
-extern void C2F(setalufunctionXfig)  __PARAMS((char *)); 
-extern void C2F(idfromnameXfig)  __PARAMS((char *,integer *num)); 
-extern void C2F(setalufunction1Xfig)  __PARAMS((integer *num,integer *,integer *,integer *)); 
-extern void C2F(getalufunctionXfig)  __PARAMS((integer *,integer *value,integer *,double *)); 
-extern void C2F(setthicknessXfig)  __PARAMS((integer *value,integer *,integer *,integer *)); 
-extern void C2F(getthicknessXfig)  __PARAMS((integer *,integer *value,integer *,double *)); 
-extern void C2F(setpatternXfig)  __PARAMS((integer *num,integer *,integer *,integer *)); 
-extern void C2F(getpatternXfig)  __PARAMS((integer *,integer *num,integer *,double *)); 
-extern void C2F(getlastXfig)  __PARAMS((integer *,integer *num,integer *,double *)); 
-extern void C2F(setdashXfig)  __PARAMS((integer *value,integer *,integer *,integer *)); 
-extern void C2F(getdashXfig)  __PARAMS((integer *,integer *value,integer *,double *)); 
-extern void C2F(usecolorXfig)  __PARAMS((integer *num,integer *,integer *,integer *)); 
-extern void C2F(getusecolorXfig)  __PARAMS((integer *,integer *num,integer *,double *)); 
-extern void C2F(setcolormapXfig)  __PARAMS((integer *,integer *,integer *,integer *,integer *,integer *,double *a)); 
-extern void C2F(set_cXfig)  __PARAMS((integer i)); 
-extern void C2F(setbackgroundXfig)  __PARAMS((integer *num,integer *,integer *,integer *)); 
-extern void C2F(getbackgroundXfig)  __PARAMS((integer *,integer *num,integer *,double *)); 
-extern void C2F(setforegroundXfig)  __PARAMS((integer *num,integer *,integer *,integer *)); 
-extern void C2F(getforegroundXfig)  __PARAMS((integer *,integer *num,integer *,double *)); 
-extern void C2F(sethidden3dXfig)  __PARAMS((integer *num,integer *,integer *,integer *)); 
-extern void C2F(gethidden3dXfig)  __PARAMS((integer *,integer *num,integer *,double *)); 
-extern void C2F(xsetfontXfig)  __PARAMS((integer *,integer *,integer *,integer *)); 
-extern void C2F(xgetfontXfig)  __PARAMS((integer *,integer *,integer *,double *)); 
-extern void C2F(setcursymbolXfig)  __PARAMS((integer *,integer *,integer *,integer *)); 
-
-/* periPos.c */
-
-extern void ColorInit  __PARAMS((void)); 
-extern void C2F(gemptyPos)  __PARAMS((integer *,integer *,integer *,double *)); 
- extern void C2F(scilabgcgetPos)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(scilabgcsetPos)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(ScilabGCGetorSetPos)  __PARAMS((char *,integer flag,integer *,integer *,integer *,integer *,integer *,integer *,integer *,double *)); 
- extern void C2F(displaystringPos)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *angle,double *,double *,double *)); 
- extern void C2F(boundingboxPos)  __PARAMS((char *,integer *,integer *,integer *rect,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(drawlinePos)  __PARAMS((integer *x1,integer *,integer *,integer *)); 
- extern void C2F(drawsegmentsPos)  __PARAMS((char *,integer *,integer *vy,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(drawarrowsPos)  __PARAMS((char *,integer *,integer *vy,integer *,integer *as,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(xselgraphicPos)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(drawrectanglesPos)  __PARAMS((char *,integer *vects,integer *fillvect,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(drawrectanglePos)  __PARAMS((char *,integer *,integer *,integer *width,integer *height,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(fillrectanglePos)  __PARAMS((char *,integer *,integer *,integer *width,integer *height,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(fillarcsPos)  __PARAMS((char *,integer *vects,integer *fillvect,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(drawarcsPos)  __PARAMS((char *,integer *vects,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(drawarcPos)  __PARAMS((char *,integer *,integer *,integer *width,integer *height,integer *angle1,integer *angle2,double *,double *,double *,double *)); 
- extern void C2F(fillarcPos)  __PARAMS((char *,integer *,integer *,integer *width,integer *height,integer *angle1,integer *angle2,double *,double *,double *,double *)); 
- extern void C2F(xendgraphicPos)  __PARAMS((void)); 
- extern void C2F(drawpolylinesPos)  __PARAMS((char *,integer *vectsx,integer *vectsy,integer *rawvect,integer *,integer *p,integer *,double *,double *,double *,double *)); 
- extern void C2F(fillpolylinesPos)  __PARAMS((char *,integer *vectsx,integer *vectsy,integer *fillvect,integer *,integer *p,integer *,double *,double *,double *,double *)); 
- extern void C2F(xendPos)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(drawpolylinePos)  __PARAMS((char *,integer *,integer *,integer *vy,integer *closeflag,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(fillpolylinePos)  __PARAMS((char *,integer *,integer *,integer *vy,integer *closeareaflag,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(drawpolymarkPos)  __PARAMS((char *,integer *,integer *,integer *vy,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(initgraphicPos)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void InitScilabGCPos  __PARAMS((integer *,integer *,integer *,integer *)); 
- extern void C2F(clearwindowPos)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(drawaxisPos)  __PARAMS((char *,integer *,integer *nsteps,integer *,integer *initpoint,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(displaynumbersPos)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(WriteGenericPos)  __PARAMS((char *,integer nobj,integer sizeobj,integer *,integer *vy,integer sizev,integer flag,integer *fvect)); 
- extern void C2F(WriteGeneric1Pos)  __PARAMS((char *,integer nobjpos,integer objbeg,integer sizeobj,integer *,integer *vy,integer flag,integer *fvect)); 
- extern void C2F(Write2VectPos)  __PARAMS((integer *,integer *vy,integer from,integer,char *,integer flag,integer fv)); 
- extern void C2F(xsetfontPos)  __PARAMS((integer *,integer *,integer *,integer *)); 
- extern void C2F(xgetfontPos)  __PARAMS((integer *,integer *,integer *,double *)); 
- extern void C2F(xsetmarkPos)  __PARAMS((integer *,integer *,integer *,integer *)); 
- extern void C2F(xgetmarkPos)  __PARAMS((integer *,integer *,integer *,double *)); 
- extern void C2F(xclickPos)  __PARAMS((char *,integer *ibutton,integer *x1,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(loadfamilyPos)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(xclick_anyPos)  __PARAMS((char *,integer *ibutton,integer *x1,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(xgetmousePos)  __PARAMS((char *,integer *ibutton,integer *x1,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(clearareaPos)  __PARAMS((char *,integer *,integer *,integer *w,integer *h,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(getwindowposPos)  __PARAMS((integer *,integer *,integer *,double *)); 
- extern void C2F(setwindowposPos)  __PARAMS((integer *,integer *,integer *,integer *)); 
- extern void C2F(getwindowdimPos)  __PARAMS((integer *,integer *,integer *,double *)); 
- extern void C2F(setwindowdimPos)  __PARAMS((integer *,integer *,integer *,integer *)); 
- extern void C2F(setcurwinPos)  __PARAMS((integer *intnum,integer *,integer *,integer *)); 
- extern void C2F(getcurwinPos)  __PARAMS((integer *,integer *intnum,integer *,double *)); 
- extern void C2F(setclipPos)  __PARAMS((integer *,integer *,integer *w,integer *h)); 
- extern void C2F(unsetclipPos)  __PARAMS((integer *,integer *,integer *,integer *)); 
- extern void C2F(getclipPos)  __PARAMS((integer *,integer *,integer *,double *)); 
- extern void C2F(setabsourelPos)  __PARAMS((integer *num,integer *,integer *,integer *)); 
- extern void C2F(getabsourelPos)  __PARAMS((integer *,integer *num,integer *,double *)); 
- extern void C2F(setalufunctionPos)  __PARAMS((char *)); 
- extern void C2F(idfromnamePos)  __PARAMS((char *,integer *num)); 
- extern void C2F(setalufunction1Pos)  __PARAMS((integer *num,integer *,integer *,integer *)); 
- extern void C2F(getalufunctionPos)  __PARAMS((integer *,integer *value,integer *,double *)); 
- extern void C2F(setthicknessPos)  __PARAMS((integer *value,integer *,integer *,integer *)); 
- extern void C2F(getthicknessPos)  __PARAMS((integer *,integer *value,integer *,double *)); 
- extern void C2F(setpatternPos)  __PARAMS((integer *num,integer *,integer *,integer *)); 
- extern void C2F(getpatternPos)  __PARAMS((integer *,integer *num,integer *,double *)); 
- extern void C2F(getlastPos)  __PARAMS((integer *,integer *num,integer *,double *)); 
- extern void C2F(setdashPos)  __PARAMS((integer *value,integer *,integer *,integer *)); 
- extern void C2F(setdashstylePos)  __PARAMS((integer *value,integer *x,integer *n)); 
- extern void C2F(getdashPos)  __PARAMS((integer *,integer *value,integer *,double *)); 
- extern void C2F(usecolorPos)  __PARAMS((integer *num,integer *,integer *,integer *)); 
- extern void C2F(getusecolorPos)  __PARAMS((integer *,integer *num,integer *,double *)); 
- extern void C2F(setcolormapPos)  __PARAMS((integer *,integer *,integer *,integer *,integer *,integer *,double *a)); 
- extern void C2F(set_cPos)  __PARAMS((integer i)); 
- extern void C2F(setbackgroundPos)  __PARAMS((integer *num,integer *,integer *,integer *)); 
- extern void C2F(getbackgroundPos)  __PARAMS((integer *,integer *num,integer *,double *)); 
- extern void C2F(setforegroundPos)  __PARAMS((integer *num,integer *,integer *,integer *)); 
- extern void C2F(getforegroundPos)  __PARAMS((integer *,integer *num,integer *,double *)); 
- extern void C2F(sethidden3dPos)  __PARAMS((integer *num,integer *,integer *,integer *)); 
- extern void C2F(gethidden3dPos)  __PARAMS((integer *,integer *num,integer *,double *)); 
- extern void C2F(semptyPos)  __PARAMS((integer *,integer *,integer *,integer *)); 
-       
-       /* periGif.c */
-
-extern void C2F(gemptyGif)  __PARAMS((integer *,integer *,integer *,double *)); 
- extern void C2F(scilabgcgetGif)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(scilabgcsetGif)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(ScilabGCGetorSetGif)  __PARAMS((char *,integer flag,integer *,integer *,integer *,integer *,integer *,integer *,integer *,double *)); 
- extern void C2F(displaystringGif)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *angle,double *,double *,double *)); 
- extern void C2F(boundingboxGif)  __PARAMS((char *,integer *,integer *,integer *rect,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(drawlineGif)  __PARAMS((integer *x1,integer *,integer *,integer *)); 
- extern void C2F(drawsegmentsGif)  __PARAMS((char *,integer *,integer *vy,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(drawarrowsGif)  __PARAMS((char *,integer *,integer *vy,integer *,integer *as,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(xselgraphicGif)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(drawrectanglesGif)  __PARAMS((char *,integer *vects,integer *fillvect,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(drawrectangleGif)  __PARAMS((char *,integer *,integer *,integer *width,integer *height,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(fillrectangleGif)  __PARAMS((char *,integer *,integer *,integer *width,integer *height,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(fillarcsGif)  __PARAMS((char *,integer *vects,integer *fillvect,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(drawarcsGif)  __PARAMS((char *,integer *vects,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(drawarcGif)  __PARAMS((char *,integer *,integer *,integer *width,integer *height,integer *angle1,integer *angle2,double *,double *,double *,double *)); 
- extern void C2F(fillarcGif)  __PARAMS((char *,integer *,integer *,integer *width,integer *height,integer *angle1,integer *angle2,double *,double *,double *,double *)); 
- extern void C2F(xendgraphicGif)  __PARAMS((void)); 
- extern void C2F(drawpolylinesGif)  __PARAMS((char *,integer *vectsx,integer *vectsy,integer *rawvect,integer *,integer *p,integer *,double *,double *,double *,double *)); 
- extern void C2F(fillpolylinesGif)  __PARAMS((char *,integer *vectsx,integer *vectsy,integer *fillvect,integer *,integer *p,integer *,double *,double *,double *,double *)); 
- extern void C2F(xendGif)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(drawpolylineGif)  __PARAMS((char *,integer *,integer *,integer *vy,integer *closeflag,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(fillpolylineGif)  __PARAMS((char *,integer *,integer *,integer *vy,integer *closeareaflag,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(drawpolymarkGif)  __PARAMS((char *,integer *,integer *,integer *vy,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(initgraphicGif)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void InitScilabGCGif  __PARAMS((integer *,integer *,integer *,integer *)); 
- extern void C2F(clearwindowGif)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(drawaxisGif)  __PARAMS((char *,integer *,integer *nsteps,integer *,integer *initpoint,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(displaynumbersGif)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(WriteGenericGif)  __PARAMS((char *,integer nobj,integer sizeobj,integer *,integer *vy,integer sizev,integer flag,integer *fvect)); 
- extern void C2F(WriteGeneric1Gif)  __PARAMS((char *,integer nobjpos,integer objbeg,integer sizeobj,integer *,integer *vy,integer flag,integer *fvect)); 
- extern void C2F(Write2VectGif)  __PARAMS((integer *,integer *vy,integer from,integer,char *,integer flag,integer fv)); 
- extern void C2F(xsetfontGif)  __PARAMS((integer *,integer *,integer *,integer *)); 
- extern void C2F(xgetfontGif)  __PARAMS((integer *,integer *,integer *,double *)); 
- extern void C2F(xsetmarkGif)  __PARAMS((integer *,integer *,integer *,integer *)); 
- extern void C2F(xgetmarkGif)  __PARAMS((integer *,integer *,integer *,double *)); 
- extern void C2F(xclickGif)  __PARAMS((char *,integer *ibutton,integer *x1,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(loadfamilyGif)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(xclick_anyGif)  __PARAMS((char *,integer *ibutton,integer *x1,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(xgetmouseGif)  __PARAMS((char *,integer *ibutton,integer *x1,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(clearareaGif)  __PARAMS((char *,integer *,integer *,integer *w,integer *h,integer *,integer *,double *,double *,double *,double *)); 
- extern void C2F(getwindowposGif)  __PARAMS((integer *,integer *,integer *,double *)); 
- extern void C2F(setwindowposGif)  __PARAMS((integer *,integer *,integer *,integer *)); 
- extern void C2F(getwindowdimGif)  __PARAMS((integer *,integer *,integer *,double *)); 
- extern void C2F(setwindowdimGif)  __PARAMS((integer *,integer *,integer *,integer *)); 
- extern void C2F(setcurwinGif)  __PARAMS((integer *intnum,integer *,integer *,integer *)); 
- extern void C2F(getcurwinGif)  __PARAMS((integer *,integer *intnum,integer *,double *)); 
- extern void C2F(setclipGif)  __PARAMS((integer *,integer *,integer *w,integer *h)); 
- extern void C2F(unsetclipGif)  __PARAMS((integer *,integer *,integer *,integer *)); 
- extern void C2F(getclipGif)  __PARAMS((integer *,integer *,integer *,double *)); 
- extern void C2F(setabsourelGif)  __PARAMS((integer *num,integer *,integer *,integer *)); 
- extern void C2F(getabsourelGif)  __PARAMS((integer *,integer *num,integer *,double *)); 
- extern void C2F(setalufunctionGif)  __PARAMS((char *)); 
- extern void C2F(idfromnameGif)  __PARAMS((char *,integer *num)); 
- extern void C2F(setalufunction1Gif)  __PARAMS((integer *num,integer *,integer *,integer *)); 
- extern void C2F(getalufunctionGif)  __PARAMS((integer *,integer *value,integer *,double *)); 
- extern void C2F(setthicknessGif)  __PARAMS((integer *value,integer *,integer *,integer *)); 
- extern void C2F(getthicknessGif)  __PARAMS((integer *,integer *value,integer *,double *)); 
- extern void C2F(setpatternGif)  __PARAMS((integer *num,integer *,integer *,integer *)); 
- extern void C2F(getpatternGif)  __PARAMS((integer *,integer *num,integer *,double *)); 
- extern void C2F(getlastGif)  __PARAMS((integer *,integer *num,integer *,double *)); 
- extern void C2F(setdashGif)  __PARAMS((integer *value,integer *,integer *,integer *)); 
- extern void C2F(setdashstyleGif)  __PARAMS((integer *value,integer *x,integer *n)); 
- extern void C2F(getdashGif)  __PARAMS((integer *,integer *value,integer *,double *)); 
- extern void C2F(usecolorGif)  __PARAMS((integer *num,integer *,integer *,integer *)); 
- extern void C2F(getusecolorGif)  __PARAMS((integer *,integer *num,integer *,double *)); 
- extern void C2F(setcolormapGif)  __PARAMS((integer *,integer *,integer *,integer *,integer *,integer *,double *a)); 
- extern void C2F(set_cGif)  __PARAMS((integer i)); 
- extern void C2F(setbackgroundGif)  __PARAMS((integer *num,integer *,integer *,integer *)); 
- extern void C2F(getbackgroundGif)  __PARAMS((integer *,integer *num,integer *,double *)); 
- extern void C2F(setforegroundGif)  __PARAMS((integer *num,integer *,integer *,integer *)); 
- extern void C2F(getforegroundGif)  __PARAMS((integer *,integer *num,integer *,double *)); 
- extern void C2F(sethidden3dGif)  __PARAMS((integer *num,integer *,integer *,integer *)); 
- extern void C2F(gethidden3dGif)  __PARAMS((integer *,integer *num,integer *,double *)); 
- extern void C2F(semptyGif)  __PARAMS((integer *,integer *,integer *,integer *)); 
-       
-       /* periX11.c */
-
-#ifndef _MSC_VER 
-
-extern void SciClick __PARAMS((integer *ibutton,integer *x1,integer *yy1,integer *iflag,int getmouse,
-                      int dyn_men,int getrelease,char *str,integer * lstr));
-extern void fill_grid_rectangles __PARAMS(( integer *x,  integer *y,  double *z, integer n1, integer n2));
-extern void fill_grid_rectangles1 __PARAMS(( integer *x,  integer *y,  double *z, integer n1, integer n2));
-extern void C2F(getwindowdim) __PARAMS((integer *verbose, integer *x, integer *narg, double *dummy));
-extern int GetWinsMaxId __PARAMS((void));
-extern void SwitchWindow __PARAMS((integer *intnum));
-extern int C2F(sedeco)  __PARAMS((int *)); 
-extern void C2F(set_default_colormap)  __PARAMS((void)); 
-extern int get_pixel  __PARAMS((int i)); 
-extern int CheckColormap  __PARAMS((int *m)); 
-extern void get_r  __PARAMS((int i,float *r)); 
-extern void get_g  __PARAMS((int i,float *g)); 
-extern void get_b  __PARAMS((int i,float *b)); 
-extern void C2F(MissileGCget)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(MissileGCset)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(MissileGCGetorSet)  __PARAMS((char *,integer flag,integer *,integer *,integer *,integer *,integer *,integer *,integer *,double *)); 
-extern void C2F(displaystring)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *angle,double *,double *,double *)); 
-extern void C2F(DispStringAngle)  __PARAMS((integer *,integer *,char *,double *angle)); 
-extern void C2F(boundingbox)  __PARAMS((char *,integer *,integer *,integer *rect,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(drawline)  __PARAMS((integer *,integer *,integer *,integer *)); 
-/**  extern int XgcFreeColors  __PARAMS((struct BCG *gc));  **/
-extern void C2F(drawsegments)  __PARAMS((char *,integer *,integer *vy,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(drawarrows)  __PARAMS((char *,integer *,integer *vy,integer *,integer *as,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(drawrectangles)  __PARAMS((char *,integer *vects,integer *fillvect,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(drawrectangle)  __PARAMS((char *,integer *,integer *,integer *width,integer *height,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(fillrectangle)  __PARAMS((char *,integer *,integer *,integer *width,integer *height,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(fillarcs)  __PARAMS((char *,integer *vects,integer *fillvect,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(drawarcs)  __PARAMS((char *,integer *vects,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(drawarc)  __PARAMS((char *,integer *,integer *,integer *width,integer *height,integer *angle1,integer *angle2,double *,double *,double *,double *)); 
-extern void C2F(fillarc)  __PARAMS((char *,integer *,integer *,integer *width,integer *height,integer *angle1,integer *angle2,double *,double *,double *,double *)); 
-extern void C2F(drawpolylines)  __PARAMS((char *,integer *vectsx,integer *vectsy,integer *rawvect,integer *,integer *p,integer *,double *,double *,double *,double *)); 
-extern void C2F(fillpolylines)  __PARAMS((char *,integer *vectsx,integer *vectsy,integer *fillvect,integer *,integer *p,integer *,double *,double *,double *,double *)); 
-extern void C2F(drawpolyline)  __PARAMS((char *,integer *,integer *,integer *vy,integer *closeflag,integer *,integer *,double *,double *,double *,double *)); 
-extern void CPixmapResize  __PARAMS((int x,int y)); 
-extern void C2F(fillpolyline)  __PARAMS((char *,integer *,integer *,integer *vy,integer *closeflag,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(drawpolymark)  __PARAMS((char *,integer *,integer *,integer *vy,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void DeleteSGWin  __PARAMS((integer intnum)); 
-extern void DeleteWindowToList  __PARAMS((integer num)); 
-extern void C2F(getwins)  __PARAMS((integer *Num,integer *,integer *)); 
-extern void set_c  __PARAMS((integer i)); 
-extern void C2F(initgraphic)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void CPixmapResize1  __PARAMS((void)); 
-extern void C2F(xinfo)  __PARAMS((char *message,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(xselgraphic)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(drawaxis)  __PARAMS((char *,integer *,integer *nsteps,integer *,integer *initpoint,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(xendgraphic)  __PARAMS((void)); 
-extern void C2F(displaynumbers)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(xend)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(bitmap)  __PARAMS((char *,integer,integer)); 
-extern void C2F(loadfamily)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(clearwindow)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern int C2F(CurSymbXOffset)  __PARAMS((void)); 
-extern int C2F(CurSymbYOffset)  __PARAMS((void)); 
-extern int C2F(store_points)  __PARAMS((integer,integer *,integer *vy,integer onemore)); 
-extern int C2F(AllocVectorStorage)  __PARAMS((void)); 
-extern void set_clip_box __PARAMS((integer xxleft,integer xxright,integer yybot,integer yytop)); 
-extern void clip_line  __PARAMS((integer,integer,integer ,integer,integer *,integer *,integer *,integer *,integer *)); 
-extern void C2F(xclick)  __PARAMS((char *,integer *ibutton,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(xclick_any)  __PARAMS((char *,integer *ibutton,integer *,integer *,integer *iwin,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(xgetmouse_test)  __PARAMS((char *,integer *ibutton,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(xgetmouse)  __PARAMS((char *,integer *ibutton,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(cleararea)  __PARAMS((char *,integer *,integer *,integer *w,integer *h,integer *,integer *,double *,double *,double *,double *)); 
-extern void C2F(Recenter_GW)  __PARAMS((void)); 
-extern void getcolordef  __PARAMS((integer *));
-extern void setcolordef  __PARAMS((integer ));
-extern void wininfo  __PARAMS((char *fmt,...));
-
-#else 
-
-/*  periWin.c */
-
-extern void SciClick __PARAMS((integer *ibutton,integer *x1,integer *yy1,integer *iflag,int getmouse,int dyn_men,int release,char *str,integer * lstr));
-extern void SciG_Font_Printer(int scale);
-extern void SciG_Font(void) ;
-extern void CleanFonts();
-extern void SciMouseCapture();
-extern void SciMouseRelease();
-extern void SetWinhdc  __PARAMS((void));  
-extern int MaybeSetWinhdc  __PARAMS((void));  
-extern void ReleaseWinHdc  __PARAMS((void));  
-/**   extern void SetGHdc  __PARAMS((HDC lhdc,int width,int height));  **/
-/**  extern int XgcAllocColors  __PARAMS((struct BCG *gc,int m));   **/
-/**   extern int XgcFreeColors  __PARAMS((struct BCG *gc));  **/
-  extern void C2F(pixmapclear)  __PARAMS((integer *,integer *,integer *,integer *));  
-  extern void C2F(show)  __PARAMS((integer *,integer *,integer *,integer *));  
-  extern void CPixmapResize  __PARAMS((int x,int y));  
-  extern void CPixmapResize1  __PARAMS((void));  
-  extern void C2F(xselgraphic)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *));  
-  extern void C2F(xendgraphic)  __PARAMS((void));  
-  extern void C2F(xend)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *));  
-  extern void C2F(clearwindow)  __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *));  
-  extern void C2F(xclick)  __PARAMS((char *,integer *ibutton,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *));  
-  extern void C2F(xclick_any)  __PARAMS((char *,integer *ibutton,integer *,integer *,integer *iwin,integer *,integer *,double *,double *,double *,double *));  
-  extern void C2F(xgetmouse)  __PARAMS((char *,integer *ibutton,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *));  
-  extern void C2F(cleararea)  __PARAMS((char *,integer *,integer *,integer *w,integer *h,integer *,integer *,double *,double *,double *,double *));  
-  extern void C2F(getwindowpos)  __PARAMS((integer *,integer *,integer *,double *));  
-  extern void C2F(setwindowpos)  __PARAMS((integer *,integer *,integer *,integer *));  
-  extern void C2F(getwindowdim)  __PARAMS((integer *,integer *,integer *,double *));  
-  extern void C2F(setwindowdim)  __PARAMS((integer *,integer *,integer *,integer *));  
-  extern void C2F(setcurwin)  __PARAMS((integer *intnum,integer *,integer *,integer *));  
-  extern int SwitchWindow  __PARAMS((integer *intnum));  
-  extern void C2F(getcurwin) __PARAMS((integer *,integer *intnum,integer *,double *));  
-  extern void C2F(setclip) __PARAMS((integer *,integer *,integer *w,integer *h));  
-  extern void C2F(unsetclip) __PARAMS((integer *,integer *,integer *,integer *));  
-  extern void C2F(getclip) __PARAMS((integer *,integer *,integer *,double *));  
-  extern void C2F(setabsourel) __PARAMS((integer *num,integer *,integer *,integer *));  
-  extern void C2F(getabsourel) __PARAMS((integer *,integer *num,integer *,double *));  
-  extern void C2F(setalufunction) __PARAMS((char *));  
-  extern void C2F(setalufunction1) __PARAMS((integer *num,integer *,integer *,integer *));  
-  extern void C2F(getalufunction) __PARAMS((integer *,integer *value,integer *,double *));  
-  extern void C2F(setthickness) __PARAMS((integer *value,integer *,integer *,integer *));  
-  extern void C2F(getthickness) __PARAMS((integer *,integer *value,integer *,double *));  
-  extern void C2F(CreatePatterns) __PARAMS((void));  
-  extern void C2F(setpattern) __PARAMS((integer *num,integer *,integer *,integer *));  
-  extern void C2F(getpattern) __PARAMS((integer *,integer *num,integer *,double *));  
-  extern void C2F(getlast) __PARAMS((integer *,integer *num,integer *,double *));  
-  extern void C2F(setdash) __PARAMS((integer *value,integer *,integer *,integer *));  
-  extern void C2F(getdash) __PARAMS((integer *,integer *value,integer *,double *));  
-  extern void C2F(usecolor) __PARAMS((integer *num,integer *,integer *,integer *));  
-  extern void C2F(getusecolor) __PARAMS((integer *,integer *num,integer *,double *));  
-  extern void C2F(setpixmapOn) __PARAMS((integer *num,integer *,integer *,integer *));  
-  extern void C2F(getpixmapOn) __PARAMS((integer *,integer *value,integer *,double *));  
-  extern int C2F(sedeco) __PARAMS((int *));  
-  extern void set_default_colormap  __PARAMS((void));  
-  extern void C2F(setcolormap) __PARAMS((integer *,integer *,integer *,integer *,integer *,integer *,double *a));  
-  extern void C2F(getcolormap) __PARAMS((integer *,integer *num,integer *,double *val));  
-  extern void C2F(setbackground) __PARAMS((integer *num,integer *,integer *,integer *));  
-  extern void C2F(getbackground) __PARAMS((integer *,integer *num,integer *,double *));  
-  extern void C2F(setforeground) __PARAMS((integer *num,integer *,integer *,integer *));  
-  extern void C2F(getforeground) __PARAMS((integer *,integer *num,integer *,double *));  
-  extern void C2F(sethidden3d) __PARAMS((integer *num,integer *,integer *,integer *));  
-  extern void C2F(gethidden3d) __PARAMS((integer *,integer *num,integer *,double *));  
-  extern int CheckColormap  __PARAMS((int *m));  
-  extern void get_r  __PARAMS((int i,float *r));  
-  extern void get_g  __PARAMS((int i,float *g));  
-  extern void get_b  __PARAMS((int i,float *b));  
-  extern void C2F(sempty) __PARAMS((integer *,integer *,integer *,integer *));  
-  extern void C2F(gempty) __PARAMS((integer *,integer *,integer *,double *));  
-  extern void C2F(MissileGCget) __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *));  
-  extern void C2F(MissileGCset) __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *));  
-  extern void C2F(MissileGCGetorSet) __PARAMS((char *,integer flag,integer *,integer *,integer *,integer *,integer *,integer *,integer *,double *));  
-  extern void C2F(displaystring) __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *angle,double *,double *,double *));  
-  extern void C2F(DispStringAngle) __PARAMS((integer *,integer *y0,char *,double *angle));  
-  extern void C2F(boundingbox) __PARAMS((char *,integer *,integer *,integer *rect,integer *,integer *,integer *,double *,double *,double *,double *));  
-  extern void C2F(drawline) __PARAMS((integer *,integer *,integer *,integer *));  
-  extern void C2F(drawsegments) __PARAMS((char *,integer *,integer *vy,integer *,integer *,integer *,integer *,double *,double *,double *,double *));  
-  extern void C2F(drawarrows) __PARAMS((char *,integer *,integer *vy,integer *,integer *as,integer *,integer *,double *,double *,double *,double *));  
-  extern void C2F(drawrectangles) __PARAMS((char *,integer *vects,integer *fillvect,integer *,integer *,integer *,integer *,double *,double *,double *,double *));  
-  extern void C2F(drawrectangle) __PARAMS((char *,integer *,integer *,integer *width,integer *height,integer *,integer *,double *,double *,double *,double *));  
-  extern void C2F(fillrectangle) __PARAMS((char *,integer *,integer *,integer *width,integer *height,integer *,integer *,double *,double *,double *,double *));  
-  extern void C2F(fillarcs) __PARAMS((char *,integer *vects,integer *fillvect,integer *,integer *,integer *,integer *,double *,double *,double *,double *));  
-  extern void C2F(drawarcs) __PARAMS((char *,integer *vects,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *));  
-  extern void C2F(drawarc) __PARAMS((char *,integer *,integer *,integer *width,integer *height,integer *angle1,integer *angle2,double *,double *,double *,double *));  
-  extern void C2F(fillarc) __PARAMS((char *,integer *,integer *,integer *width,integer *height,integer *angle1,integer *angle2,double *,double *,double *,double *));  
-  extern void C2F(drawpolylines) __PARAMS((char *,integer *vectsx,integer *vectsy,integer *rawvect,integer *,integer *p,integer *,double *,double *,double *,double *));  
-  extern void C2F(fillpolylines) __PARAMS((char *,integer *vectsx,integer *vectsy,integer *fillvect,integer *,integer *p,integer *,double *,double *,double *,double *));  
-  extern void C2F(drawpolyline) __PARAMS((char *,integer *,integer *,integer *vy,integer *closeflag,integer *,integer *,double *,double *,double *,double *));  
-  extern void C2F(fillpolyline) __PARAMS((char *,integer *,integer *,integer *vy,integer *closeflag,integer *,integer *,double *,double *,double *,double *));  
-  extern void C2F(drawpolymark) __PARAMS((char *,integer *,integer *,integer *vy,integer *,integer *,integer *,double *,double *,double *,double *));  
-/**  extern struct BCG *AddNewWindowToList  __PARAMS((void));  **/
-/**  extern struct BCG *AddNewWindow  __PARAMS((WindowList **listptr));  **/
-  extern void DeleteSGWin  __PARAMS((integer intnum));  
-  extern void DeleteWindowToList  __PARAMS((integer num));  
-  extern void C2F(getwins) __PARAMS((integer *,integer *,integer *));  
-  extern void set_c  __PARAMS((integer i));  
-  extern void C2F(initgraphic) __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *));  
-  extern void C2F(xinfo) __PARAMS((char *message,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *));  
-  extern void wininfo  __PARAMS((char *fmt,...));
-  extern void getcolordef  __PARAMS((integer *creenc));  
-  extern void setcolordef  __PARAMS((integer screenc));  
-  extern void ResetScilabXgc  __PARAMS((void));  
-  extern void C2F(drawaxis) __PARAMS((char *,integer *,integer *nsteps,integer *,integer *initpoint,integer *,integer *,double *,double *,double *,double *));  
-  extern void C2F(displaynumbers) __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *));  
-  extern void C2F(bitmap) __PARAMS((char *,integer,integer));  
-  extern void C2F(xsetfont) __PARAMS((integer *,integer *,integer *,integer *));  
-  extern void C2F(xgetfont) __PARAMS((integer *,integer *,integer *,double *));  
-  extern void C2F(xsetmark) __PARAMS((integer *,integer *,integer *,integer *));  
-  extern void C2F(xgetmark) __PARAMS((integer *,integer *,integer *,double *));  
-  extern void C2F(loadfamily) __PARAMS((char *,integer *,integer *,integer *,integer *,integer *,integer *,double *,double *,double *,double *));  
-/**   extern void SciMakeFont  __PARAMS((char *,int size,HFONT *hfont));  **/
-  extern int C2F(CurSymbXOffset) __PARAMS((void));  
-  extern int C2F(CurSymbYOffset) __PARAMS((void));  
-  extern int C2F(store_points) __PARAMS((integer,integer *,integer *vy,integer onemore));  
-  extern int C2F(AllocVectorStorage) __PARAMS((void));  
-  extern void set_clip_box  __PARAMS((integer xxleft,integer xxright,integer yybot,integer yytop));  
-  extern void clip_line  __PARAMS((integer,integer,integer ,integer,integer *,integer *,integer *,integer *, integer *));  
-
-
-
-
-#endif /* ifndef _MSC_VER */
-
-extern integer first_in __PARAMS(( integer,integer,integer *,integer*));
-extern integer first_out __PARAMS(( integer,integer,integer *,integer*));
-
-
-
-#endif /** SCIG_PROTO **/
-
diff --git a/scilab/routines/graphics/HandleManagement.h b/scilab/routines/graphics/HandleManagement.h
deleted file mode 100644 (file)
index 0a6e58b..0000000
+++ /dev/null
@@ -1,47 +0,0 @@
-/*------------------------------------------------------------------------
- *    Graphic library 
- *    Copyright INRIA
- *    newGraph Library header
- *    Matthieu PHILIPPE  , INRIA 2001-2002
- *    Djalel ABDEMOUCHE  , INRIA 2002-2004
- *    Fabrice Leray      , INRIA 2004-2006
- *    Jean-Baptiste Silvy, INRIA 2005-xxxx
- *    Comment:
- *    This file contains all functions used in graphics handle management.
- --------------------------------------------------------------------------*/
-
-#include "ObjectStructure.h"
-
-#ifndef __SCI_HANDLE_MANAGEMENT__
-#define __SCI_HANDLE_MANAGEMENT__
-
-/* Handle functions */
-extern void sciSetHandle (sciPointObj * pobj, sciHandleTab * pvalue);
-extern sciHandleTab * sciGetpendofhandletab(); /* HANDLE MANAGEMENT */
-extern int sciAddNewHandle (sciPointObj * pobj);
-extern int sciDelHandle (sciPointObj * pobj);
-extern long sciGetHandle (sciPointObj * pobj);
-extern sciHandleTab *sciGetHandleTabPointer (sciPointObj * pobj);
-extern sciPointObj *sciGetPointerFromHandle (long handle);
-
-extern sciRelationShip *sciGetRelationship (sciPointObj * pobj); /* HANDLE MANAGEMENT */
-extern int sciSetParent (sciPointObj * pson, sciPointObj * pparent); /* HANDLE MANAGEMENT */
-extern sciPointObj *sciGetParent (sciPointObj * pobj); /* HANDLE MANAGEMENT */
-extern void sciSetCurrentSon (sciPointObj * pparent, sciPointObj * pson); /* HANDLE MANAGEMENT */
-extern sciPointObj *sciGetCurrentSon (sciPointObj * pobj); /* HANDLE MANAGEMENT */
-extern BOOL sciAddThisToItsParent (sciPointObj * pthis,  sciPointObj * pparent); /* HANDLE MANAGEMENT */
-extern BOOL sciDelThisToItsParent (sciPointObj * pthis, sciPointObj * pparent); /* HANDLE MANAGEMENT */
-extern sciSons *sciGetSons (sciPointObj * pobj); /* HANDLE MANAGEMENT */
-extern sciSons *sciGetLastSons (sciPointObj * pobj); /* HANDLE MANAGEMENT */
-extern sciSons * sciGetNextAccessibleSon( sciSons * son ) ; /* HANDLE MANAGEMENT */
-extern sciSons * sciGetFirstAccessibleSon( sciPointObj * pObj ) ; /* HANDLE MANAGEMENT */
-extern sciSons * sciFindSon( sciPointObj * searchedObj, sciPointObj * parentObj ) ;
-extern long sciGetCurrentHandle (); /* HANDLE MANAGEMENT */
-extern sciPointObj *sciGetCurrentObj ();  /* HANDLE MANAGEMENT */
-extern int sciSetCurrentObj (sciPointObj * pobj); /* HANDLE MANAGEMENT */
-extern int sciGetNbFigures( void ) ;
-extern int sciRelocateHandles( unsigned long handles[], int nbHandles, unsigned long newParentHandle ) ;
-extern BOOL sciCanBeSonOf( sciPointObj * son, sciPointObj * parent ) ;
-extern int swapHandles( unsigned long firstHdl, unsigned long secondHdl ) ;
-
-#endif /* __SCI_HANDLE_MANAGEMENT__ */
diff --git a/scilab/routines/graphics/Math.h b/scilab/routines/graphics/Math.h
deleted file mode 100644 (file)
index 8fb0cf7..0000000
+++ /dev/null
@@ -1,209 +0,0 @@
-/*------------------------------------------------------------------------
- *    Graphic library
- *    Copyright (C) 1998-2000 Enpc/Jean-Philippe Chancelier
- *    jpc@cereve.enpc.fr 
- --------------------------------------------------------------------------*/
-
-#ifndef __SCIMATH_H__
-#define __SCIMATH_H__
-#include "../machine.h"
-#include <limits.h>
-
-#include <math.h>
-
-#ifdef __STDC__
-#include <stdlib.h>
-#else
-#include <malloc.h>
-#endif
-
-#include "../os_specific/sci_mem_alloc.h"  /* malloc */
-
-
-#ifdef _MSC_VER 
-               #include <float.h>
-               #define finite(x) _finite(x) 
-#else  /* _MSC_VER */ 
-       /** This should only be provided when finite prototype is missing **/
-       /** XXX : to be tested **/
-       #ifndef __cplusplus
-       int finite __PARAMS((double));
-       #endif
-#endif /* _MSC_VER */
-
-#ifdef _MSC_VER 
-       #include <float.h>
-       #define ISNAN(x) _isnan(x)
-#else 
-       #define ISNAN(x) isnan(x)
-#endif 
-
-#define Abs(x) ( ( (x) >= 0) ? (x) : -( x) )
-#ifndef Min
-#define Min(x,y)       (((x)<(y))?(x):(y))
-#endif 
-
-#ifndef Max 
-#define Max(x,y)       (((x)>(y))?(x):(y))
-#endif
-
-#define PI0 (integer *) 0
-#define PD0 (double *) 0
-#define SMDOUBLE 1.e-200 /* Smalest number to avoid dividing by zero */
-
-/* angle conversion */
-#define PI_OVER_180  0.01745329251994329576913914624236578987393
-#define _180_OVER_PI 57.29577951308232087665461840231273527024
-#define DEG2RAD(x) ((x) * PI_OVER_180  )
-#define RAD2DEG(x) ((x) * _180_OVER_PI )
-
-#define                round(a)        (int)(((a)<0.0)?(a)-.5:(a)+.5)
-#define EPSILON 1.0e-13
-
-
-
-/** 
-  #define linint(x) ((integer) floor(x)) 
-  #define inint(x) ((int) floor(x))  
-**/
-
-/** 
-  if we suppose that the x transmited is in the range of integers 
-  we could also use :
-  #define inint(x) (( x > 0 ) ? ((int) (x + 0.5)) : ((int) (x - 0.5));
- **/
-
-#define linint(x) ((integer) floor(x + 0.5 )) 
-#define inint(x) ((int) floor(x + 0.5 ))  
-
-/* XWindow function arguments can be  int16 or unsigned16 */
-
-#define SCIINT16   short
-#define INT16MAX   SHRT_MAX
-#define INT16MIN   SHRT_MIN
-#define int16max   0x7FFF
-#define uns16max   0xFFFF
-
-#if (defined(sun) && defined(SYSV)) 
-#include <ieeefp.h>
-#endif
-
-#if defined(THINK_C)|| defined(_MSC_VER)
-  #define M_PI 3.14159265358979323846
-#else
-  #if defined(HAVE_VALUES_H)
-    #include <values.h>
-  #else
-    #if defined(HAVE_LIMITS_H)
-     #include <limits.h>
-    #endif
-  #endif
-#endif
-
-#ifndef M_PI
-#define M_PI 3.14159265358979323846 
-#endif
-
-
-extern double exp10 __PARAMS((double));
-
-/* prototypes */
-
-/*----------------------------------------------------------------------------*/
-/* perform the rotation of point from to point dest with angle in radian  */
-void rotate2D( double from[2], double center[2], double angle, double dest[2] ) ;
-
-/* perform the rotation of point from to point to. */
-/* the angle is directly given with its sine and cosine for speed */
-void rotate2Dim( double from[2]   ,
-                 double center[2] ,
-                 double cosAngle  ,
-                 double sinAngle  ,
-                 double dest[2]    ) ;
-
-/* perform the rotation of point from to point dest given in int with angle in radian  */
-void iRotate2D( int from[2], int center[2], double angle, int dest[2] ) ;
-
-/* perform the rotation of point from to point dest given in int. */
-/* the angle is directly given with its sine and cosine for speed */
-void iRotate2Dim( int    from[2]   ,
-                  int    center[2] ,
-                  double cosAngle  ,
-                  double sinAngle  ,
-                  int    dest[2]    ) ;
-
-/* perform an homethety point from to point dest. The 2 factors stand for the ration */
-/* along the 2 coordinates */
-void homothety2D( double from[2], double center[2], double factors[2], double dest[2] ) ;
-
-/* perform an homethety point from to point dest given in pixels. */
-/* The 2 factors stand for the ration along the 2 coordinates */
-void iHomothety2D( int from[2], int center[2], double factors[2], int dest[2] ) ;
-
-
-/* perform the translation of point from to point dest with vector trans */
-void translate2D( double from[2], double trans[2], double dest[2] ) ;
-
-/* perform the translation of point from to point dest with vector trans given in pixels.*/
-void iTranslate2D( int from[2], int trans[2], int dest[2] ) ;
-
-/**
- * Normalize a 2d vector.
- */
-void normalize2d( double vect[2] ) ;
-
-/**
- * Normalize a 2d vector in pixels coordinates.
- */
-void iNormalize2d( int vect[2] ) ;
-
-/**
- * return the scalar product of two 2d vectors.
- */
-#define DOT_PROD_2D(v1,v2) ( ((v1)[0]) * ((v2)[0]) + ((v1)[1]) * ((v2)[1]) )
-
-/*----------------------------------------------------------------------------*/
-
-/*----------------------------------------------------------------------------*/
-/* check if two values can be considered equal given an accurracy */
-int safeEqual( double val1, double val2, double accuracy ) ;
-
-/* with a macro it is faster */
-/* the x == y test is put to avoid division by 0 */
-#define SAFE_EQUAL(x,y,acc) ( (x) == (y) ) || ( Abs( (x) - (y) ) < (acc) * Max( Abs( (x) ), Abs( (y) ) ) )
-
-/* test if a value if lesser than an other or just sligthy greater */
-#define SAFE_LT(x,y,acc) ( (x) == (y) || ( (x) - (y) ) < (acc) * Max( Abs( (x) ), Abs( (y) ) ) )
-#define SAFE_GT(x,y,acc) ( (x) == (y) || ( (y) - (x) ) < (acc) * Max( Abs( (x) ), Abs( (y) ) ) )
-/*----------------------------------------------------------------------------*/
-
-/*----------------------------------------------------------------------------*/
-/* truncate an integer to a 16 bits integer. Overflow value are trucated to the min */
-/* and max of 16 bits integer. */
-#define INT_2_16B(i) ( (i) > INT16MAX ? (INT16MAX) : ( (i) < INT16MIN ? INT16MIN : ((SCIINT16) i)) )
-/*----------------------------------------------------------------------------*/
-
-/*----------------------------------------------------------------------------*/
-/* truncate an integer to a char. Overflow value are trucated to the min */
-/* and max of char integer. */
-#define INT_2_UCHAR(i) ( (i) > UCHAR_MAX ? (UCHAR_MAX) : ( (i) < 0  ? 0 : ((char) i)) )
-/*----------------------------------------------------------------------------*/
-
-/*----------------------------------------------------------------------------*/
-/* truncate a float or double to an int. Overflow value are trucated to the min */
-/* and max of 32 bits integer. */
-#define FLOAT_2_INT(f) ( (f) > INT_MAX ? (INT_MAX) : ( (f) < INT_MIN ? (INT_MIN) : ( inint( f ) ) ) )
-/*----------------------------------------------------------------------------*/
-
-/*----------------------------------------------------------------------------*/
-/* return the number of digits of a positive integer (ie for 10236 it is 5 )  */
-/* the added 0.5 is to avoid trouble with 10^i which could become 9.999999999 */
-#define GET_NB_DIGITS(i) ( (i) == 0 ? 1 : ((int) floor( log10( (i) + 0.5 ) ) ) + 1 )
-/*----------------------------------------------------------------------------*/
-
-
-
-
-
-#endif /* SCI_MATH.HG */
-
diff --git a/scilab/routines/graphics/ObjectStructure.h b/scilab/routines/graphics/ObjectStructure.h
deleted file mode 100644 (file)
index 48eaead..0000000
+++ /dev/null
@@ -1,1404 +0,0 @@
-/*------------------------------------------------------------------------
- *    Graphic library 
- *    Copyright INRIA
- *    newGraph Library header
- *    Matthieu PHILIPPE,   INRIA 2001-2002
- *    Djalel ABDEMOUCHE,   INRIA 2002-2004
- *    Fabrice Leray,       INRIA 2004-2006
- *    Jean-Baptiste Silvy, INRIA 2005-xxxx
- *    Comment:
- *    This file contains all structures definitions used for New Graphics mode.
- --------------------------------------------------------------------------*/
-#ifndef __SCI_OBJECT_STRUCTURE__
-#define __SCI_OBJECT_STRUCTURE__
-
-
-#ifdef _MSC_VER
-#include <windows.h>
-#include <windowsx.h>
-#ifndef __GNUC__XXX
-#include <commctrl.h>
-#endif
-#include <winuser.h>
-#include "../../modules/gui/src/c/wsci/wgnuplib.h"
-#endif
-
-/*en fait il n'y a essentiellement besion que de Math.h dans stack-c.h
-  sauf pour les callback (il faudrait creer une fonction et l'appeler) */
-#include "../stack-c.h"
-#include "StringMatrix.h"
-
-
-#ifndef _MSC_VER
-#ifndef FALSE
-#define FALSE 0
-#endif
-#ifndef TRUE 
-#define TRUE 1
-#endif
-#define PS_SOLID 0
-#define HS_HORIZONTAL 0
-#define PLANES 0
-#define RASTERCAPS 0
-#define RC_PALETTE 0
-#define BITSPIXEL 0
-#define FLOAT 0
-#define TEXTMETRIC 0
-#define GM_ADVANCED 0
-#define MWT_IDENTITY 0
-#define HORZRES 0
-#define VERTRES 0
-#define VERTSIZE 0
-#define DEFAULT_CHARSET 0
-#define HORZSIZE 0                                                     
-#define MF_SEPARATOR 0
-#define SW_MINIMIZE 0
-#define SW_SHOWNORMAL 0
-#define SB_VERT 0
-#define SB_HORZ 0
-#endif 
-#define NUMCOLORS_SCI 32
-#define SCI_FIGURE_NAME_LENGTH 256
-/* Renvoi le pointeur sur la structure */
-
-#define pFIGURE_FEATURE(pointobj)      ((sciFigure        *)pointobj->pfeatures)/** */
-#define pSTATUSB_FEATURE(pointobj)     ((sciStatusBar     *)pointobj->pfeatures)/** */
-#define pSUBWIN_FEATURE(pointobj)      ((sciSubWindow     *)pointobj->pfeatures)/** */
-#define pTEXT_FEATURE(pointobj)        ((sciText          *)pointobj->pfeatures)/** */
-#define pTITLE_FEATURE(pointobj)       ((sciTitle         *)pointobj->pfeatures)/** */
-#define pLEGEND_FEATURE(pointobj)      ((sciLegend        *)pointobj->pfeatures)/** */
-#define pPOLYLINE_FEATURE(pointobj)    ((sciPolyline      *)pointobj->pfeatures)/** */
-#define pARC_FEATURE(pointobj)         ((sciArc           *)pointobj->pfeatures)/** */
-#define pRECTANGLE_FEATURE(pointobj)   ((sciRectangle     *)pointobj->pfeatures)/** */
-#define pMERGE_FEATURE(pointobj)       ((sciMerge         *)pointobj->pfeatures)/* DJ.A 30/12 */
-#define pSURFACE_FEATURE(pointobj)     ((sciSurface       *)pointobj->pfeatures)/** */
-#define pLIGHT_FEATURE(pointobj)       ((sciLightSource   *)pointobj->pfeatures)/** */ 
-/*#define pAXIS_FEATURE(pointobj)        ((sciAxis          *)pointobj->pfeatures)*/ /** */
-#define pAXES_FEATURE(pointobj)        ((sciAxes          *)pointobj->pfeatures)/** */
-#define pGRAYPLOT_FEATURE(pointobj)    ((sciGrayplot      *)pointobj->pfeatures)/** */
-#define pFEC_FEATURE(pointobj)         ((sciFec           *)pointobj->pfeatures)/** */
-#define pPANNER_FEATURE(pointobj)      ((sciPanner        *)pointobj->pfeatures)/** */
-#define pSBH_FEATURE(pointobj)         ((sciScrollBarHorz *)pointobj->pfeatures)/** */
-#define pSBV_FEATURE(pointobj)         ((sciScrollBarVert *)pointobj->pfeatures)/** */
-#define pLABELMENU_FEATURE(pointobj)   ((sciLabelMenu     *)pointobj->pfeatures)/** */
-#define pMENUCONTEXT_FEATURE(pointobj) ((sciMenuContext   *)pointobj->pfeatures)/** */
-#define pMENU_FEATURE(pointobj)        ((sciMenu          *)pointobj->pfeatures)/** */
-#define pAGREG_FEATURE(pointobj)       ((sciAgreg         *)pointobj->pfeatures)/** */
-#define pSEGS_FEATURE(pointobj)        ((sciSegs          *)pointobj->pfeatures)/** */
-
-#define pLABEL_FEATURE(pointobj)       ((sciLabel         *)pointobj->pfeatures)/** */
-
-#define pUIMENU_FEATURE(pointobj)       ((sciUimenu       *)pointobj->pfeatures)/** */
-
-#ifndef _MSC_VER
-typedef unsigned short HMENU;
-typedef void *HFONT;                                         
-typedef int BOOL;                                       
-typedef unsigned long DWORD;
-#endif
-
-typedef struct tagPOINT2D
-{
-  double x;
-  double y;
-}
-POINT2D;
-
-typedef struct tagPOINT3D
-{/** */
-  double x;/** */
-  double y;/** */
-  double z;/** */
-}/**used to specifie a 3D coordinates */
-POINT3D;  
-
-/**@name sciEntityType
- * Used to determine the type of the entity
- * @memo SCI_FIGURE,
- * @memo SCI_SUBWIN,
- * @memo SCI_TEXT,
- * @memo SCI_TITLE,
- * @memo SCI_LEGEND,
- * @memo SCI_ARC,
- * @memo SCI_POLYLINE,
- * @memo SCI_RECTANGLE,
- * @memo SCI_SURFACE,
- * @memo SCI_LIGHT,
- * @memo SCI_AXIS, 
- * @memo SCI_AXES, 
- * @memo SCI_SEGS 
- * @memo SCI_GRAYPLOT, 
- * @memo SCI_FEC,
- * @memo SCI_PANNER,
- * @memo SCI_SBH,
- * @memo SCI_SBV,
- * @memo SCI_MENU,
- * @memo SCI_MENUCONTEXT,
- * @memo SCI_STATUSB,
- */
-typedef enum
-  {/**Entity type FIGURE*/
-    SCI_FIGURE,                
-    /**Entity type SUBWINDOW*/
-    SCI_SUBWIN,                
-    /**Entity type TEXT*/
-    SCI_TEXT,                  
-    /**Entity type TITLE */
-    SCI_TITLE,         
-    /**Entity type LEGEND */
-    SCI_LEGEND,                
-    /**Entity type ARC */
-    SCI_ARC,                   
-    /**Entity type POLYLINE*/
-    SCI_POLYLINE,          
-    /**Entity type RECTANGLE*/
-    SCI_RECTANGLE,    
-    /**Entity type SURFACE*/
-    SCI_SURFACE,
-    /**Entity type MERGE*/  /* DJ.A 30/12 */
-    SCI_MERGE,
-    /**Entity type LIGHT*/
-    SCI_LIGHT,         
-    /**Entity type AXIS*/
-    SCI_AXIS,  
-    /**Entity type AXES*/
-    SCI_AXES,    
-    /**Entity type SEGS*/
-    SCI_SEGS,  
-    /**Entity type GRAYPLOT*/
-    SCI_GRAYPLOT, 
-    /**Entity type FEC*/
-    SCI_FEC,                           
-    /**Entity type PANNER*/
-    SCI_PANNER,                
-    /**Entity type HORIZONTALL SCROLL BAR */
-    SCI_SBH,                   
-    /**Entity type VERTICALL SCROLL BAR*/
-    SCI_SBV,                   
-    /**Entity type MENU*/
-    SCI_MENU,                  
-    /**Entity type CONTEXT MENU*/
-    SCI_MENUCONTEXT,   
-    /**Entity type STATUS BAR*/
-    SCI_STATUSB,           
-    /**Entity type Compound */
-    SCI_AGREG,                 
-    /**Entity type LABEL created by F.Leray 26.05.04 */
-    SCI_LABEL,
-    /**Entity type UIMENU created by A.C 28.09.05 **/
-    SCI_UIMENU
-  }
-/**Struct of Entity type*/
-sciEntityType; 
-
-
-typedef struct _Vertices 
-{
-  int value_xm;
-  int value_ym;
-  double value_x;
-  double value_y;
-  double value_z;
-  
-  struct _Vertices * pNext;
-} 
-Vertices;
-
-
-/**@name sciPointObj
- * Used to determine the feature and the type of the entity
- */
-typedef struct
-{/** */
-  sciEntityType entitytype;
-  /**  points to the characteristic of the structure (figure, axes...) */
-  void *pfeatures;             
-}/** */
-sciPointObj;  
-
-
-/**@name sciHandleTab
- * Used to determine handles associated with the entity
- */
-typedef struct tagHandleTab
-{/** point to the structure that uses this handle */
-  sciPointObj *pointobj;       
-  /** */
-  long index;
-  /** */
-  struct tagHandleTab *pprev;
-  /** */
-  struct tagHandleTab *pnext;
-}/** */
-sciHandleTab; 
-
-/* /\**@name sciClipTab */
-/*  * Used to determine store clipping associated to the entity */
-/*  *\/ */
-/* typedef struct  */
-/* {/\** *\/ */
-/*   int index; */
-/*   /\** *\/ */
-/*   double clip[4]; */
-/* }/\** *\/ */
-/* sciClipTab;   */
-
-
-/**@name Sons
- * Used to determine the hierarchy
- sciPointObj *pointobj;
- sciSons     *pnext;
-*/
-typedef struct tagSons
-{
-  /** */
-  struct tagSons *pprev;         
-  /**  is the pointer of next the son's structure      */
-  sciPointObj *pointobj;       
-  /** */
-  struct tagSons *pnext;
-}
-/** */
-sciSons;  
-
-
-/**@name RelationShip
- * Used to determine the hierarchy
- */
-typedef struct
-{/** is the scilab handle of THIS */
-  sciHandleTab *phandle;       
-  /** points to the parent structures    */
-  sciPointObj *pparent;               
-  /** points to the sons structures      */
-  sciSons *psons;             
-  /** the last sciSons of the list (the first created!) */
-  sciSons *plastsons;                  
-  /** points to the current son          */
-  sciPointObj *pcurrentson;    
-}/** */
-sciRelationShip;  
-
-
-
-/**@name GraphicContext
- * Used to know what are the contexte value attached with the Graphic area  
- * valeur de hachure (fillstyle)
- * HS_BDIAGONAL 45-degree downward left-to-right hatch 
- * HS_CROSS Horizontal and vertical crosshatch 
- * HS_DIAGCROSS 45-degree crosshatch 
- * HS_FDIAGONAL 45-degree upward left-to-right hatch 
- * HS_HORIZONTAL Horizontal hatch 
- * HS_VERTICAL Vertical hatch 
- * 
- * LineStyle:
- * PS_SOLID The pen is solid. 
- * PS_DASH The pen is dashed. This style is valid only when the pen width is one 
- *         or less in device units. 
- * PS_DOT The pen is dotted. This style is valid only when the pen width is one 
- *         or less in device units. 
- * PS_DASHDOT The pen has alternating dashes and dots. This style is valid only 
- *         when the pen width is one or less in device units. 
- * PS_DASHDOTDOT The pen has alternating dashes and double dots. This style is 
- *         valid only when the pen width is one or less in device units. 
- * PS_NULL The pen is invisible. 
- * PS_INSIDEFRAME The pen is solid. When this pen is used in any GDI drawing 
- *         function that takes a bounding rectangle, the dimensions of the 
- *         figure are shrunk so that it fits entirely in the bounding rectangle, 
- *         taking into account the width of the pen. This applies only to geometric pens. 
- */
-typedef struct
-{
-  /** currently not used in this version */
-  /** pointe sur un ID de la table des couleur Scilab */
-  int backgroundcolor;     
-  /** pointe sur un ID de la table des couleur Scilab */
-  int foregroundcolor;
-  /** */
-  int fillcolor;
-  /** */
-  int fillstyle;
-  /** associeted to PEN or mark size */
-  int linewidth;
-  /** */
-  BOOL isline;
-  /** */
-  int linestyle;
-  /** */
-  BOOL ismark;
-  /** */
-  int markstyle;
-  /** */
-  int marksize;
-  /** */
-  int marksizeunit;
-  /** */
-  int markbackground;
-  /** */
-  int markforeground;
-}/** */
-sciGraphicContext;  
-
-
-/*----------------------
-  SCIFONT.H header file no more used
-  ----------------------*/
-
-/* Changing those lines, be carreful that
-   the new attribut is update in the sciset and sciget routines
-*/
-/** */
-#define SCI_DONT_CARE          0
-/** */
-#define SCI_ATTR_BOLD          1
-/** */
-#define SCI_ATTR_ITALIC        2
-/** */
-#define SCI_ATTR_UNDERLINE     4
-/** */
-#define SCI_ATTR_STRIKEOUT     8
-
-
-/**@name sciFont
- * Used to know what are the contexte value attached with the Graphic area  
- */
-typedef struct
-{
-  /** currently not used in this version */
-  /* il faudrait prendre la font windows */
-  /** pointe sur un ID de la table des couleur Scilab */
-  int backgroundcolor;         
-  /** pointe sur un ID de la table des couleur Scilab */
-  int foregroundcolor;         
-  /** pointe sur le nom de la fonte  */
-  char *pfontname;              
-  /** renvoi la longueur de fontname */
-  unsigned int fontnamelen;    
-  /** */
-  int fonttype; /* scilab font index 0 to 9 */
-  /** Gets the width of the character in tenth of point */
-  int fontdeciwidth;           
-  /** this is coded in tenth of a degree */
-  int textorientation;         
-}/** */
-sciFont;  
-
-
-/**@name scigMode
- * Used to determine all the mode that can be used. Only some entity can sets this itself
- */
-typedef struct
-{ 
-  /** Are new Plot added to the old plot on the graphics window        */
-  BOOL addplot;               
-  /** The min max ranges of the the graphics window is given by users  */
-  BOOL autoscaling;    
-  /** Is zooming allowed                                               */
-  BOOL zooming; 
-  /** Is the graphic automatically resized to fill the graphics window */
-  BOOL wresize;            
-  /** Is old style                                                     */
-  BOOL oldstyle;
-  /** drawing xor mode                                                         */
-  int xormode;
-                      
-  
-}/** */
-scigMode;  
-
-
-/**@name Range
- * Structure used to specifie Range
- */
-typedef struct
-{/** */
-  double xmin;
-  /** */
-  double xmax;
-  /** */
-  double ymin;
-  /** */
-  double ymax;
-  /** */
-  double zmin;
-  /** */
-  double zmax;
-}/** */
-sciRange;  
-
-
-/**@name Figure
- * Structure used to specify Figure (different to XGC) 
- * @see 
- */
-typedef struct
-{/** will be integrated in the new structure      */
-  struct BCG *pScilabXgc;      
-  sciRelationShip relationship;
-  scigMode gmode;
-  sciGraphicContext graphiccontext; /* the only property used here is background */
-  sciPointObj * originalsubwin0011;
-  /** specifies the title for this window  */
-  char name[SCI_FIGURE_NAME_LENGTH];    
-  /** specifies le length of the string name */
-  int namelen;
-  /** specifies the number of this window            */
-  int number;                         
-  /** specifies the dimension of this graphic        */
-  int figuredimwidth;                 
-  int figuredimheight;                
-  /* specifies the dimension of this figure         */
-  int windowdimwidth;                 
-  int windowdimheight; 
-  /* specifies the dimension of this window         */
-  /** */
-  int inrootposx;
-  int inrootposy;
-  /** specifies the colr map                         */
-  double *pcolormap;
-  /** specifies if this window is iconified*/
-  int numcolors;
-  BOOL isiconified;                 
-  /** specifies if this window is selected             */
-  BOOL isselected; 
-  int rotstyle;
-  /** specifies if this object is visble             */
-  BOOL visible;
-  BOOL auto_redraw;
-  /** specifies the number of the selected son         */
-  int numsubwinselected;
-  /** specifies the current pixmap status         */
-  int pixmap; /* DJ.A 30/12 */
-  int wshow ;
-  
-  BOOL allredraw;
-  /*   BOOL force_draw; /\* exclusively used with draw command to force the drawing of the object *\/ */
-
-  sciFont fontcontext; /* F.Leray 08.04.04 */
-  int * user_data; /* adding 27.06.05 */
-  int size_of_user_data;
-  
-}/** */
-sciFigure;  
-
-typedef enum { ALIGN_NONE, ALIGN_LEFT, ALIGN_CENTER, ALIGN_RIGHT } sciTextAlignment ;
-
-/**@name Text
- * Structure used to specify Text
- */
-typedef struct
-{
-  /** */
-  sciRelationShip relationship;
-  /** */
-  sciFont fontcontext;
-  sciGraphicContext graphiccontext; /* the only properties used by Text are foreground and background */
-  
-  /** the displayed text */
-  StringMatrix * pStrings ;
-
-  /** position inside the axes (not pixel) */
-  double x ;
-  /** position inside the axes (not pixel) */
-  double y ;
-  double z ;
-
-  BOOL is3d ; /**< If FALSE the text will be displayed using the 2d scale even if its parent
-               *   subwindow is in 3d mode. */
-
-  BOOL autoSize ; /* to know wether the size of the displayed array is specified by user or */
-                   /* automatically computed. */
-
-  double userSize[2] ; /**< Width and height of the displayed string array defined by user */
-  
-  sciTextAlignment stringsAlign ; /**< Alignment of the strings inside the array */
-  
-  BOOL centeredPos ; /**< to know wether the (x,y) position is the point in the middle of the
-                        string or the lower-left point */
-  BOOL isboxed  ;
-  BOOL isline   ; /* switch the contour of the box */
-  BOOL isfilled ; /* switch the transparency of the box */
-  /** */
-  /** specifies the text scilab code for the callback associated with this entity */
-  char *callback; 
-  /** the length of the callback code */
-  int callbacklen; 
-  int callbackevent; 
-  /** specifies if this object is visble             */
-  BOOL visible;
-  int isclip;
-  double clip_region[4];
-  int clip_region_set;
-  
-  int * user_data; /* adding 27.06.05 */
-  int size_of_user_data;
-
-}
-sciText;  
-
-
-
-
-/**@name sciLegendPlace
- * Enumeration used to specify the title place 
- */
-typedef enum
-  {
-    /** */
-    SCI_LEGEND_OUTSIDE = -1,
-    /** */
-    SCI_LEGEND_IN_INSIDE = 0,
-    /** */
-    SCI_LEGEND_IN_UPPER_LEFT = 1,
-    /** */
-    SCI_LEGEND_IN_UPPER_RIGHT = 2,
-    /** */
-    SCI_LEGEND_IN_LOWER_LEFT = 3,
-    /** */
-    SCI_LEGEND_IN_LOWER_RIGHT = 4,
-    /** */
-    SCI_LEGEND_IN_SPECIFIED = 5
-  }  /** */
-sciLegendPlace;
-
-
-
-/**@name Legend
- * Structure used to specify Legend 
- */
-typedef struct
-{
-  sciGraphicContext graphiccontext; /* used to draw the line and marks of the curve F.Leray 21.01.05 */
-  /** */
-  int nblegends;
-  /** */
-  int *pstyle;
-  /** */
-  sciText text;
-  /** */
-  POINT2D pos;
-  /** specifies the frame's width */
-  int width;                
-  /** specifies the frame's height */
-  int height;               
-  /** */
-  BOOL isselected;
-  /** specifies if the legend is surrounded */
-  BOOL issurround;          
-  /* void    *associetedentity;  get the associeted entity by asking parents.relation.sons */
-  /* the subwindow dimension is get by asking relation     */
-  sciLegendPlace place;
-  /** */
-  sciSons *associatedentity;
-  /** pointer on the labelled objects */
-  sciPointObj **pptabofpointobj;
-  /** specifies if this object is visble             */
-  BOOL visible; 
-  int isclip;
-  double clip_region[4];
-  int clip_region_set;
-  int * user_data; /* adding 27.06.05 */
-  int size_of_user_data;
-}/** */
-sciLegend;  
-
-
-/**@name sciTitlePlace
- * Enumeration used to specify the title place 
- */
-typedef enum
-  {
-    /** */
-    SCI_TITLE_IN_TOP = 0,
-    /** */
-    SCI_TITLE_IN_BOTTOM = 1,
-  }/** */
-sciTitlePlace; 
-
-
-/**@name Titre
- * Structure used to specify Texte
- */
-typedef struct
-{
-  /** */
-  sciText text;
-  /** absolut position in subindow*/
-  POINT2D pos;
-  int ptype;
-  /** up, down */
-  sciTitlePlace titleplace;
-  /** */
-  BOOL isselected;
-  /** specifies if this object is visble             */
-  BOOL visible;
-  int isclip;
-}/** */
-sciTitle;
-
-/**@name Titre
- * Structure used to specify Labels like Title or classic labels
- */
-typedef struct
-{
-  /* sciRelationShip relationship; */
-  /** contains the data to display the label */
- /*  sciText text; */
-  sciPointObj * text ;
-  /** absolut position in subindow*/
-  /* POINT2D pos; */
-  int ptype ; /**< to distinguish between title, x_label,.... */
-
-  /** */
-  BOOL isselected;
-  /** specifies if this object is visible  */
-  /* BOOL visible; */
-  /* int isclip; */
-/*   double clip_region[4]; */
-/*   int clip_region_set; */
-/*   int * user_data; /\* adding 27.06.05 *\/ */
-/*   int size_of_user_data; */
-  /*BOOL isfilled;*/ /* to know if a label has a colored frame as background */
-  BOOL auto_position; /* automatic or manual position selection for label */
-  BOOL auto_rotation; /* automatic or manual rotation selection for label (depends on the current view mode 2d or 3d mainly for y and z labels) */
-                      /* not implemented for titles */
-
-}
-sciLabel ;
-
-typedef struct
-{
-  sciRelationShip relationship;
-  /** */
-  sciText label; /* Callback in sciText struct. */
-  /** specifies if this object is visble             */
-  BOOL visible;
-  BOOL handle_visible;
-  BOOL Enable;
-
-  int MenuPosition;
-  int CallbackType;
-
-  #if _MSC_VER
-       HMENU hMenu;
-       int IDM_this;
-  #endif
-
-
-}/** */
-sciUimenu;
-
-/* the part of the drawn box for 3d axis */
-typedef enum { BT_OFF = FALSE, BT_ON = TRUE, BT_HIDDEN_AXIS, BT_BACK_HALF } EAxesBoxType ;
-
-typedef struct 
-{  
-  double  xlim[4];  /* [xmin,xmax,ar,nint]           */ /* F.Leray 21.09.04 : NOUVEAU sens pour xlim,ylim,zlim: NON! Comme avant valeurs en tight limits on/off */ /* F.Leray 07.10.04 */
-  double  ylim[4];  /* [ymin,ymax,ar,nint]           */ /* pour afficher les graduations automatiques on a calcule des xyzgrads provenant de TheTicks */
-  double  zlim[4];  /* [zmin,zmax,ar,nint]         */ 
-
-  /* tics data from algo */
-  double  xgrads[20], ygrads[20], zgrads[20];                   /* Here they are  */
-  int nxgrads, nygrads, nzgrads;                         /* with their size <=> nber of tics */
-
-  /* tics data from user (=> u_...)*/
-  double *u_xgrads, *u_ygrads, *u_zgrads;                       /* Here they are  */
-  int u_nxgrads, u_nygrads, u_nzgrads;                   /* with their size <=> nber of tics */
-  
-  int  ticscolor;
-  /*  int  fontsize;
-      int  textcolor;*/
-  sciFont fontcontext;
-  
-  int  subint[3]; /* Dj.A 17/12/03 */
-  EAxesBoxType  rect ; /**< to know the part of the box we have to draw */
-  char xdir;   /**<  xdir  = 'u' | 'd'  : gives the xy-axes positions */ 
-  char ydir;   /**<  ydir  = 'r' | 'l' : gives the xy-axes positions */ 
-
-  /* flags for switching from auto to manual ticks */
-  BOOL auto_ticks[3]; /* if on, it means that the ticks are taken from computation (see theticks algo. by Francois D.) */
-  
-  char **u_xlabels,  **u_ylabels,  **u_zlabels; /* label string corresponding to each specified u_xyzgrads */
-    
-  int hiddenAxisColor ; /* the color and style of the hidden axis */
-
-  double  limits[7]; /* = 1 set tight limits = 0 set axes auto shape */
-  integer flag[3]; /* 3d options */
-  
-  /* F.Leray 07.10.04 REMOVE AAINT*/
-  int nbsubtics[3]; /* Don't touch to subint because also deals with drawaxis: AXES structure has multiple uses... */ /* F.Leray 07.10.04 */
-
-  BOOL reverse[3]; /* if TRUE, it means that the corresponding axe is reversed */
-  BOOL axes_visible[3]; /* if TRUE, it means that the corresponding axes is drawn */
-  
-}
-AXES; 
-
-/**@name SubWindow
- * Structure used to specify SubWindow wich is a subplot
- */
-typedef struct
-{
-  AXES axes;
-  /** */
-  sciRelationShip relationship;
-  /** */
-  scigMode gmode;
-  /** */
-  sciGraphicContext graphiccontext;
-  /** */
-  /** specifies the title for this window  */
-  char name[sizeof ("ScilabGraphic") + 4];         
-  /** */
-  int namelen;
-  /** specifies the number for this window                   */
-  int number;                  
-  /** specifies if this subwindow is selected                */
-  BOOL isselected;                      
-  /** specifies the position in the parent figure            */
-  int infigureposx;                     
-  /** specifies the position in the parent figure            */
-  int infigureposy;                     
-  /** specifies the width of the subplot                     */
-  int windimwidth;                    
-  /** specifies the width of the subplot                     */
-  int windimheight;                  
-  /** specifies the limite of the plot                       */
-  sciRange range;                       
-  /** specifies the factor of the x zoom                     */
-  int zoomx;                            
-  /** specifies the factor of the y zoom                     */
-  int zoomy;
-  double SRect[6]; /* [xmin xmax ymin ymax zmin zmax] : Strict rect. coming from update_specification_bounds function or from a set(a,"data_bounds",[...]) */
-  double FRect[6]; /* real data_bounds */
-  double WRect[4]; /* size of the subplot */
-  double ARect[4]; /* margins, give the size of the axe*/
-  int zoomy_kp;
-  /* ZRect_kp is now useless : when unzooming we deal with SRect values */
-  double ZRect[6]; /* reversed for zoom only to avoid using FRect as zoom box AND computed box */ /* F.Leray 09.12.04 */
-
-  char logflags[3]; /* Z has a logflag now F.Leray 03.11.04 */
-  int grid[3];
-  /*   BOOL isaxes; */
-
-  BOOL is3d;
-  BOOL tight_limits;
-  double theta_kp;
-  double alpha_kp;
-  /* viewing angles */
-  double theta;
-  double alpha;        
-  /** specifie the associated entity popup menu */
-  sciPointObj *pPopMenu;    
-  /** specifies the text scilab code for the callback associated with this entity */
-  char *callback; 
-  /** the length of the callback code */
-  int callbacklen;  
-  int callbackevent; 
-  /** specifies if this object is visble             */
-  BOOL visible;
-
-  int isclip;
-  double clip_region[4];
-  int clip_region_set;
-  /**DJ.Abdemouche 2003**/
-  integer project[3];
-  BOOL isoview; 
-  int hiddencolor;
-  int hiddenstate;
-  BOOL facetmerge; 
-  int with_leg; /* Adding F.Leray 07.05.04 */ /* for strflag[0] support : not needed today */
-  BOOL cube_scaling; /* Matlab like view in 3D when one or two range is/are preferential */
-  BOOL FirstPlot; /* An internal state used to indicated that high level functions must not use SRect*/
-
-  /* F.Leray 25.04.05 Labels in sciSubWin*/
-  sciPointObj * mon_title;
-  sciPointObj * mon_x_label;
-  sciPointObj * mon_y_label;
-  sciPointObj * mon_z_label;
-
-  /*  An internal state used as subtics flag (auto == FALSE, TRUE == manual) named flagNax */
-  BOOL flagNax;
-  int surfcounter; /* used to merge 3d objects */
-  int * user_data; /* adding 27.06.05 */
-  int size_of_user_data;
-  
-  int YGradMostOnLeft;
-  int YGradMostOnRight;
-  int XGradMostOnTop;
-  int XGradMostOnBottom;
-
-  BOOL firsttime_x;
-  BOOL firsttime_y;
-
-  Vertices * vertices_list; /* F.Leray 30.08.05 : stores the (x,y) coord. in term of user data coord. + pixel value on screen */
-}/** */
-sciSubWindow;  
-
-
-/**@name Arc
- * Structure used to specify 
- * @author Matthieu PHILIPPE /MAJ D.ABDEMOUCHE
- * @version 0.1
- * @args 
- * @return 
- * @see 
- */
-typedef struct
-{
-  /** */
-  sciRelationShip relationship;
-  /** */
-  sciGraphicContext graphiccontext;
-  /** */
-  double x;
-  /** */
-  double y;
-  /** */
-  double width;
-  /** */
-  double height;
-  /** begin at alpha1 */
-  double alphabegin;           
-  /** end at alpha2   */
-  double alphaend;
-  int fill; /* another flag to specify wether we should have a box around the text */
-  /** */
-  BOOL isselected;
-  /** specifies the text scilab code for the callback associated with this entity */
-  char *callback; 
-  /** the length of the callback code */
-  int callbacklen;   
-  int callbackevent;
-  /** specifies if this object is visble             */
-  BOOL visible;
-  int isclip;
-  double clip_region[4];
-  int clip_region_set;
-  double z; /**DJ.Abdemouche 2003**/
-  int * user_data; /* adding 27.06.05 */
-  int size_of_user_data;
-  BOOL isfilled; /* to know if an arc is filled or not */
-  /* the isline property is inside the associated graphiccontext */
-}  /** */
-sciArc;
-
-
-/**@name listPoints
- * Structure used to specify 
- */
-typedef struct taglistPoints
-{
-  /** */
-  double x;
-  /** */
-  double y;
-  /** */
-  struct taglistPoints *pnextpoints;
-}  /** */
-sciListPoints;
-
-
-/**@name Polyline
- * Structure used to specify 
- * @author Matthieu PHILIPPE /MAJ D.ABDEMOUCHE
- * @version 0.1
- * @args 
- * @return 
- * @see 
- */
-typedef struct
-{
-  sciRelationShip relationship;
-  sciGraphicContext graphiccontext;
-  double *pvx;                 /* vecteur des points x doublon avec pvector je les garde pour compatiblite*/
-  double *pvy;                 /* vecteur des points y doublon avec pvector*/
-  double *pvz; /**DJ.Abdemouche 2003**/
-  int n1;                       /** number of points */
-  int n2;                       /** numbre of curves if Plot **/ 
-  int closed;                   /** is it a closed polyline */
-  int plot;                     /** defines the polyline_style (interpolated, staircase, bar_plot,...) : is it simple poly or a plot (Plot2d /Plot2d1/.../Plot2d4) */
-  BOOL isselected;
-  char *callback;              /** specifies the text scilab code for the callback associated with this entity */
-  int callbacklen;             /** the length of the callback code */  
-  int callbackevent;
-  /** specifies if this object is visble             */
-  BOOL visible;
-  int isclip;
-  double clip_region[4];
-  int clip_region_set;
-  int * user_data; /* adding 27.06.05 */
-  int size_of_user_data;
-  BOOL isfilled; /* to know if a polyline is filled or not */
-  BOOL isinterpshaded;
-  int *scvector;
-  int dim_icv; /* dimension of the interpolated color vector (3 or 4) */
-  int bar_layout;
-
-  double * x_shift;
-  double * y_shift;
-  double * z_shift;
-  
-  double bar_width;
-  
-  double arsize_factor; /* to be able to enlarge arrow size without changing the line thickness */
-}
-sciPolyline;  /** */
-
-
-/**@name Rectangle
- * Structure used to specify 
- */
-typedef struct
-{
-  sciRelationShip relationship;
-  sciGraphicContext graphiccontext;
-  double x;                       /** original */
-  double y;                       /** original */
-  double width;
-  double height;
-  int fillflag;
-  int str; 
-  integer strwidth;
-  integer strheight;
-  double horzcurvature;                  /** to do rectangle with round corner */ /*F.Leray not implemented till now... 19.03.04 to see...*/
-  double vertcurvature;                  /** to do rectangle with round corner */ /*F.Leray not implemented till now... 19.03.04 to see...*/
-  BOOL isselected;
-  char *callback; /** specifies the text scilab code for the callback associated with this entity */
-  int callbacklen; /** the length of the callback code */  
-  int callbackevent;
-  /** specifies if this object is visble             */
-  BOOL visible;
-  int isclip;
-  double clip_region[4];
-  int clip_region_set;
-  double z;  /** rectangle */
-
-  BOOL flagstring; /* flag used to determine wether the rectangle is used to surround a string : used when axes is reversed */
-  int * user_data; /* adding 27.06.05 */
-  int size_of_user_data;
-  BOOL isfilled; /* to know if a rectangle is filled or not */
-}
-sciRectangle;  /** */
-
-
-typedef enum
-  {
-    SCI_FAC3D,
-    SCI_CONTOUR,
-    SCI_PARAM3D,
-    SCI_PARAM3D1,
-    SCI_PLOT3D,
-  }
-sciTypeOf3D;
-
-
-/**@name Surface
- * Structure used to specify 
- */
-typedef struct
-{
-  sciRelationShip relationship;
-  sciGraphicContext graphiccontext;
-  double * pvecx; /* x data */
-  double * pvecy; /* y data */
-  double * pvecz; /* z data */
-  double *inputCMoV; /* Adding here in order to always have the input data*/
-  /* We will determinate if it is a vector or matrix data with m3n and n3n values*/
-  double *zcol;
-  double *color;  /* Final matrix used only for drawing :  */
-                  /*  color == zcol if 'direct' mode used (direct indices on colormap)  */
-                  /* else 'scaled' mode used => color == linear interp. of zcol on the colormap */
-
-  int cdatamapping; /* like in Matlab, it determines how the color is computed ('scaled' or 'direct' mode) */
-                    /* 0: scaled */
-                    /* 1: direct (default) */
-  integer izcol; /* 0 : no color; 1 : color is a vector, 2 : color is a matrix */
-  integer dimzx;
-  integer dimzy;
-
-  /*F.Leray 12.03.04 Adding here to know the length of arrays pvecx, pvecy and pvecz*/
-
-  int nc; /* number of colors */
-  int nx; /* number of x data */
-  int ny; /* number of y data */
-  int nz; /* number of z data */
-  int isfac;
-  int m1,n1;
-  int m2,n2;
-  int m3,n3;
-  int m3n,n3n;
-
-  integer flag[3];
-  double ebox[6];
-  int flagcolor; /* this flag indicates the type of the color of how the facet have to be colored 
-                   0: uniformed color
-                   1: facet's color are computed with z*/ /* in case of a simple plot...!!! F.Leray 19.03.04 */
-  sciTypeOf3D typeof3d; /* Fac3d or Plot3d */
-  int hiddencolor;
-  BOOL isselected;
-  char *callback; /** specifies the text scilab code for the callback associated with this entity */
-  int callbacklen; /** the length of the callback code */  
-  int callbackevent;
-  /** specifies if this object is visble             */
-  BOOL visible;
-
-  int flag_x; /* 1 if the vector is increasing, -1 if decreasing. */
-              /* The vector should be either increasing or decreasing. */
-  int flag_y;
-  
-  int * user_data; /* adding 27.06.05 */
-  int size_of_user_data;
-}
-sciSurface;  /** */
-
-
-/**@name merge DJ.A 30/12
- * Structure used to specify 
- */
-
-typedef struct
-{
-  sciRelationShip relationship;
-  long *from_entity; /* vector of handles on the facet or segment entity*/
-  int *index_in_entity;/*index of facet or segment in its entity*/
-  int N; /* number of facets or segments */
-  int * user_data; /* adding 27.06.05 */
-  int size_of_user_data;
-}
-sciMerge;  /** */
-
-
-/**@name LightSource
- * Structure used to specify 
- */
-typedef struct
-{
-  sciRelationShip relationship;
-  sciGraphicContext graphiccontext;
-  POINT3D org;
-  BOOL switchon;               /* on or off */
-  /** specifies if this object is visble             */
-  BOOL visible;
-  int isclip;
-  double clip_region[4];
-  int clip_region_set;
-  int * user_data; /* adding 27.06.05 */
-  int size_of_user_data;
-}
-sciLightSource;         /** */
-
-
-/**@name Axis
- * Structure used to specify axis feature 
- */
-/* NOT USED IN FACT */
-/* typedef struct */
-/* { */
-/*   sciRelationShip relationship; */
-/*   sciGraphicContext graphiccontext;  */
-/*   sciText text; */
-/*   char strflag[4]; */
-/*   int strflaglen; */
-/*   double aaint[4]; */
-/*   double minx; */
-/*   double miny; */
-/*   double minz; */
-/*   double maxx; */
-/*   double maxy; */
-/*   double maxz; */
-/*   int styledimension;               /\* 2=2d 3=3d *\/ */
-/*   int stylecrossing; */
-/*   double orgcrossing; */
-/*   char *plabelx; */
-/*   char *plabely; */
-/*   char *plabelz; */
-/*   BOOL manualscale; */
-/*   BOOL plotit; */
-/*   BOOL isselected; */
-/*   int grid; */
-/*   char *callback; /\** specifies the text scilab code for the callback associated with this entity *\/ */
-/*   int callbacklen; /\** the length of the callback code *\/   */
-/*   int callbackevent; */
-/*   /\** specifies if this object is visble             *\/ */
-/*   BOOL visible; */
-/*   int isclip; /\* Adding F.Leray 10.03.04*\/ */
-/* } */
-/* sciAxis;  /\** *\/ */
-
-
-
-/**@name Axes
- * Structure used to specify axes feature 
- * @author Djalel Abdemouche 
- * @version 0.1
- * @args 
- * @return 
- * @see 
- */
-typedef struct
-{
-  sciRelationShip relationship;
-  sciGraphicContext graphiccontext; 
-  char dir;   /** dir = 'r' | 'l' | 'u' | 'd' : gives the tics directions **/  
-  char tics;  /** tics = 'v' (for vector) or 'r' (for range) or i **/
-  POINT2D *vector;             /* vecteur de points redondant, for future developpement*/
-  double *vx;  /** vx vector of size nx **/
-  double *vy;  /** vy vector of size ny **/ 
-  /**DJ.Abdemouche 2003**/
-  double *vz; 
-  int nx;
-  int ny;
-  int nb_tics_labels; /* F.Leray 29.04.05 : number of tics_labels can be different from Max(nx,ny) if xy_type diff. from 'v' */
-  /***/
-  int nz;
-  char **str ;  /** string vector **/
-  int subint;  /** subints : number of sub intervals **/ 
-  char *format; /** format for tick marks **/
-  int fontsize;
-  int textcolor;
-  int ticscolor;
-  char logscale;
-  int seg;      /**0 or 1, flag which control the drawing of the segment associated to the axes **/
-  char *callback; /** specifies the text scilab code for the callback associated with this entity */
-  int callbacklen; /** the length of the callback code */  
-  int callbackevent;
-  /** specifies if this object is visble             */
-  BOOL visible;
-  int isclip;
-  double clip_region[4]; /* to introduce for axis ? */
-  int clip_region_set;
-
-  int * user_data; /* adding 27.06.05 */
-  int size_of_user_data;
-}
-sciAxes;  
-
-/**@name Segs
- * Structure used to specify axes feature 
- * @author Djalel Abdemouche 
- * @version 0.1
- * @args 
- * @return 
- * @see 
- */
-  
-typedef struct
-{
-  sciRelationShip relationship;
-  sciGraphicContext graphiccontext; 
-  double *vx;  /** vx vector of size Nbr **/ /*F.Leray 18.02.04 ...of size Nbr1 ? No depending on the type ptype*/
-  double *vy;  /** vy vector of size Nbr **/ /*F.Leray 18.02.04 ...of size Nbr2 ? No depending on the type ptype*/
-  double *vfx;
-  double *vfy;
-  integer Nbr1;   
-  integer Nbr2;
-  integer *pstyle;
-  integer iflag;      /**0 or 1, flag which control the drawing of the segment  **/
-  double arrowsize;  /*F.Leray units : hundreds (i.e. 100, 150,...)*/
-  double parfact;
-  integer ptype; /* if ptype=0, it is segments; if ptype=1, it is champ (champ or champ1)*/
-  integer typeofchamp; /* when ptype=0, if typeofchamp=0 => champ is invoked else champ1 is invoked (typeofchamp==1) */
-  BOOL isselected;
-  char *callback; /** specifies the text scilab code for the callback associated with this entity */
-  int callbacklen; /** the length of the callback code */  
-  int callbackevent;
-  /** specifies if this object is visble             */
-  BOOL visible;
-  int isclip;
-  double clip_region[4];
-  int clip_region_set;
-  double *vz; /**DJ.Abdemouche 2003**/
-  double *vfz;
-
-  int * user_data; /* adding 27.06.05 */
-  int size_of_user_data;
-}
-sciSegs; 
-
-
-
-/**@name Grayplot
- * Structure used to specify axes feature 
- * @author Djalel Abdemouche 
- * @version 0.1
- * @args 
- * @return 
- * @see 
- */
-typedef struct
-{
-  sciRelationShip relationship;
-  sciGraphicContext graphiccontext; 
-  
-  double *pvecx;  /** vx vector of size nx **/
-  double *pvecy;  /** vy vector of size ny **/ 
-  double *pvecz;  /** vz vector of size nx*ny **/  
-  int nx; 
-  int ny;
-  int type;   /** 0 if a grayplot, 1if a matplot **/  
-  char datamapping[7];
-  BOOL isselected;
-  char *callback; /** specifies the text scilab code for the callback associated with this entity */
-  int callbacklen; /** the length of the callback code */   
-  int callbackevent;
-  /** specifies if this object is visble             */
-  BOOL visible;
-  int * user_data; /* adding 27.06.05 */
-  int size_of_user_data;
-}
-sciGrayplot;  
-/** */
-
-/**@name Fec
- * Structure used to specify fec feature 
- * @author Djalel Abdemouche 
- * @version 0.1
- * @args 
- * @return 
- * @see 
- */
-typedef struct
-{
-  sciRelationShip relationship;
-  sciGraphicContext graphiccontext; 
-  
-  double *pvecx;  
-  double *pvecy;   
-  double *pnoeud;
-  double *pfun;    
-  int Nnode; 
-  int Ntr;  
-  double *zminmax; 
-  integer *colminmax;
-  integer *colout;
-  BOOL with_mesh;
-  BOOL isselected;
-  char *callback; /** specifies the text scilab code for the callback associated with this entity */
-  int callbacklen; /** the length of the callback code */ 
-  int callbackevent;
-  /** specifies if this object is visble             */
-  BOOL visible;
-  int * user_data; /* adding 27.06.05 */
-  int size_of_user_data;
-}
-sciFec;  /** */
-
-
-/**@name Panner
- * Structure used to specify 
- */
-typedef struct
-{
-  sciRelationShip relationship;
-  int posx;
-  int posy;
-  int width;
-  int height;
-  int totalheigth;             /* the height in the menu bar */
-}
-sciPanner;  /** */
-
-
-/**@name ScrollBarHorz
- * Structure used to specify 
- */
-typedef struct
-{
-  sciRelationShip relationship;
-  int poshorz;
-  int totalheight;
-}
-sciScrollBarHorz;  /** */
-
-
-/**@name ScrollBarVert
- * Structure used to specify 
- */
-typedef struct
-{
-  sciRelationShip relationship;
-  int posvert;
-  int totalwidth;
-}
-sciScrollBarVert;  /** */
-
-
-/**@name LabelMenu
- * Structure used to specify a menu 
- */
-typedef struct tagLabelMenu
-{
-  char *plabel;
-  struct tagLabelMenu *pnextlabelmenu;
-}
-sciLabelMenu;  /** */
-
-
-
-/**@name Menu
- * Structure used to specify a menu 
- */
-typedef struct
-{
-  sciRelationShip relationship;
-  sciGraphicContext graphiccontext;
-  sciText text;
-  sciLabelMenu *plabelmenu;
-  HMENU  hPopMenu;                     /** specifie the handle of the popup menu */
-}
-sciMenu /** */ , sciMenuContext;/** */
-
-
-/**@name MenuContext
- * Structure used to specify popupmenu called with the right mouse button
- *
- typedef struct {
- sciRelationShip    relationship;
- sciGraphicContext graphiccontext;
- sciText           text;
- sciLabelMenu      *plabelmenu;
- } sciMenuContext ;
- ATTENTION DECLARE SI DESSUS */
-
-/**@name StatusBar
- * Structure used to specify 
- */
-typedef struct
-{
-  sciRelationShip relationship;
-  sciGraphicContext graphiccontext;
-  sciText text;
-  char *ptext;
-}
-sciStatusBar;  /** */
-
-
-/**@name Panner
- * Structure used to specify 
- */
-typedef struct
-{
-  sciRelationShip relationship;
-  double xmin;                    /** original xmin */
-  double ymin;                    /** original ymin */
-  double xmax;
-  double ymax;
-  BOOL isselected;
-  char *callback; /** specifies the text scilab code for the callback associated with this entity */
-  int callbacklen; /** the length of the callback code */ 
-  int callbackevent;
-  /** specifies if this object is visble             */
-  BOOL visible;
-
-  int * user_data; /* adding 27.06.05 */
-  int size_of_user_data;
-}
-sciAgreg;  /** */
-
-#endif /*__SCI_OBJECT_STRUCTURE__ */
diff --git a/scilab/routines/graphics/PloEch.h b/scilab/routines/graphics/PloEch.h
deleted file mode 100644 (file)
index b463678..0000000
+++ /dev/null
@@ -1,119 +0,0 @@
-/*------------------------------------------------------------------------
- *    Graphic library
- *    Copyright (C) 1998-2000 Enpc/Jean-Philippe Chancelier
- *    jpc@cereve.enpc.fr 
- --------------------------------------------------------------------------*/
-#ifndef _SCI_ECH
-#define _SCI_ECH
-
-typedef struct wcscalelist 
-{
-  int flag ;                            /* zero when this is a default scale */
-  int    wdim[2];                       /* currend windo dim in pixels */
-  double subwin_rect[4];                /* subwindow specification */
-  double frect[4];                      /* bounds in the <<real>> space: xmin,ymin,xmax,ymax */
-  double axis[4];                       /* position of the axis rectangle */
-                                        /* = [mfact_xl, mfact_xr,mfact_yu,mfact_yd]; */
-  double xtics[4],ytics[4];             /* [xmin,ymin,nint] or [kmin,kmax,ar,nint]           */
-  /* XXXX : c'est redondant avec aaint et quelquefois avec frect ? */
-  double Wxofset1,Wyofset1,Wscx1,Wscy1; /* ofsets and scale factor for pixel<->double transf.*/
-  char logflag[2];                      /* are we using logscale */
-  integer WIRect1[4];                   /* frame bounds in pixel */
-  integer Waaint1[4];                   /* tics and subtics numbers: [xint,xsubint,yint,ysubint] */
-  double m[3][3];                       /* 3d geometric transformation */
-  double bbox1[6];                      /* 3d bounds */
-  double alpha,theta;                   /* polar coordinates of visualization point */
-  integer metric3d;                     /* added by es - metric mode for 3d -> 2d */
-  struct wcscalelist *next;             /* points to next one */
-  struct wcscalelist *prev;             /* points to previous one */
-}  WCScaleList ;
-
-typedef struct scalelist 
-{
-  WCScaleList *scales;                  /* list of Scales for window Win */
-                                        /* one scale for each subwin */
-  integer Win;                          /* window number */
-  struct scalelist *next;
-} ScaleList ;
-
-/*
- * Current scale values. 
- */
-
-extern WCScaleList Cscale;
-
-/*
- * Current geometric transformation : from double to pixel 
- */
-#ifndef Min
-#define Min(x,y)       (((x)<(y))?(x):(y))
-#endif 
-
-extern int XScale(double x);
-extern int XLogScale(double x);
-
-extern int YScale(double y);
-extern int YLogScale(double y);
-
-/* #define XScale(x)    inint( Min(Cscale.Wscx1*((x) -Cscale.frect[0]) + Cscale.Wxofset1,2147483647)) */
-/* #define XLogScale(x) inint( Cscale.Wscx1*(log10(x) -Cscale.frect[0]) + Cscale.Wxofset1) */
-/* #define YScale(y)    inint(  Min(Cscale.Wscy1*(-(y)+Cscale.frect[3]) + Cscale.Wyofset1,2147483647)) */
-/* #define YLogScale(y) inint( Cscale.Wscy1*(-log10(y)+Cscale.frect[3]) + Cscale.Wyofset1) */
-#define XDouble2Pixel(x) ((Cscale.logflag[0] == 'n') ? ( XScale(x)) : ( XLogScale(x)))
-#define YDouble2Pixel(y) ((Cscale.logflag[1] == 'n') ? ( YScale(y)) : ( YLogScale(y)))
-
-/* NG beg */
-/*
- * geometric transformation "for length"
- */
-#define WScale(w)   inint (Cscale.Wscx1 * (w))
-#define WLogScale(x,w) inint (Cscale.Wscx1 * (log10 (((x) + (w)) / (x))))
-#define HScale(h)   inint (Cscale.Wscy1 * (h)) 
-#define HLogScale(y,h) inint (Cscale.Wscy1 * (log10 ( ((y) + (h)) / (y) ) )) /* modif jb Silvy 05/2006 */
-#define WDouble2Pixel(x,w) ((Cscale.logflag[0] == 'n') ? ( WScale(w)) : ( WLogScale(x,w)))
-#define HDouble2Pixel(y,h) ((Cscale.logflag[1] == 'n') ? ( HScale(h)) : ( HLogScale(y,h)))
-/* NG end */
-
-/*
- * Current geometric transformation : from pixel to double 
- */
-
-/* #define XPi2R(x)  Cscale.frect[0] + (1.0/Cscale.Wscx1)*((x) - Cscale.Wxofset1) */
-/* #define YPi2R(y)  Cscale.frect[3] - (1.0/Cscale.Wscy1)*((y) - Cscale.Wyofset1) */
-
-
-/* change of frame with integer values */ 
-extern double XPi2R(int x);
-extern double YPi2R(int y);
-
-#define XPi2LogR(x)  exp10( XPi2R(x))
-#define YPi2LogR(y)  exp10( YPi2R(y))
-#define XPixel2Double(x)  (( Cscale.logflag[0] == 'l') ? XPi2LogR(x) : XPi2R(x))
-#define YPixel2Double(y)  (( Cscale.logflag[1] == 'l') ? YPi2LogR(y) : YPi2R(y))
-
-/* chang eof frame with double values for entries */
-extern double XDPi2R( double x ) ;
-extern double YDPi2R( double y ) ;
-
-#define XDPi2LogR(x)  exp10( XDPi2R(x))
-#define YDPi2LogR(y)  exp10( YDPi2R(y))
-#define XDPixel2Double(x)  (( Cscale.logflag[0] == 'l') ? XDPi2LogR(x) : XDPi2R(x))
-#define YDPixel2Double(y)  (( Cscale.logflag[1] == 'l') ? YDPi2LogR(y) : YDPi2R(y))
-
-/*
- * Current geometric transformation : 3D plots 
- */
-
-#define TRX(x1,y1,z1) ( Cscale.m[0][0]*(x1) +Cscale.m[0][1]*(y1) +Cscale.m[0][2]*(z1))
-#define TRY(x1,y1,z1) ( Cscale.m[1][0]*(x1) +Cscale.m[1][1]*(y1) +Cscale.m[1][2]*(z1))
-#define TRZ(x1,y1,z1) ( Cscale.m[2][0]*(x1) +Cscale.m[2][1]*(y1) +Cscale.m[2][2]*(z1))
-#define GEOX(x1,y1,z1)  XScale(TRX(x1,y1,z1))
-#define GEOY(x1,y1,z1)  YScale(TRY(x1,y1,z1))
-
-#endif  /* _SCI_ECH */
-
-
-
-
-
-
diff --git a/scilab/routines/graphics/StringMatrix.h b/scilab/routines/graphics/StringMatrix.h
deleted file mode 100644 (file)
index 0e27aef..0000000
+++ /dev/null
@@ -1,50 +0,0 @@
-/*-------------------------------------------------------------------------------------------*/
-/* COPYRIGHT INRIA 2006                                                                      */
-/* File    : StringMatrix.h                                                                  */
-/* Authors : Jean-Baptiste Silvy 2006-xxxx                                                   */
-/* Desc.   : Allocation, deletion and modifications of matrices of strings.                  */
-/*           The matrix is stored by colmuns like in Scilab                                  */
-/*-------------------------------------------------------------------------------------------*/
-
-#ifndef _SCI_STRING_MATRIX_H_
-#define _SCI_STRING_MATRIX_H_
-
-#include "sciMatrix.h"
-
-/*-------------------------------------------------------------------------------------------*/
-/**
- * The StringMatrix is just a pointer matrix. So it can be used in any function using
- * sciMatrix. The typedef is used for a more understandable code.
- */
-typedef sciMatrix StringMatrix ;
-
-/*-------------------------------------------------------------------------------------------*/
-/* Constructors */
-/**
- * create a nbRow x nbCol matrix which data are copied.
- * @param textMat the copied data.
- */
-StringMatrix * newFullStringMatrix( char ** textMat, int nbRow, int nbCol ) ;
-
-/** 
- * copy constructor
- */
-StringMatrix * copyStringMatrix( const StringMatrix * copyMat ) ;
-
-/*-------------------------------------------------------------------------------------------*/
-/* accessors */
-char * getStrMatElement( const StringMatrix * mat, int row, int col ) ;
-
-/**
- * get the pointer on the array of string. May be used for faster access to the data.
- */
-char ** getStrMatData(  const StringMatrix * mat ) ;
-
-/**
- * desalocate the (row,col) current string and copy the new one.
- */
-void copyStrMatElement( StringMatrix * mat, int row, int col, const char * copyStr ) ;
-
-/*-------------------------------------------------------------------------------------------*/
-
-#endif /* _SCI_STRING_MATRIX_H_ */
diff --git a/scilab/routines/graphics/Vect2Matrix.h b/scilab/routines/graphics/Vect2Matrix.h
deleted file mode 100644 (file)
index 224c902..0000000
+++ /dev/null
@@ -1,65 +0,0 @@
-/*-------------------------------------------------------------------------------------------*/
-/* COPYRIGHT INRIA 2006                                                                      */
-/* File    : Vect2Matrix.h                                                                   */
-/* Authors : Jean-Baptiste Silvy 2006-xxxx                                                   */
-/* Desc.   : Allocation and deletion and modifications of matrices of 2d vector.             */
-/*           The matrix stored arrays of size two of int or double                           */
-/*-------------------------------------------------------------------------------------------*/
-
-#ifndef _SCI_VECT2_MATRIX_H_
-#define _SCI_VECT2_MATRIX_H_
-
-#include "sciMatrix.h"
-
-/*-------------------------------------------------------------------------------------------*/
-/* matrix of int[2] */
-typedef sciMatrix Vect2iMatrix ;
-
-/* accessors */
-int * getVect2iMatElement( const Vect2iMatrix * mat, int row, int col ) ;
-
-/* desalocate the (row,col) current string and copy the new one. */
-void copyVect2iMatElement(       Vect2iMatrix * mat,
-                                 int row           ,
-                                 int col           , 
-                           const int copyValue[2]   ) ;
-
-/* rotate all the element in the matrix of a given angle around the center */
-void rotateVect2iMatrix( Vect2iMatrix * mat, int center[2], double angle ) ;
-
-/**
- * translate a matrix of vector trans.
- */
-void translateVect2iMatrix( Vect2iMatrix * mat, int trans[2] ) ;
-
-/* apply an homothety on all element */
-void homothVect2iMatrix( Vect2iMatrix * mat, int center[2], double factors[2] ) ;
-
-/*-------------------------------------------------------------------------------------------*/
-/* matrix of double[2] */
-typedef sciMatrix Vect2dMatrix ;
-
-/* accessors */
-double * getVect2dMatElement( const Vect2dMatrix * mat, int row, int col ) ;
-
-/* desalocate the (row,col) current string and copy the new one. */
-void copyVect2dMatElement(       Vect2dMatrix * mat,
-                                 int    row        ,
-                                 int    col        , 
-                           const double copyValue[2] ) ;
-
-/**
- * translate a matrix of vector trans.
- */
-void translateVect2dMatrix( Vect2dMatrix * mat, double trans[2] ) ;
-
-/* rotate all the element in the matrix of a given angle around the center */
-void rotateVect2dMatrix( Vect2dMatrix * mat, double center[2], double angle ) ;
-
-/* apply an homothety on all element */
-void homothVect2dMatrix( Vect2dMatrix * mat, double center[2], double factors[2] ) ;
-
-
-/*-------------------------------------------------------------------------------------------*/
-
-#endif /* _SCI_VECT2_MATRIX_H_ */
diff --git a/scilab/routines/graphics/bcg.h b/scilab/routines/graphics/bcg.h
deleted file mode 100644 (file)
index 2bb2c8e..0000000
+++ /dev/null
@@ -1,145 +0,0 @@
-/*------------------------------------------------------------------------
- *    Graphic library
- *    Copyright (C) 1998-2000 Enpc/Jean-Philippe Chancelier
- *    jpc@cereve.enpc.fr 
- --------------------------------------------------------------------------*/
-# ifndef __BCG__
-#define __BCG__
-
-#include "../machine.h" /* to be sure that WITH_XXX are defined */
-
-#ifndef _MSC_VER
-#include <X11/Xlib.h>
-#include <X11/Intrinsic.h>
-#endif 
-
-#ifndef CoordModePrevious 
-#define CoordModePrevious 1
-#define CoordModeOrigin 0
-#endif 
-
-#ifndef _MSC_VER
-  #ifndef GXclear 
-   #define GXclear 0
-   #define GXand 1
-   #define GXandReverse 2
-   #define GXcopy 3
-   #define GXandInverted 4
-   #define GXnoop 5
-   #define GXxor 6
-   #define GXor 7
-   #define GXnor 8
-   #define GXequiv 9
-   #define GXinvert 10
-   #define GXorReverse 11
-   #define GXcopyInverted 12
-   #define GXorInverted 13
-   #define GXnand 14
-   #define GXset 15
-  #endif 
-#endif
-
-/** Structure to keep the graphic state  **/
-
-
-typedef struct _menu_entry { 
-  char *name; /* name of the entry */
-  char *accel;/* name of accelerator */
-  int status; /* active 1, not active 0, deleted -1*/
-  int nsub  ; /* if menu_entry is a sub_menu nsub gives its number else its value is one */
-  struct _menu_entry *subs; /* menu_entry has some submenus */
-  int winid ; /* associated window */
-  int action_type ; /* hard coded or macro */
-  char *fname;/* name of function to be called*/
-  struct _menu_entry *menu; /* point to the father for sub_menus */
-  struct _menu_entry *next; /* next one .... */
-} menu_entry;
-
-
-/* #include "Entities.h" */
-#include "ObjectStructure.h"
-
-typedef int (*EVTHANDLER) __PARAMS((int win,int x,int y,int ibut));
-
-typedef struct BCG 
-{ 
-  int CurWindow ;   /** Id of window **/
-  int CWindowWidth ; /** graphic window width **/
-  int CWindowHeight ; /** graphic window height **/
-  int FontSize ;
-  int FontId ;
-  int CurHardSymb;
-  int CurHardSymbSize;
-  int CurLineWidth;
-  int CurPattern;
-  int CurColor;
-  int CurPixmapStatus;
-  int CurResizeStatus;
-  int CurVectorStyle;
-  int CurDrawFunction;
-  int ClipRegionSet;
-  int CurClipRegion[4];
-  int CurDashStyle;
-  char CurNumberDispFormat[20]; 
-  int CurColorStatus;
-  int IDLastPattern; /* number of last patter or color */
-  /** Colormap Cmap; color map of current graphic window */
-  int CmapFlag ; /* set to 1 if the Cmap has default colors */
-  int Numcolors; /* number of colors */
-  float *Red; /* red value: between 0 and 1 */
-  float *Green; /* green value: between 0 and 1 */
-  float *Blue; /* blue value: between 0 and 1 */
-  int NumBackground;  /* number of Background */
-  int NumForeground; /* number of Foreground in the color table */
-  int NumHidden3d;  /* color for hidden 3d facets **/
-  char EventHandler[25]; /* name of window event handler */
-  int EventHandlerType; /* does the event handler removes the normal event handling*/
-  /* NG beg */
-  int CWindowWidthView;         /** graphic window width **/
-  int CWindowHeightView;  /** graphic window height **/
-  sciPointObj *mafigure;  /* Entities root */
-  int graphicsversion;
-  /* NG end */
-#ifdef _MSC_VER
-  /** windows specific objects **/
-  HWND hWndParent;     /* parent window handle */
-  HWND CWindow ;   /** window of the top level widget of the graphic window **/
-  HWND Statusbar;    /* status window */
-  HDC hdcCompat ;  /** for pixmap version */
-  HBITMAP hbmCompat ;  /** for pixmap version */
-  MW  lpmw;        /** graphic window menu **/
-  int in_sizemove ;   /** graphic window is in resize move */
-  /** A reprendre avec des pointeurs comme en X11 XXXXXX **/
-  COLORREF *Colors;/* vector of colors */ 
-  HPEN hPen ;  /** the current pen for graphic window **/
-  HBRUSH hBrush; /** the current brush **/
-  LPGW   lpgw; /** to store a pointer to the graphwin structure **/
-  int Inside_init; /** a flag to inhibit Graproc actions while in 
-                    initgraphic **/
-  SCROLLINFO vertsi;
-  SCROLLINFO horzsi;
-  HMENU hMenuRoot;
-  int IDM_Count;
-#else 
-  /** Xwindow specific objects **/
-  Drawable Cdrawable ; /** The drawable = CWindow or a Pixmap */
-  int  Cdrawable_flag ; /** Cdrawable is not synchronized with graphics when == 1  */
-  Widget CinfoW ;  /** info widget of graphic window **/
-  Widget Viewport; /** Viewport for graphic window **/
-  Widget Panner ;  /** Panner widget **/
-  Widget drawbox ; /** the widget associated to CWindow **/
-  Widget popup   ; /** graphic window popupc **/
-  Window CWindow ; /** the graphic window **/
-  Window CBGWindow ; /** window of the top level graphic popup widget **/
-  XID FontXID;
-  Colormap Cmap; /* color map of current graphic window */
-  Pixel *Colors; /* vector of colors 
-                   Note that there are 2 colors more than Numcolors,
-                   ie black and white at the end of this vector */
-#endif
-} BCG ;
-
-
-extern struct BCG *GetWindowXgcNumber  (int i);
-
-#endif /* __BCG__ */
diff --git a/scilab/routines/graphics/intcommongraphics.h b/scilab/routines/graphics/intcommongraphics.h
deleted file mode 100644 (file)
index 4371512..0000000
+++ /dev/null
@@ -1,17 +0,0 @@
-/*-----------------------------------------------------------------------------------*/
-/* Copyright (C) 1998-2000 INRIA/Enpc */
-/* Fabrice LERAY INRIA 2005 */
-/* Allan CORNET INRIA 2005 */
-/*-----------------------------------------------------------------------------------*/
-#ifndef  __INTCOMMONGRAPHICS__
-#define   __INTCOMMONGRAPHICS__
-/*-----------------------------------------------------------------------------------*/
-#include "../stack-c.h"
-#include "matdes.h"
-/*-----------------------------------------------------------------------------------*/
-extern char *pmodes[];
-extern int C2F(sciwin)  _PARAMS((void));
-#define SciWin() if(C2F(sciwin)() !=0) { Scierror(999,"%s :Requested figure cannot be created \r\n",fname);return 0;  }
-
-#endif /*   __INTCOMMONGRAPHICS__ */
-/*-----------------------------------------------------------------------------------*/
diff --git a/scilab/routines/graphics/matdes.h b/scilab/routines/graphics/matdes.h
deleted file mode 100644 (file)
index f38ae02..0000000
+++ /dev/null
@@ -1,17 +0,0 @@
-/*-----------------------------------------------------------------------------------*/
-#ifndef MATDES_SCI 
-#define MATDES_SCI 
-/*-----------------------------------------------------------------------------------*/
-#if _MSC_VER
-       #if _MSC_VER <=1200
-               #define hstk(x) ((C2F(stack).Stk) + x-1 )       
-       #else
-               #define hstk(x) (((long long *) C2F(stack).Stk) + x-1 )
-       #endif
-#else
-       #define hstk(x) (((long long *) C2F(stack).Stk) + x-1 )
-#endif
-/*-----------------------------------------------------------------------------------*/
-#endif /* MATDES_SCI */
-/*-----------------------------------------------------------------------------------*/
-
diff --git a/scilab/routines/graphics/sciMatrix.h b/scilab/routines/graphics/sciMatrix.h
deleted file mode 100644 (file)
index 43aa898..0000000
+++ /dev/null
@@ -1,103 +0,0 @@
-/*-------------------------------------------------------------------------------------------*/
-/* COPYRIGHT INRIA 2006                                                                      */
-/* File    : sciMatrix.h                                                                     */
-/* Authors : Jean-Baptiste Silvy 2006-xxxx                                                   */
-/* Desc.   : Allocation and deletion and modifications of matrices of pointers               */
-/*           The matrix is stored by colmuns like in Scilab.                                 */
-/*           These matrices can be used as generic matrices since they used void * pointers  */
-/*-------------------------------------------------------------------------------------------*/
-
-#ifndef _SCI_MATRIX_H_
-#define _SCI_MATRIX_H_
-
-/*-------------------------------------------------------------------------------------------*/
-/**
- * a matrix on void pointers
- */
-typedef struct
-{
-  void ** data ; /**< the data are stored in an array of void pointers */
-  int nbCol    ;
-  int nbRow    ;
-}
-sciMatrix ;
-
-/*-------------------------------------------------------------------------------------------*/
-/* Constructors */
-/*@{*/
-/**
- * allocate a matrix with no elements (nbrow = nbcol = 0)
- */
-sciMatrix * emptyMatrix( void ) ;
-
-/**
- * create a nbRow x nbCol matrix of NULL pointers.
- */
-sciMatrix * newMatrix( int nbRow, int nbCol ) ;
-
-/**
- * create a nbRow x nbCol matrix which data are dataMat (directly, no copy).
- */
-sciMatrix * newCompleteMatrix( void ** dataMat, int nbRow, int nbCol ) ;
-/*@}*/
-/* note that we cannot use a copy constructor since we don't know how to copy two elements */
-/* of the matrix! Maybe it is possible with some function pointers, but it seems a bit */
-/* tricky for me. For something clean, C++ may be better. */
-/*-------------------------------------------------------------------------------------------*/
-/* destructor */
-/*@{*/
-/**
- * delete the structure and data
- */
-void deleteMatrix( sciMatrix * mat ) ;
-
-/** 
- * delete only the structure, not the data (use with caution).
- */
-void desallocateMatrix( sciMatrix * mat ) ;
-/*@}*/
-/*-------------------------------------------------------------------------------------------*/
-/* accessors */
-/*@{*/
-/**
- * retrieve the element (row,col) of the matrix.
- */
-void * getMatElement( const sciMatrix * mat, int row, int col ) ;
-
-int     getMatNbRow( const sciMatrix * mat ) ;
-
-int     getMatNbCol( const sciMatrix * mat ) ;
-
-/**
- * get the pointer on the array of data. May be used for faster access to the data.
- */
-void ** getMatData(  const sciMatrix * mat ) ;
-
-/** 
- * set an element of the matrix to a new value but does not desalocate the previous
- * if one exists.
- * @param newValue the new value which will be inserted directly in the matrix (no copy).
- */
-void setMatElement(    sciMatrix * mat, int row, int col, void * newValue ) ;
-
-/**
- * desalocate the (row,col) element and put a new one.
- * @param newValue the new value which will be inserted directly in the matrix (no copy).
- */
-void changeMatElement( sciMatrix * mat, int row, int col, void * newValue ) ;
-
-/**
- * desalocate the (row,col) current element (i,j) and copy the new one. The size of the element
- * must be given in order to allocate memory.
- * @param copyValue copied value.
- * @param valueSize size of the data inserted in the matrix (ex: sizeof(double) ).
- */
-void copyMatElement(       sciMatrix * mat      ,
-                           int             row      ,
-                           int             col      , 
-                     const void          * copyValue,
-                           int             valueSize ) ;
-/*@}*/
-/*-------------------------------------------------------------------------------------------*/
-
-#endif /* _SCI_MATRIX_H_ */
diff --git a/scilab/routines/graphics/scigraphic.h b/scilab/routines/graphics/scigraphic.h
deleted file mode 100644 (file)
index 00ef443..0000000
+++ /dev/null
@@ -1,67 +0,0 @@
-
-/**
- * Sets the dimension of the scroll bars
- * @attention Do not call SetScrollInfo windows function,
- * sciSetScrollInfo do that and more things !
- * @param[in] Scilabgc
- * @param[in] sb_ctl
- * @param[in] si
- * @param[in] bRedraw
- *@author Matthieu PHILIPPE 
- *@date Dec 1999
- **/
-extern int sciSetScrollInfo(struct BCG *Scilabgc, int sb_ctl,SCROLLINFO *si, BOOLEAN bRedraw);
-
-/**
- * Returns the dimension of the scroll bars
- * @attention Do not call GetScrollInfo windows function,
- * sciGetScrollInfo do that and more things !
- * @param[in] Scilabgc
- * @param[in] sb_ctl
- * @param[in] si
- *@author Matthieu PHILIPPE 
- *@date Dec 1999
- **/
-extern int sciGetScrollInfo(struct BCG *Scilabgc, int sb_ctl, SCROLLINFO *si);
-
-/**
- * Returns the wresize status.
- * 0: it's in scroll bars mode
- * 1: it's in wresize mode
- *@author Matthieu PHILIPPE 
- *@date Dec 1999
- **/
-extern integer sciGetwresize();
-
-/**
- * Returns the pixmap status.
- * 0: it's drawn directly on screen
- * 1: it's drawn by a pixmap first
- *@author Matthieu PHILIPPE 
- *@date Dec 1999
- **/
-extern integer sciGetPixmapStatus();
-
-/**
- * used to get panner position through scilab command.
- * @param[in] struct BCG *ScilabGC : structure associated to a Scilab Graphic window
- * @param[in] int x,y : the x,y point of the graphic window to be moved at the up-left position of the viewport
- **/
-extern void SciViewportGet __PARAMS((struct BCG *ScilabXgc,int *x,int *y));
-
-/**
- * used to move the panner and the viewport interactively 
- * through scilab command.
- * @param[in] struct BCG *ScilabGC : structure associated to a Scilab Graphic window
- * @param[in] int x,y : the x,y point of the graphic window to be moved at the up-left position of the viewport
- **/
-extern void SciViewportMove __PARAMS((struct BCG *ScilabXgc,int x,int y));
-
-/**
- * A little beat different to windowdim. GPopupResize sets the visible window (parents dimension)
- * @param[in] struct BCG *ScilabXgc
- * @param[in] int * x,y , where x,y are the new dimension
- * @see setwindowdim
- **/
-extern void GPopupResize __PARAMS((struct BCG *ScilabXgc,int *x,int *y));
-
diff --git a/scilab/routines/interf/Makefile.in b/scilab/routines/interf/Makefile.in
deleted file mode 100644 (file)
index dfd6e3a..0000000
+++ /dev/null
@@ -1,192 +0,0 @@
-SHELL = /bin/sh
-
-SCIDIR=../..
-SCIDIR1=..\..
-
-LIBRARY = $(SCIDIR)/libs/interf.a
-
-OBJSC = Interf.o ctest.o  cs2st.o stack1.o stack2.o stack3.o \
-       intlapack.o intslicot.o intarpack.o intorand.o stcreate.o \
-       intfilestat.o strelm-c.o  matdsr.o otherspecfun.o hmops.o \
-       intinterp.o intsetenv.o intreadxls.o dassl.o intqld.o intgetmemory.o\
-       intUImenu.o intshowalluimenushandles.o
-
-OBJSF = lstelm.o lstelmi.o matelm.o matold.o lstops.o intl_e.o intl_i.o \
-       matio.o intdeff.o intdiary.o intdisp.o intexec.o intexecstr.o \
-       intgetf.o \
-       intgetpid.o inthost.o intlib.o intprint.o intrat.o intread.o \
-       intread4b.o \
-       intreadb.o intwritb.o intwrite.o intwrite4b.o oldloadsave.o intfile.o \
-       intgetenv.o intmgetl.o intgetio.o\
-       matimp.o  matnew.o matode.o matops.o matopt.o intlsqrsolve.o \
-       matqz.o matric.o  matsys.o \
-       polaut.o polelm.o polops.o strelm.o strops.o fmlelm.o \
-       logic.o logelm.o xawelm.o misops.o stack0.o \
-       where.o indxg.o defint.o \
-       matodc.o dasrti.o \
-       intg.o int2d.o int3d.o feval.o bva.o comm.o specfun.o \
-       isany.o complexify.o issymmetric.o \
-       followpath.o newsave.o insertfield.o v2unit.o v2cunit.o \
-       hmcreate.o lapackf.o lapackf2.o fmexslicot.o fscislicot.o \
-       intlinmeq.o hndlops.o \
-       sci_addinter.o sci_argn.o sci_chdir.o sci_clear.o \
-       sci_clearfun.o sci_clearglobal.o sci_comp.o sci_c_link.o \
-       sci_debug.o sci_delbpt.o sci_dispbpt.o sci_errcatch.o sci_errclear.o \
-       sci_error.o sci_exists.o sci_format.o sci_fort.o sci_funcprot.o \
-       sci_funptr.o sci_getcwd.o sci_gstacksize.o sci_havewindow.o \
-       sci_ieee.o sci_intppty.o sci_iserror.o sci_isglobal.o \
-       sci_lines.o sci_link.o sci_macrovar.o sci_mode.o sci_mtlb_mode.o \
-       sci_newfun.o sci_notify.o sci_predef.o sci_resume.o \
-       sci_sciargs.o sci_setbpt.o sci_type.o sci_typnam.o \
-       sci_useascommand.o sci_whereis.o sci_who.o
-
-
-
-
-include ../../Makefile.incl
-
-#CFLAGS = $(CC_OPTIONS) -DNODCD -DNOMETANET -DNOSCICOS -DNOSIGNAL -DNOSOUND -DNOSPARSE
-
-CFLAGS = $(CC_OPTIONS) $(XFLAGS) $(TK_INC_PATH) $(TCL_INC_PATH)
-
-FFLAGS = $(FC_OPTIONS)
-
-include ../Make.lib
-
-# some versions of g77 on sparc will compile intmgetl.f
-# but the code does not execute properly.
-intmgetl.o: intmgetl.f ../stack.h
-       $(FC) @FC_OPTIONS1@ -c intmgetl.f -o intmgetl.o
-
-bva.o: ../stack.h
-comm.o: ../stack.h
-complexify.o: ../stack.h
-dasrti.o: ../stack.h
-defint.o: ../stack.h
-feval.o: ../stack.h
-fmexslicot.o: ../stack.h
-fmlelm.o: ../stack.h
-followpath.o: ../stack.h
-fscislicot.o: ../stack.h
-hmcreate.o: ../stack.h
-hndlops.o: ../stack.h
-indxg.o: ../stack.h
-insertfield.o: ../stack.h
-int2d.o: ../stack.h
-int3d.o: ../stack.h
-intdeff.o: ../stack.h
-intdiary.o: ../stack.h
-intdisp.o: ../stack.h
-intdpotrf.o: stack.h
-intexec.o: ../stack.h
-intexecstr.o: ../stack.h
-intfile.o: ../stack.h
-intg.o: ../stack.h
-intgetenv.o: ../stack.h
-intgetf.o: ../stack.h
-intgetio.o: ../stack.h
-intgetpid.o: ../stack.h
-inthost.o: ../stack.h
-intl_e.o: ../stack.h
-intl_i.o: ../stack.h
-intlib.o: ../stack.h
-intlinmeq.o: ../stack.h
-intlsqrsolve.o: ../stack.h
-intmgetl.o: ../stack.h
-intprint.o: ../stack.h
-intrat.o: ../stack.h
-intread.o: ../stack.h
-intread4b.o: ../stack.h
-intreadb.o: ../stack.h
-intwritb.o: ../stack.h
-intwrite.o: ../stack.h
-intwrite4b.o: ../stack.h
-intzpotrf.o: stack.h
-isany.o: ../stack.h
-issymmetric.o: ../stack.h
-lapackf.o: ../stack.h
-lapackf2.o: ../stack.h
-logelm.o: ../stack.h
-logic.o: ../stack.h
-lstelm.o: ../stack.h
-
-lstelmi.o: ../stack.h
-lstops.o: ../stack.h
-matelm.o: ../stack.h
-matimp.o: ../stack.h
-matio.o: ../stack.h
-matnew.o: ../stack.h
-matodc.o: ../stack.h
-matode.o: ../stack.h
-matold.o: ../stack.h
-matops.o: ../stack.h
-matopt.o: ../stack.h
-matqz.o: ../stack.h
-matric.o: ../stack.h
-matsys.o: ../stack.h
-misops.o: ../stack.h
-newsave.o: ../stack.h
-oldloadsave.o: ../stack.h
-polaut.o: ../stack.h
-polelm.o: ../stack.h
-polops.o: ../stack.h
-specfun.o: ../stack.h
-stack0.o: ../stack.h
-strelm.o: ../stack.h
-strops.o: ../stack.h
-v2cunit.o: ../stack.h
-v2unit.o: ../stack.h
-where.o: ../stack.h
-xawelm.o: ../stack.h
-
-Interf.o: Interf.c ../stack-c.h ../graphics/Math.h ../machine.h \
-       ../graphics/Graphics.h ../stack-def.h ../interf/stack1.h \
-       ../interf/stack2.h ../interf/stack3.h
-ciargc.o: ciargc.c
-cs2st.o: cs2st.c ../machine.h
-ctest.o: ctest.c ../machine.h
-intarpack.o: intarpack.c ../mex.h ../stack-c.h ../graphics/Math.h \
-       ../machine.h ../graphics/Graphics.h ../stack-def.h ../interf/stack1.h \
-       ../interf/stack2.h ../interf/stack3.h
-intfilestat.o: intfilestat.c ../stack-c.h ../graphics/Math.h ../machine.h \
-       ../graphics/Graphics.h ../stack-def.h ../interf/stack1.h \
-       ../interf/stack2.h ../interf/stack3.h ../os_specific/Os_specific.h
-intlapack.o: intlapack.c ../stack-c.h ../graphics/Math.h ../machine.h \
-       ../graphics/Graphics.h ../stack-def.h ../interf/stack1.h \
-       ../interf/stack2.h ../interf/stack3.h
-intorand.o: intorand.c ../stack-c.h ../graphics/Math.h ../machine.h \
-       ../graphics/Graphics.h ../stack-def.h ../interf/stack1.h \
-       ../interf/stack2.h ../interf/stack3.h
-intslicot.o: intslicot.c ../mex.h ../stack-c.h ../graphics/Math.h \
-       ../machine.h ../graphics/Graphics.h ../stack-def.h ../interf/stack1.h \
-       ../interf/stack2.h ../interf/stack3.h
-matdes.o: matdes.c ../graphics/bcg.h ../stack-c.h \
-       ../graphics/CloneObjects.h ../graphics/Interaction.h ../graphics/SetProperty.h \
-       ../graphics/GetProperty.h ../graphics/InitObjects.h ../graphics/DrawObjects.h \
-       ../graphics/BuildObjects.h ../graphics/DestroyObjects.h \
-       ../graphics/Math.h ../machine.h ../graphics/Graphics.h ../stack-def.h \
-       ../interf/stack1.h ../interf/stack2.h ../interf/stack3.h \
-       ../graphics/PloEch.h matdes.h
-matdsr.o: matdsr.c ../stack-c.h ../graphics/Math.h ../machine.h \
-       ../graphics/Graphics.h ../stack-def.h ../interf/stack1.h \
-       ../interf/stack2.h ../interf/stack3.h matdsr.h ../control/control.h \
-       ../calelm/calelm.h
-stack1.o: stack1.c ../stack-c.h ../graphics/Math.h ../machine.h \
-       ../graphics/Graphics.h ../stack-def.h ../interf/stack1.h \
-       ../interf/stack2.h ../interf/stack3.h ../system/msgstore.h
-stack2.o: stack2.c ../stack-c.h ../graphics/Math.h ../machine.h \
-       ../graphics/Graphics.h ../stack-def.h ../interf/stack1.h \
-       ../interf/stack2.h ../interf/stack3.h ../os_specific/men_Sutils.h
-stack3.o: stack3.c ../stack-c.h ../graphics/Math.h ../machine.h \
-       ../graphics/Graphics.h ../stack-def.h ../interf/stack1.h \
-       ../interf/stack2.h ../interf/stack3.h
-stcreate.o: stcreate.c ../stack-c.h ../graphics/Math.h ../machine.h \
-       ../graphics/Graphics.h ../stack-def.h ../interf/stack1.h \
-       ../interf/stack2.h ../interf/stack3.h
-strelm-c.o: strelm-c.c ../stack-c.h ../graphics/Math.h ../machine.h \
-       ../graphics/Graphics.h ../stack-def.h ../interf/stack1.h \
-       ../interf/stack2.h ../interf/stack3.h
-structcreate.o: structcreate.c ../stack-c.h ../graphics/Math.h \
-       ../machine.h ../graphics/Graphics.h ../stack-def.h ../interf/stack1.h \
-       ../interf/stack2.h ../interf/stack3.h
-
diff --git a/scilab/routines/interf/interf_f/interf_f.vfproj b/scilab/routines/interf/interf_f/interf_f.vfproj
deleted file mode 100644 (file)
index d04db47..0000000
+++ /dev/null
@@ -1,57 +0,0 @@
-<?xml version="1.0" encoding="UTF-8"?>
-<VisualStudioProject ProjectType="typeStaticLibrary" ProjectCreator="Intel Fortran" Keyword="Static Library" Version="9.10" ProjectIdGuid="{3DBBFF93-F344-4484-A317-14F985434BBC}">
-       <Platforms>
-               <Platform Name="Win32"/></Platforms>
-       <Configurations>
-               <Configuration Name="Debug|Win32" DeleteExtensionsOnClean="*.obj;*.mod;*.pdb;*.asm;*.map;*.dyn;*.dpi;*.tmp;*.log;*.lib;$(TargetPath)" ConfigurationType="typeStaticLibrary">
-                               <Tool Name="VFMidlTool" SuppressStartupBanner="true" TypeLibraryName="$(IntDir)/$(InputName).tlb"/>
-                               <Tool Name="VFPreBuildEventTool"/>
-                               <Tool Name="VFPostBuildEventTool" CommandLine="cd $(IntDir)
-for %%f in (*.obj) do  ..\..\..\..\bin\dumpexts -o %%~nf.def -n scilex.dll %%f &gt;nul
-copy *.def interf_f.def &gt;nul
-copy interf_f.def ..\..\..\..\libs\interf_f.def &gt;nul
-del *.def &gt;nul
-cd .."/>
-                               <Tool Name="VFFortranCompilerTool" SuppressStartupBanner="true" DebugInformationFormat="debugEnabled" Optimization="optimizeDisabled" OptimizeForProcessor="procOptimizeBlended" Preprocess="preprocessYes" AdditionalIncludeDirectories="../../modules/core/includes" OpenMPConditionalCompilation="false" AlternateParameterSyntax="false" F77RuntimeCompatibility="true" FPS4Libs="false" Diagnostics="diagnosticsDisableAll" CallingConvention="callConventionCRef" ExternalNameUnderscore="true" ModulePath="$(INTDIR)/" ObjectFile="$(INTDIR)/" RuntimeLibrary="rtMultiThreadedDebug" DisableDefaultLibSearch="true" CompileOnly="true"/>