Plot Tool Manipulation Functions

PCL Examples > Results Postprocessing Functions > Plot Tool Manipulation Functions

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX''">XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX''">

This section contains examples of some of the functions used for posting, unposting, and deleting plot tools.


res_display_fringe_post	()

#  Purpose          :  This file provides an example of a call to the

#                      function res_display_fringe_post()

#                      In this example field database, containing

#                      the results is opened and a fringe plot

#                      tool definition is created. After a pause

#                      this function is called to post the

#                      fringe plot tool in default viewport.

#                      Before running this file run field.ses to

#                      create field.db

#                      This file can be run by starting a session of

#                      Patran,and running this session file

#                      through the "File","Session","Play" pulldown

#                      menus on the menu bar.

#  The function res_display_fringe_post()

#  has the following arguments:

#  res_display_fringe_post

#     (  plot_name,

#        register_id,

#        register_location,

#        range_flag,

#        spectrum_flag )

#---------------------------------------------------------------------

#  Variable Declarations

STRING   s_plot_name[32]

INTEGER  i_register_id

STRING   s_register_location[32]

LOGICAL  l_range_flag

LOGICAL  l_spectrum_flag

INTEGER  i_return_value

#---------------------------------------------------------------------

#  Open the database ’field.db’

uil_file_open.go ("field.db")

#  Set ISO-1 viewing

i_return_value = ga_view_aa_set( 23., -34., 0. )

dump i_return_value

#---------------------------------------------------------------------

#  Create Fringe Plot tool for Displacement

i_return_value = res_data_load_dbresult( 0, "Nodal", "Scalar",  @

   "Default", "Static Subcase", "Displacements","Translational",@

   "(NON-LAYERED)", "MAG", "Default", "DeriveAverage", "All",   @

   "ShapeFunc" )

dump i_return_value

i_return_value = res_data_title( 0, "Nodal", "Scalar", 1, [     @

   "Default, Static Subcase: Displacements, Translational"//    @

   "-(NON-LAYERED) (MAG)"] )

dump i_return_value

i_return_value = res_display_fringe_create( "", "FreeFaces", 0, @

   [""], 12, [ "Range:Fri_default_Fringe", "RangeOverwrite:ON", @

   "FringeStyle:Discrete/Smooth" , "Shade:None",                @

   "ElemEdge:FreeEdge,Blue,Solid,1", "Shrink:0",                @

   "TitleDisplay:ON", "MinMaxDisplay:ON", "ValueDisplay:OFF",   @

   "Filter:None", "ScaleFactor:1.", "LabelStyle:Fixed, 8,       @

   White, 4"], TRUE )

dump i_return_value

#---------------------------------------------------------------------

#  Session file paused press "Resume" to continue

sf_pause()

#---------------------------------------------------------------------

#  Plot Fringe Plot tool for Displacement

s_plot_name          = ""

i_register_id        = 0

s_register_location  = "Nodal"

l_range_flag         = TRUE

l_spectrum_flag      = TRUE

i_return_value =                                                @

   res_display_fringe_post                                      @

      (  s_plot_name,                                           @

         i_register_id,                                         @

         s_register_location,                                   @

         l_range_flag,                                          @

         l_spectrum_flag )

dump i_return_value

#---------------------------------------------------------------------


res_display_vector_post	()

#  Purpose          :  This file provides an example of a call to the

#                      function res_display_vector_post()

#                      In this example field database, containing

#                      the results is opened and a Vector Plot

#                      tool definition is created. After a pause

#                      this function is called to post the

#                      Vector Plot in default viewport.

#                      Before running this file run field.ses to

#                      create field.db

#                      This file can be run by starting a session of

#                      Patran,and running this session file

#                      through the "File","Session","Play" pulldown

#                      menus on the menu bar.

#  The function res_display_vector_post()

#  has the following arguments:

#  res_display_vector_post

#     (  plot_name,

#        register_id,

#        register_location,

#        range_flag,

#        spectrum_flag )

#---------------------------------------------------------------------

#  Variable Declarations

STRING   s_plot_name[32]

INTEGER  i_register_id

STRING   s_register_location[32]

LOGICAL  l_range_flag

LOGICAL  l_spectrum_flag

INTEGER  i_return_value

#---------------------------------------------------------------------

#  Open the database ’field.db’

uil_file_open.go ("field.db")

#  Set ISO-1 viewing

i_return_value = ga_view_aa_set( 23., -34., 0. )

dump i_return_value

#---------------------------------------------------------------------

#  Create Vector Plot tool

i_return_value = res_data_load_dbresult( 0, "Nodal", "Vector",  @

   "Default", "Static Subcase", "Displacements","Translational",@

   "(NON-LAYERED)", "", "AsIs", "", "", "", "", 0. )

dump i_return_value

i_return_value = res_data_title( 0, "Nodal", "Vector", 1,       @

   [ "Default, Static Subcase, Displacements,"//                @

   " Translational, (NON-LAYERED)"] )

dump i_return_value

i_return_value = res_display_vector_create( "", "Nodes", 0,     @

   [""], 16, [ "Range:Vec_default_Vector", "RangeOverwrite:ON", @

   "VectorDisplay:Component", "VectorComps:OFF,OFF,ON",         @

   "VectorColors:Spectrum", "VectorScale:ScreenConstant=0.1",   @

   "VectorAttachment:Head", "HeadStyle:Single",                 @

   "VectorStyle:Solid", "TailDisplay:ON", "TitleDisplay:ON",    @

   "MinMaxDisplay:ON", "LabelStyle:Fixed, 8, White, 4",         @

   "ValueDisplay:ON", "Filter:None", "ScaleFactor:1."], TRUE )

dump i_return_value

#---------------------------------------------------------------------

#  Session file paused press "Resume" to continue

sf_pause()

#--------------------------------------------------------------------

#  Post the created Vector Plot tool

s_plot_name         = ""

i_register_id       = 0

s_register_location = "Nodal"

l_range_flag        = TRUE

l_spectrum_flag     = TRUE

i_return_value =                                                @

   res_display_vector_post                                      @

      (  s_plot_name,                                           @

         i_register_id,                                         @

         s_register_location,                                   @

         l_range_flag,                                          @

         l_spectrum_flag )

dump i_return_value

#---------------------------------------------------------------------


res_display_tensor_post	()

#  Purpose          :  This file provides an example of a call to the

#                      function res_display_tensor_post()

#                      In this example field database, containing

#                      the results is opened and a tensor plot

#                      tool definition is created. After a pause

#                      this function is called to post the

#                      tensor plot in default viewport.

#                      Before running this file run field.ses to

#                      create field.db

#                      This file can be run by starting a session of

#                      Patran,and running this session file

#                      through the "File","Session","Play" pulldown

#                      menus on the menu bar.

#  The function res_display_tensor_post()

#  has the following arguments:

#  res_display_tensor_post

#     (  plot_name,

#        register_id,

#        register_location,

#        range_flag,

#        spectrum_flag )

#---------------------------------------------------------------------

#  Variable Declarations

STRING   s_plot_name[32]

INTEGER  i_register_id

STRING   s_register_location[32]

LOGICAL  l_range_flag

LOGICAL  l_spectrum_flag

INTEGER  i_return_value

#---------------------------------------------------------------------

#  Open the database ’field.db’

uil_file_open.go ("field.db")

#  Set ISO-1 viewing

i_return_value = ga_view_aa_set( 23., -34., 0. )

dump i_return_value

#---------------------------------------------------------------------

#  Create Tensor plot tool

i_return_value = res_data_load_dbresult( 0, "Centroidal",       @

   "Tensor", "Default", "Static Subcase" , "Stress Tensor", "", @

   "At Z1", "", "AsIs", "DeriveAverage", "All", "ShapeFunc", "",@

   0. )

dump i_return_value

i_return_value = res_data_title( 0, "Centroidal", "Tensor", 1,  @

   [ "Default, Static Subcase, Stress Tensor,, At Z1"] )

dump i_return_value

i_return_value = res_display_tensor_create( "", "Elements", 0,  @

   [""], 17, [ "Range:Ten_default_Tensor", "RangeOverwrite:ON", @

   "TensorDisplay:Component", "TensorComps:ON,ON,ON,ON,ON,ON",  @

   "TensorColors:Blue,Green,Yellow,Red,Magenta,White",          @

   "VectorScale:ScreenConstant=0.1", "HeadStyle:Single",        @

   "VectorStyle:Solid", "BoxStyle:ON,Wireframe",                @

   "BoxColor:Yellow", "BoxScale:ScreenConstant=0.1",            @

   "TitleDisplay:ON", "MinMaxDisplay:ON", "LabelStyle:Fixed, 8, @

   White, 4", "ValueDisplay:ON", "Filter:None",                 @

   "ScaleFactor:1."], TRUE )

dump i_return_value

#---------------------------------------------------------------------

#  Session file paused press "Resume" to continue

sf_pause()

#--------------------------------------------------------------------

#  Post the created tensor plot tool

s_plot_name          = ""

i_register_id        = 0

s_register_location  = "Centroidal"

l_range_flag         = TRUE

l_spectrum_flag      = FALSE

i_return_value =                                                @

   res_display_tensor_post                                      @

      (  s_plot_name,                                           @

         i_register_id,                                         @

         s_register_location,                                   @

         l_range_flag,                                          @

         l_spectrum_flag )

dump i_return_value

#---------------------------------------------------------------------


res_display_report_write	()

#  Purpose          :  This file provides an example of a call to the

#                      function res_display_report_write()

#                      In this example field database, containing

#                      the results is opened and a file named

#                      RESULT_REPORT.prt is created. Then report

#                      tool definition is created and this function

#                      is called to write Z-displacements of node

#                      into file RESULT_REPORT.prt

#                      Before running this file run field.ses to

#                      create field.db

#                      This file can be run by starting a session of

#                      Patran,and running this session file

#                      through the "File","Session","Play" pulldown

#                      menus on the menu bar.

#  The function res_display_report_write()

#  has the following arguments:

#  res_display_report_write

#     (  report_name,

#        register_id,

#        register_type,

#        register_location,

#        output_method,

#        file_name )

#---------------------------------------------------------------------

#  Variable Declarations

STRING   s_report_name[32]

INTEGER  i_register_id

STRING   s_register_type[32]

STRING   s_register_location[32]

STRING   s_output_method[32]

STRING   s_file_name[32]

INTEGER  i_return_value

#---------------------------------------------------------------------

#  Open the database ’field.db’

uil_file_open.go ("field.db")

#  Open a new file for writing

uil_file_report.open_file( "RESULT_REPORT.prt", 80 )

#---------------------------------------------------------------------

# Create report tool definition

i_return_value = res_data_load_dbresult( 0, "Nodal", "Vector",      @

   "Default", "Static Subcase", "Displacements","Translational",    @

   "(NON-LAYERED)", "", "AsIs", "", "", "", "", 0. )

dump i_return_value

i_return_value = res_display_report_create( "","Nodes", 0, [""],    @

   18, ["ReportType:Full", "ReportTitle:$PRODUCT - Analysis"//      @

   " Code: $CODE_NAME","ReportTitle:Load Case: $LC_NAME, $SC_NAME", @

   "ReportTitle:Result $PRES_NAME, $SRES_NAME - Layer $LYR_NAME ",  @

   "ReportTitle:Entity: Node Vector", "ReportHeader:Page $PAGE",    @

   "ReportFooter:$DATE", "ReportPage:Height=52,Width=70,"//         @

   "TopMargin=5,LeftMargin=8,BottomMargin=5",                       @

   "ReportPagination:OFF", "ReportPageNumber:1",                    @

   "ReportPageAlignment:Center","ReportVColumn:1,Entity ID,ID,%I6%",@

   "ReportVColumn:2,Z Component,ZZ,%F12.6%", "EntitySort:LoadCase", @

   "ValueSort:1,Ascending,Algebraic", "ColumnHeaders:ON",           @

   "Filter:None", "ScaleFactor:1."] )

dump i_return_value

#---------------------------------------------------------------------

#  Write report tool definition to "RESULT_REPORT.prt"

s_report_name       = ""

i_register_id       = 0

s_register_type     = "Vector"

s_register_location = "Nodal"

s_output_method     = "Overwrite"

s_file_name         = "RESULT_REPORT.prt"

i_return_value =                                                    @

   res_display_report_write                                         @

      (  s_report_name,                                             @

         i_register_id,                                             @

         s_register_type,                                           @

         s_register_location,                                       @

         s_output_method,                                           @

         s_file_name )

dump i_return_value

#  A physical file "RESULT_REPORT.prt" is created in current

#  directory

#---------------------------------------------------------------------


res_display_graph_post	()

#  Purpose          :  This file provides an example of a call to the

#                      function res_display_graph_post()

#                      In this example field database, containing

#                      the results is opened and a graph plot

#                      tool definition is created. After a pause

#                      this function is called to post the

#                      graph plot.

#                      Before running this file run field.ses to

#                      create field.db

#                      This file can be run by starting a session of

#                      Patran,and running this session file

#                      through the "File","Session","Play" pulldown

#                      menus on the menu bar.

#  The function res_display_graph_post()

#  has the following arguments:

#  res_display_graph_post

#     (  plot_name,

#        register_location,

#        y_register_id,

#        x_register_id,

#        plot_title,

#        append_flag )

#---------------------------------------------------------------------

#  Variable Declarations

STRING   s_plot_name[32]

STRING   s_register_location[32]

INTEGER  i_y_register_id

INTEGER  i_x_register_id

STRING   s_plot_title[32]

LOGICAL  l_append_flag

INTEGER  i_return_value

#---------------------------------------------------------------------

#  Open the database ’field.db’

uil_file_open.go ("field.db")

#  Set ISO-1 viewing

i_return_value = ga_view_aa_set( 23., -34., 0. )

dump i_return_value

#---------------------------------------------------------------------

#  Create Graph Plot tool for Displacement

i_return_value = res_data_load_dbresult( 0, "Centroidal",       @

   "Scalar", "Default", "Static Subcase", "Displacements",      @

   "Translational", "(NON-LAYERED)", "MAG", "AsIs", "", "", "", @

   "", 0. )

dump i_return_value

i_return_value = res_data_title( 0, "Centroidal", "Scalar", 1,  @

   ["Displacements, Translational, MAG"] )

dump i_return_value

i_return_value = res_display_graph_create( "", "DataLocation",  @

   "Elements", 1, [ "EL:Elm 11:13 16:18 21:23"], 14,            @

   ["curveFitMethod:Linear", "curveStyle:Solid",                @

   "symbolDisplay:OFF", "xAxisLabelDisplay:ON",                 @

   "xAxisLabel:Coord 0.1", "xAxisScale:Linear",                 @

   "xAxisLabelFormat:Fixed, 12, White, 4",                      @

   "yAxisLabelDisplay:ON", "yAxisLabel:Element Tensor,"//       @

   " Demo Result1", "yAxisScale:Linear", "yAxisLabelFormat:"//  @

   "Fixed, 12, White, 4", "ScaleFactor:1.", "Filter:None",      @

   "LocationCID:Coord 0.1", ""] )

dump i_return_value

#---------------------------------------------------------------------

#  Session file paused press "Resume" to continue

sf_pause()

#---------------------------------------------------------------------

#  Post Graph Plot tool for Displacement

s_plot_name          = ""

s_register_location  = "Centroidal"

i_y_register_id      = 0

i_x_register_id      = -1

s_plot_title         = "EXAMPLE GRAPH"

l_append_flag        = FALSE

i_return_value =                                                @

   res_display_graph_post                                       @

      (  s_plot_name,                                           @

         s_register_location,                                   @

         i_y_register_id,                                       @

         i_x_register_id,                                       @

         s_plot_title,                                          @

         l_append_flag )

dump i_return_value

#---------------------------------------------------------------------


res_display_tool_unpost	()

#  Purpose          :  This file provides an example of a call to the

#                      function res_display_tool_unpost()

#                      In this example field database, containing

#                      the results is opened and a Fringe Plot

#                      tool definition is created & posted in

#                      default viewport. After a pause this function

#                      is called to unpost the Fringe Plot tool.

#                      Before running this file run field.ses to

#                      create field.db

#                      This file can be run by starting a session of

#                      Patran,and running this session file

#                      through the "File","Session","Play" pulldown

#                      menus on the menu bar.

#  The function res_display_tool_unpost()

#  has the following arguments:

#  res_display_tool_unpost

#     (  plot_type,

#        plot_name )

#---------------------------------------------------------------------

#  Variable Declarations

STRING   s_plot_type[32]

STRING   s_plot_name[32]

INTEGER  i_return_value

#---------------------------------------------------------------------

#  Open the database ’field.db’

uil_file_open.go ("field.db")

#  Set ISO-1 viewing

i_return_value = ga_view_aa_set( 23., -34., 0. )

dump i_return_value

#---------------------------------------------------------------------

#  Create and Post Fringe Plot tool for Displacement

i_return_value = res_data_load_dbresult( 0, "Nodal", "Scalar",  @

   "Default", "Static Subcase", "Displacements","Translational",@

   "(NON-LAYERED)", "MAG", "Default", "DeriveAverage", "All",   @

   "ShapeFunc" )

dump i_return_value

i_return_value = res_data_title( 0, "Nodal", "Scalar", 1, [     @

   "Default, Static Subcase: Displacements, Translational"//    @

   "-(NON-LAYERED) (MAG)"] )

dump i_return_value

i_return_value = res_display_fringe_create( "", "FreeFaces", 0, @

   [""], 12, [ "Range:Fri_default_Fringe", "RangeOverwrite:ON", @

   "FringeStyle:Discrete/Smooth" , "Shade:None",                @

   "ElemEdge:FreeEdge,Blue,Solid,1", "Shrink:0",                @

   "TitleDisplay:ON", "MinMaxDisplay:ON", "ValueDisplay:OFF",   @

   "Filter:None", "ScaleFactor:1.", "LabelStyle:Fixed, 8,       @

   White, 4"], TRUE )

dump i_return_value

i_return_value = res_display_fringe_post ( "", 0, "Nodal", TRUE,@

   TRUE )

dump i_return_value

#---------------------------------------------------------------------

#  Session file paused press "Resume" to continue

sf_pause()

#---------------------------------------------------------------------

#  Unpost the Fringe Plot tool

s_plot_type = "Fringe"

s_plot_name = "default_Fringe"

i_return_value =                                                @

   res_display_tool_unpost                                      @

      (  s_plot_type,                                           @

         s_plot_name )

dump i_return_value

#---------------------------------------------------------------------


res_display_tool_exist	()

#  Purpose          :  This file provides an example of 2 calls to the

#                      function res_display_tool_exist()

#                      In this example field database, containing

#                      the results is opened and this function is

#                      called to check the existence of Fringe Plot

#                      tool. After a pasue the Fringe Plot tool

#                      definition is created & posted in default

#                      viewport. Then this function is again called

#                      to check the existence of Fringe Plot tool.

#                      Before running this file run field.ses to

#                      create field.db

#                      This file can be run by starting a session of

#                      Patran,and running this session file

#                      through the "File","Session","Play" pulldown

#                      menus on the menu bar.

#  The function res_display_tool_exist()

#  has the following arguments:

#  res_display_tool_exist

#     (  plot_type,

#        plot_name )

#---------------------------------------------------------------------

#  Variable Declarations

STRING   s_plot_type[32]

STRING   s_plot_name[32]

INTEGER  i_return_value

LOGICAL  l_return_value

#---------------------------------------------------------------------

#  Open the database ’field.db’

uil_file_open.go ("field.db")

#  Set ISO-1 viewing

i_return_value = ga_view_aa_set( 23., -34., 0. )

dump i_return_value

#---------------------------------------------------------------------

#  Check the existence of mentioned tool

s_plot_type = "Fringe"

s_plot_name = "default_Fringe"

l_return_value =                                                @

   res_display_tool_exist                                       @

      (  s_plot_type,                                           @

         s_plot_name )

dump l_return_value

#---------------------------------------------------------------------

#  Session file paused press "Resume" to continue

sf_pause()

#---------------------------------------------------------------------

#  Create and Post Fringe Plot tool for Displacement

i_return_value = res_data_load_dbresult( 0, "Nodal", "Scalar",  @

   "Default", "Static Subcase", "Displacements","Translational",@

   "(NON-LAYERED)", "MAG", "Default", "DeriveAverage", "All",   @

   "ShapeFunc" )

dump i_return_value

i_return_value = res_data_title( 0, "Nodal", "Scalar", 1, [     @

   "Default, Static Subcase: Displacements, Translational"//    @

   "-(NON-LAYERED) (MAG)"] )

dump i_return_value

i_return_value = res_display_fringe_create( "", "FreeFaces", 0, @

   [""], 12, [ "Range:Fri_default_Fringe", "RangeOverwrite:ON", @

   "FringeStyle:Discrete/Smooth" , "Shade:None",                @

   "ElemEdge:FreeEdge,Blue,Solid,1", "Shrink:0",                @

   "TitleDisplay:ON", "MinMaxDisplay:ON", "ValueDisplay:OFF",   @

   "Filter:None", "ScaleFactor:1.", "LabelStyle:Fixed, 8,       @

   White, 4"], TRUE )

dump i_return_value

i_return_value = res_display_fringe_post ( "", 0, "Nodal", TRUE,@

   TRUE )

dump i_return_value

#---------------------------------------------------------------------

#  Check the existence of mentioned tool

l_return_value =                                                @

   res_display_tool_exist                                       @

      (  s_plot_type,                                           @

         s_plot_name )

dump l_return_value

#---------------------------------------------------------------------


res_display_tool_delete	()

#  Purpose          :  This file provides an example of a call to the

#                      function res_display_tool_delete()

#                      In this example field database, containing

#                      the results is opened and a Fringe Plot

#                      tool definition is created. Then this

#                      function is called to delete the Fringe Plot

#                      tool. The deletion of the result-tool is

#                      verified by getting the existence of the tool

#                      before and after deletion.

#                      Before running this file run field.ses to

#                      create field.db

#                      This file can be run by starting a session of

#                      Patran,and running this session file

#                      through the "File","Session","Play" pulldown

#                      menus on the menu bar.

#  The function res_display_tool_delete()

#  has the following arguments:

#  res_display_tool_delete

#     (  plot_type,

#        plot_name )

#---------------------------------------------------------------------

#  Variable Declarations

STRING   s_plot_type[32]

STRING   s_plot_name[32]

INTEGER  i_return_value

LOGICAL  l_return_value

#---------------------------------------------------------------------

#  Open the database ’field.db’

uil_file_open.go ("field.db")

#  Set ISO-1 viewing

i_return_value = ga_view_aa_set( 23., -34., 0. )

dump i_return_value

#---------------------------------------------------------------------

#  Create Fringe Plot tool for Displacement

i_return_value = res_data_load_dbresult( 0, "Nodal", "Scalar",  @

   "Default", "Static Subcase", "Displacements","Translational",@

   "(NON-LAYERED)", "MAG", "Default", "DeriveAverage", "All",   @

   "ShapeFunc" )

dump i_return_value

i_return_value = res_data_title( 0, "Nodal", "Scalar", 1, [     @

   "Default, Static Subcase: Displacements, Translational"//    @

   "-(NON-LAYERED) (MAG)"] )

dump i_return_value

i_return_value = res_display_fringe_create( "", "FreeFaces", 0, @

   [""], 12, [ "Range:Fri_default_Fringe", "RangeOverwrite:ON", @

   "FringeStyle:Discrete/Smooth" , "Shade:None",                @

   "ElemEdge:FreeEdge,Blue,Solid,1", "Shrink:0",                @

   "TitleDisplay:ON", "MinMaxDisplay:ON", "ValueDisplay:OFF",   @

   "Filter:None", "ScaleFactor:1.", "LabelStyle:Fixed, 8,       @

   White, 4"], TRUE )

dump i_return_value

#---------------------------------------------------------------------

#  Check the existence of Fringe Plot tool

l_return_value = res_display_tool_exist( "Fringe",              @

   "default_Fringe" )

dump l_return_value

#---------------------------------------------------------------------

#  Delete the Fringe Plot tool

s_plot_type = "Fringe"

s_plot_name = "default_Fringe"

i_return_value =                                                @

   res_display_tool_delete                                      @

      (  s_plot_type,                                           @

         s_plot_name )

dump i_return_value

#---------------------------------------------------------------------

#  Check the existence of Fringe Plot tool

l_return_value = res_display_tool_exist( "Fringe",              @

   "default_Fringe" )

dump l_return_value

#---------------------------------------------------------------------