# $Revision: 871612 $ on $Date: 2015-12-14 11:43:23 +0100 (Mo, 14. Dez 2015) $
# The above revision line needs to be the first line for ttkrf files
# Copyright (c) 2006 Ansys Inc

# AI*Environment Prototype GUI Layout 2
# Geometry DEZ File
#
# E. Miller
# 5/21/02
#

#----------------------------------------------------------------------------------------
dataEntryDialog createPointsDEZ "Create Point" 

dropDownEntry createPointsFam "Part" PartList ::geo_part_name FALSE
textEntry createPointsName "Name" name TEXT
checkItem InheritPnt "Inherit Part" ::vid_options(inherit) aie_pop_inherit
exclusiveGroup createPointsEXG NULL "Method" 5 ICON
	exclusiveGroupItem createPointsScrn "Screen Select" G_PointScreen$icon_size2.gif

		frame createPointsScrnFR "Screen Select" 
#			 checkItem crePointAllowPlane "Allow work-plane selection" ::allow_plane_selection NULL
         		entityChooser createPointsScrnWdgt "Location" pickScreenList POINTORXYZ ANY
      		frame END
	exclusiveGroupItem END #0
	
	exclusiveGroupItem createPntExpres "Explicit Coordinates" G_PointExplicit$icon_size2.gif
	    exclusiveGroup createPntExplicit "Explicit Locations" " " 1 DROPDOWN	 
 	 	exclusiveGroupItem  createPntExplicitXYZ "Create 1 point" 
		 	textEntry createPoints0X "X" x NUM 
		 	textEntry createPoints0Y "Y" y NUM
		 	textEntry createPoints0Z "Z" z NUM 
 		exclusiveGroupItem END 
 	 	exclusiveGroupItem  createPntExplicitExpr "Create multiple points" 

	    	frame createParamPointFR "Coords as a function f(m,...)"
		   textEntry createPntparam "m1 m2 ... mn   OR   m1,mn,incr" crePntParamList TEXT
		   textEntry createPntXexpress "F()->X" Xexpress TEXT
		   textEntry createPntYexpress "F()->Y" Yexpress TEXT
		   textEntry createPntZexpress "F()->Z" Zexpress TEXT
       		frame END
 		exclusiveGroupItem END
	    exclusiveGroup END		 				    			 	
	exclusiveGroupItem END #1

	exclusiveGroupItem createPointsDelt "Base Point and Delta" G_PointOffset$icon_size2.gif
		frame createPointsDeltFR "Base Point and Delta" 
          		entityChooser createPoints3Base "Base point" pickBasePnt POINTORXYZ 1
          		textEntry createPoints0DX "DX" dx NUM 
          		textEntry createPoints0DY "DY" dy NUM 
          		textEntry createPoints0DZ "DZ" dz NUM 
        	frame END		
	exclusiveGroupItem END #2

	exclusiveGroupItem createPointsCen "Center of 3 Points/Arc" G_PointCenter$icon_size2.gif
		exclusiveGroup createPointsCentFR " " "Center of 3 Points/Arc"  2 RADIO
			exclusiveGroupItem  createPntCent3P "Points"		  
			entityChooser createPointsCentWdgt "3 points" pickCenterList POINTORXYZ 3 no_confirm
		exclusiveGroupItem END	
			exclusiveGroupItem  createPntCentArc "Arc"		  
			entityChooser createPointsCentArcWdgt "Curve" pickCenterCrv CURVE 1
		exclusiveGroupItem END					
 			exclusiveGroup END     		
	exclusiveGroupItem END #3
	
    	exclusiveGroupItem createPointsVect "Based on 2 Locations" G_PointByVectorParam$icon_size2.gif
    	    
			exclusiveGroup createPnt2LocMethod "Points method" " " 1 DROPDOWN
			exclusiveGroupItem  createPnt2LocN "N point"
            	textEntry createPnt2LocNum "N points" nPnt2Loc NUM
			exclusiveGroupItem END
			exclusiveGroupItem  createPnt2LocP "Parameters"
             	textEntry createPointVectPar "Parameter(s)" ratio NUM 
			exclusiveGroupItem END
			exclusiveGroup END
       		entityChooser createPointsParamWdgt "2 locations" pickBetweenList POINTORXYZ 2 no_confirm

    	exclusiveGroupItem END #4
    
    	exclusiveGroupItem createPointCurvEnd "Curve Ends" G_PointEnds$icon_size2.gif

	    exclusiveGroup ptExtEG " " "Curve Type" 2 RADIO
		exclusiveGroupItem ptExt_1 "BSpline"
    		    frame createPointEndPoint "Curve Ends" 
			entityChooser createCurveEndsPick "Curve(s)" pickEndList CURVE ANY
			dropDownEntry createPntCrvEnd "How" how_select_end which_end TRUE
      		    frame END
		exclusiveGroupItem END		     
		exclusiveGroupItem ptExt_2 "Faceted"
		    entityChooser createCurveEndsPick2 "Curve(s)" pickEndList CURVE ANY
		    textEntry ptfacetedAngle "Angle for curves" fangle NUM
      		exclusiveGroupItem END     	
	    exclusiveGroup END
	
	exclusiveGroupItem END #8

    	exclusiveGroupItem createPointInter "Curve-Curve Intersection" G_PointCurveIntersection$icon_size2.gif
    		frame createPointsIntersection "Curve-Curve Intersection" 
		    textEntry createPointTolVal "Gap tolerance" toler NUM
		    entityChooser createCurveIntersecPick "Curve(s)" pickIntList CURVE 2
       		frame END
 	exclusiveGroupItem END #6
 	
 	exclusiveGroupItem createPointCurvPar "Parameter along a Curve" G_PointByParam$icon_size2.gif
			exclusiveGroup createPntCrvParMethod "Points method" " " 1 DROPDOWN
			    exclusiveGroupItem  createPntCrvParN "N point"
            	    textEntry createPntCrvParNum "N points" nPnt2Loc NUM
			    exclusiveGroupItem END
			    exclusiveGroupItem  createPntCrvParP "Parameters"
             	    textEntry createPointParVal "Parameter(s)" crePnts3param NUM 
			    exclusiveGroupItem END
			exclusiveGroup END
	        entityChooser createPointCurvePar "Curve" pickParList CURVE 1
 	exclusiveGroupItem END #7


	exclusiveGroupItem createPointCurvProj "Project Points to Curves (key = p)" G_ProjPoint2Curve$icon_size2.gif

		frame createPointsProjPntFR "Project Points to Curves" 
        		    entityChooser createCurveProjPick "Curves" pickProjCrv CURVE ANY
        		    entityChooser pointPick "Points" pickPoint POINTORXYZ ANY
					checkItem trimCrvPrjCk "Trim curves" trimCrvPrjFlag NULL
					checkItem movCrvPrjCk "Move point" movePointPrjFlag NULL
		frame END
    	exclusiveGroupItem END #8
    
     	exclusiveGroupItem createPointprojSurf "Project Point to Surface (key = Shift-P)" G_ProjPoint2Surf$icon_size2.gif
    		frame createPntProjSurfFR "Project Point to Surface"
    		    entityChooser createPntOnSurfPick "Surface" pickProjSrf SURF 1
    		    entityChooser pointPick2 "Points" pickPoint2 POINTORXYZ ANY
				checkItem embedPntOnSurfCk "Embed point" embedPntOnSurfFlag NULL
				checkItem movePntOnSurfCk "Move point" movePointPrjFlag NULL
    		frame END
    	exclusiveGroupItem END #9
    	

exclusiveGroup END


dataEntryDialog END

#---------------------------------------------------------------------------------------------------
dataEntryDialog createCurvesDEZ "Create/Modify Curve"
dropDownEntry createCurvesFam "Part" PartList ::geo_part_name FALSE 
textEntry createCurvesName "Name" name TEXT
checkItem InheritCrv "Inherit Part" ::vid_options(inherit)  aie_pop_inherit

exclusiveGroup createCurvesEXG NULL "Method" 5 ICON
	exclusiveGroupItem createCrvPnts "From Points (key = Ctrl-c)" G_FromPoints$icon_size2.gif
		frame createCurvesFromPoint "From Points" 
		entityChooser createCurvePick "Points" pickList POINTORXYZ ANY do
	        frame END
	exclusiveGroupItem END #0

    	exclusiveGroupItem createCrvArc "Arc" G_ArcFromPoints$icon_size2.gif 
		exclusiveGroup createCrvArcMethod "Create Arc" "Method" 5 DROPDOWN	
			exclusiveGroupItem createCrvArc0 "From 3 Points"  
		  		entityChooser createArcWdgt0 "Locations" pickArcList  POINTORXYZ 3 no_confirm
			exclusiveGroupItem END 
			exclusiveGroupItem createCrvArc1 "Center and 2 Points"  
				greyGroup RadiusArcGG "Radius"
				greyGroupItem RadiusArcGGtext " "
         			textEntry createArcRadiusVal " " radius NUM 
				greyGroupItem END							
				greyGroup END  
				radioGroup createArcRG "Keep" 2 keep_arc 0 NULL
						radioItem createArcRG.0 Center 0
						radioItem createArcRG.1 Start/End 1
					radioGroup END	
		  		entityChooser createArcWdgt1 "Points" pickArcList  POINTORXYZ 3 no_confirm
			exclusiveGroupItem END 									
		exclusiveGroup END
    	exclusiveGroupItem END #1
    	
	exclusiveGroupItem createCrvCicle "Circle or arc from Center point and 2 points on plane. Optional Radius" G_CircleFromPoints$icon_size2.gif
	    frame createCircleRadius "Center and 2 Points" 
		greyGroup RadiusGG "Radius"
			greyGroupItem RadiusGGtext " "
         	textEntry createCircleRadiusVal " " radius NUM 
			greyGroupItem END							
		greyGroup END
		textEntry createCircleRadiusStVal "Start angle" stangle NUM
		textEntry createCircleRadiusEnVal "End angle" enangle NUM
		entityChooser createPointsCircleWdgt "Points" pickCircleList POINTORXYZ 3 no_confirm
      	    frame END		
	exclusiveGroupItem END #2
	
	exclusiveGroupItem createCrvMethods "Surface Parameter" G_IsoParamCurve$icon_size2.gif 	
	    
	     exclusiveGroup creCurveEG "Isocurve Methods" " " 1 DROPDOWN	 		 	
	 	    exclusiveGroupItem createCrvPoint "Direction on Surface" 
			entityChooser pickSrfIsoCurve0 "Surface" pickSurf SURF 1
		    entityChooser  createIsoUVpick "Points" pickCurvCrePnt POINTORXYZ 2 "surface_selected no_confirm" 
     	 exclusiveGroupItem END
	 	
	 	exclusiveGroupItem createEdgeCurv "Point on Edge"
			entityChooser pickSrfIsoCurve1 "Surface" pickSurf SURF 1
			entityChooser pickEdgePnt "U V" pickEdgePnt POINTORXYZ 1 "surface_selected_edge xyz update_var {param pickEdgePnt}" "U-V location"
			entityChooser pickEdgePnt2 "Point" pickEdgePnt2 POINT 1 
     	exclusiveGroupItem END
	 	
	 	exclusiveGroupItem createCrvIso "By Parameter" 
			entityChooser pickSrfIsoCurve2 "Surface(s)" pickSurf SURF ANY	 	    
	 	    exclusiveGroup UVChoice "U/V direction" " " 2 RADIO
	 		exclusiveGroupItem  createIsoCurveU "U"
	 			textEntry createCurvePar1 "Parameter"  isopar NUM 
	 		exclusiveGroupItem END
			
			exclusiveGroupItem  createIsoCurveV "V"
				textEntry createCurvePar2 "Parameter"  isopar NUM 
			exclusiveGroupItem END		
     		    exclusiveGroup END
     		exclusiveGroupItem END	    
     	    exclusiveGroup END

	exclusiveGroupItem END #3
	
	exclusiveGroupItem createCrvInter "Surface-Surface Intersection" G_IntersectionCurve$icon_size2.gif
        	exclusiveGroup creCrvIntSetR "Surface-Surface Intersection" " " 3 RADIO
      	    exclusiveGroupItem creCrv1 "Surfaces"
      				checkItem PartIntDiffPartsCk "Only Different Parts" diffPartsFlag NULL   
      				checkItem PartIntSingleCurve "Create Single Curve" singleCurveFlag NULL   
					entityChooser creCrvIntSet1 "Surfaces" pickSetSurfs SURF ANY    			
 			exclusiveGroupItem END
    	    exclusiveGroupItem creCrvP "Parts"
    				checkItem SrfIntDiffPartsCk "Only Different Parts" diffPartsFlag NULL
	    			entityChooser creCrvIntSetP1 "Parts" pickSetSurfs PART ANY  			
 			exclusiveGroupItem END			                   
 	        exclusiveGroupItem  creCrv2 "2 sets" 
 				radioGroup createCurveIntRG "Created Curve Type" 3 createCurveIntCTVal 0 NULL
					radioItem createCurveIntRG.Bsp Bspline 1
					radioItem createCurveIntRG.Uns Faceted 0
				radioGroup END
		    entityChooser createCurveIntSet1 "Set1 Surfaces" pickSet1Surfs SURF ANY
		    entityChooser createCurveIntSet2 "Set2 Surfaces" pickSet2Surfs SURF ANY
			exclusiveGroupItem END 	    
		    exclusiveGroup END	   
 	exclusiveGroupItem END #4
 	
 	exclusiveGroupItem createCrvProj "Project Curve on Surface (key = Ctrl-p)" G_ProjCurve2Surf$icon_size2.gif
	
		exclusiveGroup createCrvProjMethod "Method" " " 1 DROPDOWN 	
			exclusiveGroupItem createCrvProjNml "Normal to Surface"
				#frame createCurvesFromProj "Project Curve on Surface" 
				entityChooser createCurvProj "Curves" pickCurvesProj CURVE ANY
				entityChooser createSurfProj "Surfaces" pickSurfsProj SURF ANY
	    		#frame END
	  	 
	    		# greyGroup createCurveVec "By Vector"
	    		#	greyGroupItem createCurveByVector " "
	    		#	entityChooser createVectProj "Screen Vector" pickVecList POINT 2
	    		#	greyGroupItem END
				# greyGroup END
			exclusiveGroupItem END
			
			exclusiveGroupItem createCrvProjVecEG "Specify Direction"
				
				entityChooser createCurvProjvec "Curves" pickCurvesProj CURVE ANY
				entityChooser createSurfProjvec "Surface" pickSurfsProj SURF 1
				
				exclusiveGroup createCrvPrjEG " "  "Direction" 1 DROPDOWN
					exclusiveGroupItem createCrvPrjEGX "X Direction"
					exclusiveGroupItem END
					exclusiveGroupItem createCrvPrjEGY "Y Direction"
					exclusiveGroupItem END
					exclusiveGroupItem createCrvPrjEGZ "Z Direction"
					exclusiveGroupItem END
					exclusiveGroupItem createCrvPrjEGS "Screen Normal"
					exclusiveGroupItem END
					exclusiveGroupItem createCrvPrjEGV "Along a Vector"
					entityChooser  createCrvPrjPick1 "Two Points" projpointsvec POINTORXYZ 2 
					exclusiveGroupItem END
				exclusiveGroup END
			exclusiveGroupItem END
			
			checkItem crCrvPrjKpChk "Keep original" prjOriginCurvFlag NULL
			checkItem trimSurfProj "Trim surfaces" prTrFlag NULL			 	
		exclusiveGroup END
			
    exclusiveGroupItem END #5
    	

 
    	
	exclusiveGroupItem createCrvSegment "Segment Curve (key = s)" G_CurveSegment$icon_size2.gif

	       exclusiveGroup modifyCurveSegFR "Segment Curve" " " 1 DROPDOWN

		exclusiveGroupItem modifCrvSegment "Segment by point"
		    entityChooser modifyCurvSeg "Curve" pickCurveSeg CURVE 1
		    entityChooser modifyCurvPnt "Points" pickPointSeg POINTORXYZ ANY	
		exclusiveGroupItem END
		
		exclusiveGroupItem modCurvtrmtocrv "Segment by curve"  
		    entityChooser modifyCurvSegcrv1 "Curve to segment" pickCurveSeg CURVE 1  
		    entityChooser modifyCurvSegcrv2 "Segment at curve" pickCurveSegWith  CURVE 1
		    checkItem modifyCurvSegBoth "Segment both curves" segBothFlag NULL
		exclusiveGroupItem END			

		exclusiveGroupItem modifCrv4Segment "Segment by plane"
		    entityChooser modifyCurvSeg2 "Curve" pickCurveSeg CURVE ANY    			    
		    exclusiveGroup modSegmCRVNormEG "Plane Options" "Plane normal" 4 DROPDOWN		           
		           	exclusiveGroupItem segCRVAxisOptionX "X"
				entityChooser segCRVPoint1 "Through point" SegPlanePntList  POINTORXYZ 1		
		           	exclusiveGroupItem END           	
		           	exclusiveGroupItem segCRVAxisOptionY "Y"
				entityChooser segCRVPoint2 "Through point" SegPlanePntList  POINTORXYZ 1
		           	exclusiveGroupItem END           	
		           	exclusiveGroupItem segCRVAxisOptionZ "Z"
				entityChooser segCRVPoint3 "Through point" SegPlanePntList  POINTORXYZ 1
		           	exclusiveGroupItem END        	
		           	exclusiveGroupItem segCRVAxisOptionV "Vector"
		           	entityChooser segCRVAxis2PPick "Through 2 points" segVecList  POINTORXYZ 2
		           	exclusiveGroupItem END
		    exclusiveGroup END	
		exclusiveGroupItem END
		
		exclusiveGroupItem modCurvConnect "Segment by connectivity"  
		    entityChooser modifyCurvSeg3 "Faceted Curve" pickCurveSeg CURVE ANY  	
		    checkItem modCrvKO "Keep original" keepOriginCurvFlag NULL
		exclusiveGroupItem END

		exclusiveGroupItem modifCrvEGAngle "Segment by angle"
		    entityChooser modifyCurvSeg4 "Faceted Curve" pickCurveSeg CURVE ANY
		    textEntry modCurvAngle "Angle" seg_angle2 NUM
		    textEntry modCurvMinSeg "Minimum number of segments" minSeg2 NUM
		    checkItem modCrvKO2 "Keep original" keepOriginCurvFlag NULL
		exclusiveGroupItem END
	
#	  	 exclusiveGroupItem modCurvRF "Restrict Segments"  
#  		     entityChooser modifyCurvSeg5 "Curve" pickCurveSegC CURVE 1	
#	          exclusiveGroupItem END

	exclusiveGroup END		 
	exclusiveGroupItem END #6
	
	exclusiveGroupItem createCrvConcat "Concatenate/Reapproximate Curves (key = g)" G_CurveConcatonate$icon_size2.gif
        exclusiveGroup modifyReapproxCrv "Concatenate/Reapproximate Curves" "Method" 2 DROPDOWN
            exclusiveGroupItem mergeCrv "Concatenate Curves"
                entityChooser modifyCurvConcat "Curves" pickCurveConcat CURVE ANY
                greyGroup creCrvConcatTolGG "Tolerance"
				greyGroupItem creCrvConcatTol " "
                textEntry modifyCurveConcatTol " " ctol NUM
                greyGroupItem END
                greyGroup END
            exclusiveGroupItem END
            exclusiveGroupItem reappCrv "Reapproximate Curves"
                entityChooser reapproxCrv "Curves" pickCurveReapp CURVE ANY
                textEntry reapproxCrvTol "Tolerance" ctol1 NUM
                checkItem reapproxCrvFacetedCk "Faceted only" reappcrvfacetedFlag NULL
            exclusiveGroupItem END
            exclusiveGroupItem reappCrvHull "2D Hull"
                entityChooser reapproxCrvHull "Curves" pickCurveHull CURVE ANY
                textEntry reapproxCrvHullTol "Tolerance" hull_tol NUM
                integerEntry reapproxCrvHullShrink "Max shrink" shrink 0 1 .05
                checkItem reapproxCrvHullFour "Four curves" four NULL
            exclusiveGroupItem END
        exclusiveGroup END
	exclusiveGroupItem END #7
 
	exclusiveGroupItem createCrvExtract "Extract Curves from Surfaces" G_CurvesFromSurf$icon_size2.gif
	    	entityChooser createBoundCurves "Surfaces" pickCurveExtract SURF ANY
	     exclusiveGroup crvExtEG " " "Surface Type" 2 RADIO
    		exclusiveGroupItem crvExt_1 "BSpline"
    			radioGroup crvExt_1RG "Extract Edges" 1 extract_bsp_how 0 NULL
						radioItem crvExt_1RG.0 "Check Topology" 0
						radioItem crvExt_1RG.1 "Create New" 1
				radioGroup END
      		exclusiveGroupItem END		     
	    	 exclusiveGroupItem crvExt_2 "Faceted"
  				textEntry facetedAngle "Angle for surfaces" fangle NUM
		textEntry facetedMinSeg "Min number of segments" MinSeg NUM
		dropDownEntry facetedBoundaryOpt "Which curve segments" BList boundary FALSE 
      		exclusiveGroupItem END     	
  		exclusiveGroup END
	    
#	    frame createCurveEctractFR "Extract Curves from Surfaces"
#	    frame END		
	exclusiveGroupItem END #8


#=================================================================
	exclusiveGroupItem modifyCurve "Modify Curves" G_EditCurve$icon_size2.gif
 	    exclusiveGroup modCrvEG "Modify Curve(s)" " " 5 DROPDOWN
			exclusiveGroupItem modCrv_0 "Reverse direction"

		    	entityChooser modCrvPick_0 "Curves" modCrv_crv0 POINTORXYZ ANY "curve show_direction"
			exclusiveGroupItem END
			exclusiveGroupItem modCrv_1 "Extend"
		    	entityChooser modCrvPick_1 "Curves" modCrv_crv1 POINTORXYZ ANY "curve show_end"

				exclusiveGroup modCrvExtEndEG "Extend to" " " 3 RADIO
           			exclusiveGroupItem modCrvExtEnd_0 "Pnt"
		    		entityChooser modCrvExtEndPick "Location" modCrvExtEndPnt POINTORXYZ 1 xyz
           			exclusiveGroupItem END
            	exclusiveGroupItem modCrvExtEnd_C "Crv"
            	checkItem modCrvExtTargetCk "Allow Extend Target Curve" allowExtendTargetFlag NULL          										
		    	entityChooser modCrvPick_C "Curve" CrvExtTo CURVE 1 " " "Target curve"         	
           		exclusiveGroupItem END          	
            		exclusiveGroupItem modCrvExtEnd_1 "Length"
					textEntry modCrvExtLen "Length" modCrvExtLen NUM
				radioGroup modCrvExtMethodRG "Extend as..." 3 modCrvExtMethod 1 modCrvExtProc
				radioItem modCrvExtLine "Line" "line"
				radioItem modCrvExtArc "Arc" "arc"				 
				radioGroup END
           			exclusiveGroupItem END          	
				exclusiveGroup END
			exclusiveGroupItem END
			exclusiveGroupItem modCrv_2 "Match curves"
		    	entityChooser modCrvPick_2 "Curves" modCrv_crv2 POINTORXYZ 2 "curve show_end"
				radioGroup modCrvMatchAccRG "Accuracy" 3 modCrvMatchAcc 1 modCrvMatchProc
				radioItem modCrvMatchGeo "Geom" "1"
				radioItem modCrvMatchExact "Exact" "2"				 
				radioGroup END
				radioGroup modCrvMatchWhichRG "Curves to modify" 4 modCrvMatchOneOrBoth 1 modCrvMatchProc
				radioItem modCrvMatchBoth  "Both Curves" "0"				 
				radioItem modCrvMatchFirst "First Curve" "1"
				radioGroup END
 				exclusiveGroup modCrvMatchMethodEG "Method" " " 5 DROPDOWN
					exclusiveGroupItem modCrvMatch0 "Point only"
					exclusiveGroupItem END
					exclusiveGroupItem modCrvMatch1 "Point  & tangent"
					exclusiveGroupItem END
					exclusiveGroupItem modCrvMatch2 "Point, tangent, curv-r"
					exclusiveGroupItem END
					exclusiveGroupItem modCrvMatch3 "Point & curv-r"
					exclusiveGroupItem END
				exclusiveGroup END
		    		checkItem modCrvMatchKeep "Keep original" modCrvKeepFlag NULL
			exclusiveGroupItem END
			exclusiveGroupItem modCrv_3 "Bridge curves"
				entityChooser modCrvPick_3 "Curves" modCrv_crv3_1 POINTORXYZ 2 "curve show_end"
				frame modCurveBridge "Modify curve magnitude:"
				scaleBar modFirstCurveBridge "First Curve:" ::va_set(c1mag) 0 1 0.001 "aie_update_bridge_curve" 0 160
				scaleBar modSecondCurveBridge "Second Curve:" ::va_set(c2mag) 0 1 0.001 "aie_update_bridge_curve" 0 160
				frame END			
			exclusiveGroupItem END
ifdef AI_ENV_BETA
#		exclusiveGroupItem modCrv_5 "Extend/Trim"
#			entityChooser modCrvPick_5_1 "Curves" modCrv_crv5_1 POINTORXYZ 2 "curve show_end"
#		exclusiveGroupItem END

#			exclusiveGroupItem modCrv_4 "Connect curves with point"
#				entityChooser modCrvPick_4_1 "Curves" modCrv_crv4_1 POINTORXYZ 2 "curve show_end"
#				entityChooser modCrvPick_4_2 "Point" modCrv_pnt4_2 POINTORXYZ 1
#			exclusiveGroupItem END
endif
		exclusiveGroup END
	exclusiveGroupItem END #9

	exclusiveGroupItem createMidCrv "Create Midline" G_CurveMidcurve$icon_size2.gif
            exclusiveGroup createCrvMidMethod "Midline" "Method" 5 DROPDOWN
                exclusiveGroupItem createCrvMidMethod1 "From 2 Curves"
		    entityChooser MidLinePick "Curves" pickMidline_crv2 CURVE 2 
#                   textEntry MidLineTol "Tolerance" ctol1 NUM
                exclusiveGroupItem END
                exclusiveGroupItem createCrvMidMethod2 "By Pairs"
                    entityChooser createCrvMidSetPick1 "Side 1" midlineList CURVE ANY
                    entityChooser createCrvMidSetPick2 "Side 2" midlineList2 CURVE ANY
#                   textEntry MidLineTol "Tolerance" ctol1 NUM
                exclusiveGroupItem END
	    exclusiveGroup END
	exclusiveGroupItem END #10
	
#=================================================================
#ifdef AI_ENV_BETA
 	exclusiveGroupItem sectCurve "Create Section Curves" G_SectionCurves$icon_size2.gif

		entityChooser sectCurveSurfPick "Surfaces" pickSurfSect SURF ANY
 	
		exclusiveGroup sectCurvePlaneEG "Plane Setup" "Normal to" 4 DROPDOWN		           
			exclusiveGroupItem sectCurvexyz "XYZ Plane"
					exclusiveGroup sectCurvePlaneXYZEG "XYZPlane" "Direction" 3 Radio
							exclusiveGroupItem  sectCurvePlaneX "X"
							exclusiveGroupItem END
							exclusiveGroupItem  sectCurvePlaneY "Y"
							exclusiveGroupItem END
							exclusiveGroupItem  sectCurvePlaneZ "Z"
							exclusiveGroupItem END
					exclusiveGroup END
					#entityChooser sectCurvePlanepntxyz "Point" pntnnormal  POINTORXYZ 1
					#textEntry sectCurveplanevec "Normal" normal NUM 
			exclusiveGroupItem END
		    
			exclusiveGroupItem sectCurvethrpnt "Three Points"
					entityChooser sectCrvplanepntp1Pick "Point1" sectCurveplnpnt1  POINTORXYZ 1 "do xyz no_confirm"
					entityChooser sectCrvplanepntp2Pick "Point2" sectCurveplnpnt2  POINTORXYZ 1 "do xyz no_confirm"
					entityChooser sectCrvplanepntp3Pick "Point3" sectCurveplnpnt3  POINTORXYZ 1 "do xyz no_confirm"
		    exclusiveGroupItem END           	
	    
		    exclusiveGroupItem sectCurvealng "Along Existing Curve"
		    		entityChooser sectCurveExstPick "Curve" pickcrvexist CURVE 1	
		    		textEntry SectCurveexstsnum "Number of Sections" numsect NUM 		
		    exclusiveGroupItem END		    
		    
		exclusiveGroup END	

		greyGroup sectCurveOffsetGG "Start Point/Multiple"
			greyGroupItem sectCurveMulti "Create Multiple Sections"
					textEntry sectCurveMDelta "Delta offset" mpsectdelta NUM
		    		entityChooser sectMstrtPick "Start Point" mpsectstart  POINTORXYZ 1	xyz	
		    		entityChooser sectMfinPick "End Point" mpsectend POINTORXYZ 1 xyz		
			greyGroupItem END
		greyGroup END
	
		
		exclusiveGroupItem END #11
#endif
#=================================================================	
	
 exclusiveGroup END 

dataEntryDialog END

#---------------------------------------------------------------------------------------------------
dataEntryDialog createSurfsDEZ  "Create/Modify Surface" 

dropDownEntry createSurfsFam "Part" PartList ::geo_part_name FALSE
textEntry createSurfName "Name" name TEXT
checkItem InheritSrf "Inherit Part" ::vid_options(inherit)  aie_pop_inherit

exclusiveGroup createSurfsEXG NULL "Method" 5 ICON
	
	exclusiveGroupItem createSurfSimple "Simple Surface" G_2to4CurveSurf$icon_size2.gif 
		exclusiveGroup createSurfSimpleMethod "Simple Surface Method" "Method" 5 DROPDOWN	
	
			exclusiveGroupItem createSurfSimple1 "From 2-4 Curves"  
		  		entityChooser createSurfEdgPick "Curves" curveList  CURVE ANY
		textEntry createSurftolVal "Tolerance" createSrfTol NUM
			exclusiveGroupItem END
			exclusiveGroupItem createSurfSimple2 "From Curves"  
		  		entityChooser createSurfSimpleCrvs "Curves" curveList  CURVE ANY
			exclusiveGroupItem END
			exclusiveGroupItem createSurfSimple0 "From 4 Points"  
		  		entityChooser createSurfSimple4pts "Locations" Simple4ptsList  POINTORXYZ 4
			exclusiveGroupItem END			

ifdef AI_ENV_BETA			
			# VG
			exclusiveGroupItem createMultipleSrfs "Multiple Surfaces From XY-plane Curves" 
			 	entityChooser createMultipleSrfsCrvs "Curves" curveList  CURVE ANY
			   checkItem crMultiple_1 "Set Part on shape" Mult1Pnt NULL  		
			exclusiveGroupItem END	
endif		
						
		exclusiveGroup END
	exclusiveGroupItem END #0

	exclusiveGroupItem createSurfDrv "Curve Driven" G_CurveDrivenSurf$icon_size2.gif
	    	frame createSurfDriv "Surface from Driven Curve" 
		   	entityChooser createSurfDrivPick "Driving curve" curveDrivingList  CURVE 1
		   	entityChooser createSurfDrivenPick "Driven curves" curveDrivenList  CURVE ANY
      		frame END
    	exclusiveGroupItem END #1
  	
  	exclusiveGroupItem createSurfSweep "Sweep Surface" G_SweepSurf$icon_size2.gif
		exclusiveGroup createSurfSweepMethod GROOVERELIEF "Method" 5 DROPDOWN
  			exclusiveGroupItem createSurfSweepVec "Vector" 
				entityChooser createSurfPPick "Through 2 points" pntSweepVecList  POINTORXYZ 2	
			entityChooser createSurfCurvePick "Swept curves" curveSweepList  CURVE ANY
    		exclusiveGroupItem END 
  			exclusiveGroupItem createSurfSweepCrv "Driving curve" 
				entityChooser createSurfPDPick "Curve" crvSweepDList  CURVE 1	
				entityChooser createSurfCurveDPick "Swept curves" curveSweepList  CURVE ANY
    		exclusiveGroupItem END 
    	exclusiveGroup END
    	exclusiveGroupItem END #2
    	
    	exclusiveGroupItem createSurfRev "Surface of Revolution" G_RevolveSurf$icon_size2.gif
			frame createSurfRevFR "Surface of Revolution" 
			    textEntry createSurfRevSA "Start angle" sangle NUM
			    textEntry createSurfRevEA "End angle" eangle NUM
			    entityChooser createSurfRevAxisPick "Axis points" curveRevAxis  POINTORXYZ 2
			    entityChooser createSurfRevCrvPick "Curves" curveRevList  CURVE ANY
	      		frame END
    	exclusiveGroupItem END #3

	exclusiveGroupItem createSurfLoft "Loft Surface over Several Curves" G_LoftedSurf$icon_size2.gif
			frame createSurfLoftFR "Loft Surface over Several Curves"
				textEntry createSurfLoftTol "Tolerance" lofttol NUM
			       	entityChooser createSurfLoftPick "Curves" loftsurfList  CURVE ANY
ifdef AI_ENV_BETA
				checkItem createLoftLinear "Linear surface" loftLinearFlag NULL
				checkItem createLoftBTopo "Build topology" loftBTopoFlag NULL
#				checkItem createLoftBlend "Blend" loftBlendFlag NULL
endif
      			frame END
    	exclusiveGroupItem END #4
  	
  	exclusiveGroupItem createSurfOffset "Offset Surface (key = o)" G_OffsetSurface$icon_size2.gif
			frame createSurfOffsetFR "Offset Surface" 
				textEntry createSurfOffsetVal "Distance" offsetdist NUM
				entityChooser createSurfOffsetPick "Surfaces" offsetSurfList  SURF ANY
#				checkItem createSurfOffsetKeep "Chain select" connFlag NULL
ifdef AI_ENV_BETA
				checkItem createSurfOffsetStitch "Stitch surfaces" stFlag NULL
endif
      			frame END
    	exclusiveGroupItem END #5

        exclusiveGroupItem createSurfMid "Midsurface" G_Midsurf$icon_size2.gif
            exclusiveGroup createSurfMidMethod "Midsurface" "Method" 5 DROPDOWN
                exclusiveGroupItem createSurfMidMethod1 "By Parts"
                    textEntry createPartMidDistance "Search distance" distance NUM
# Duplication, USE Repaire or Settings  textEntry createPartMidTopoTol "Tolerance" ::geo_cad(toler) NUM
                    dropDownEntry createPartMidMode "How" how_modes mode FALSE
                    entityChooser createPartMidPick "Parts" partsurfList PART ANY
                    checkItem createPartMidKeep "Keep original" keepFlag NULL
                    checkItem createPartMidDel "Delete unattached curves and points" DelUnattFlag NULL
                    checkItem createPartCreateAssem "Create assemblies" assemblyFlag NULL
                    checkItem createPartMidPartial "Partial" partialFlag NULL
                    checkItem createPartMidSimilar "Similar pairs only" similarFlag NULL
                    checkItem createPartMidConnected "Prefer connected pairs" connectedFlag NULL
                exclusiveGroupItem END
                exclusiveGroupItem createSurfMidMethod2 "By Surfaces"
                    textEntry createSurfMidDistance "Search distance" distance NUM
# Duplication, USE Repaire or Settings   textEntry createSurfMidTopoTol "Tolerance" ::geo_cad(toler) NUM
                    dropDownEntry createSurfMidMode "How" how_modes mode FALSE
                    entityChooser createSurfMidPick "Surfaces" midsurfList SURF ANY
                    checkItem createSurfMidKeep "Keep original" keepFlag NULL
                    checkItem createSurfMidDel "Delete unattached curves and points" DelUnattFlag NULL
                    checkItem createSurfMidPartial "Partial" partialFlag NULL
                    checkItem createSurfMidSimilar "Similar pairs only" similarFlag NULL
                    checkItem createSurfMidConnected "Prefer connected pairs" connectedFlag NULL
                exclusiveGroupItem END
                exclusiveGroupItem createSurfMidMethod3 "By Pairs"
# Duplication, USE Repaire or Settings  textEntry createPairSurfMidTopoTol "Tolerance" ::geo_cad(toler) NUM
                    entityChooser createPairSurfMidPick1 "Side 1" midsurfList SURF ANY
                    entityChooser createPairSurfMidPick2 "Side 2" midsurfList2 SURF ANY
                    checkItem createPairSurfMidKeep "Keep original" keepFlag NULL
                    checkItem createPairSurfMidDel "Delete unattached curves and points" DelUnattFlag NULL
                    checkItem createPairMidPartial "Partial" partialFlag NULL
ifdef AI_ENV_BETA
                    checkItem createPairMidOffset "Just offset side 1" offsetFlag NULL
endif
                exclusiveGroupItem END
            exclusiveGroup END
        exclusiveGroupItem END #6

	exclusiveGroupItem createSurfTrim "Segment/Trim Surface (key = Ctrl-s)" G_TrimSurf$icon_size2.gif
#			frame modifySurfSegFR "Segment/Trim NURB Surface"
#			   	entityChooser createSurfTrmCurvePick "Curves" crvSurfTrmCurveList CURVE ANY
#   	    			entityChooser createSurfTrmSurfPick "Surface" crvSurfTrmSurfList SURF 1 
#   	    		frame END

 #------------------
 #   	exclusiveGroupItem createSurModify "Segment Facet Tools" G_SegmentFacetedSurf35.gif
 #   	     frame modifySurfToolsFR "Select Surfaces"
 #   	         entityChooser surfmodifyPick "Surface" modFacetSurfList SURF ANY
 #   	     frame END
    	    exclusiveGroup modifyFacetSurf2EXG "Segment Surface" "Method" 1 DROPDOWN

			   exclusiveGroupItem  modFacetSurfCurve "By Curve"  
        			    entityChooser createSurfTrmSurfPick "Surface" crvSurfTrmSurfList SURF ANY
			    		entityChooser createSurfTrmCurvePick "Curves" crvSurfTrmCurveList CURVE ANY
			   exclusiveGroupItem END

			   exclusiveGroupItem  modFacetSurfPlane "By Plane"    
			      entityChooser createSurfTrmSurfPick2 "Surface(s)" crvSurfTrmSurfList SURF ANY      			    
			         exclusiveGroup modSegmPlaneNormEG "Plane Setup" "Method" 4 DROPDOWN		           
			           	exclusiveGroupItem segPlaneAxisPntPln "Point and Plane"
							entityChooser segPlanePointnrm1 "Through point" SegPlanePntList  POINTORXYZ 1 "do xyz"	
							textEntry segPlanevec "Normal" segPlanenormal NUM
			           	exclusiveGroupItem END           	
			           	exclusiveGroupItem segPlaneAxisThreepnt "Three Points"
							entityChooser segPlanePoint1 "Point1" SegPlanePnt1  POINTORXYZ 1 "do xyz no_confirm"
							entityChooser segPlanePoint2 "Point2" SegPlanePnt2  POINTORXYZ 1 "do xyz no_confirm"
							entityChooser segPlanePoint3 "Point3" SegPlanePnt3  POINTORXYZ 1 "do xyz no_confirm"
			           	exclusiveGroupItem END           	
          			    exclusiveGroup END	
			    dialogSpace 1
			   exclusiveGroupItem END     	
				  
			   exclusiveGroupItem modSurfConnect "By Connectivity"
			      entityChooser createSurfTrmSurfPick3 "Faceted Surface" crvSurfTrmSurfList SURF ANY
   	     		    checkItem modSurfOldSurfChk1 "Keep original" modSurfKeepOldFlag NULL
			   exclusiveGroupItem END

			   exclusiveGroupItem modifEGAngle "By Angle"
			      entityChooser createSurfTrmSurfPick4 "Faceted Surface" crvSurfTrmSurfList SURF ANY
			        textEntry modSurfAngle "Angle" seg_angle NUM
			        textEntry modSurfMinSeg "Minimum number of segments" minSeg NUM
			      checkItem modSurfOldSurfChk "Keep original" modSurfKeepOldFlag NULL
			   exclusiveGroupItem END
		  
		    exclusiveGroup END
    	
    	exclusiveGroupItem END #7
	    	
	    	
    exclusiveGroupItem modifyMergeSurf "Merge/Reapproximate Surfaces (key = Ctrl-a)" G_MergeSurf$icon_size2.gif
        exclusiveGroup modifyReapproxSurf "Merge/Reapproximate Surfaces" "Method" 4 DROPDOWN
            exclusiveGroupItem mergeSurf "Merge surfaces"
		        entityChooser modifySurfMergeSurf "Surfaces" modSurfMergeList SURF ANY
            exclusiveGroupItem END
            
            exclusiveGroupItem reappSelSurf "Reapproximate selected surface(s)"
                entityChooser reapproxSelSurf "Surfaces" reappSurfList SURF ANY
                textEntry reappSelSurfTol "Tolerance" mtol1 NUM
            exclusiveGroupItem END

            exclusiveGroupItem reappSelSurfCurve "Reappr. sel. surface(s) bounded by curve(s)"
                entityChooser reapproxSelSurf1 "Surfaces" reappSurf1List SURF ANY
                entityChooser reapproxSelCur1 "Curves" reappCur1List CURVE ANY
                textEntry reappSelSurfCurveTol "Tolerance" mtol2 NUM
            exclusiveGroupItem END

            exclusiveGroupItem reappSelSurfHull "Reappr. sel. surface(s) bounded by hull"
                entityChooser reapproxSelSurf2 "Surfaces" reappSurf2List SURF ANY
                textEntry reappSelSurfHullTol "Tolerance" mtol4 NUM
ifdef QUAD_DEBUG
                integerEntry reappEachSurfDebug "Debug level" debug 0 10 1
endif
                checkItem reappSelSurfFacetedCk3 "Faceted only" facetedonlyFlag3 NULL
            exclusiveGroupItem END

            exclusiveGroupItem reappEachSurf "Reapproximate each surface"
				dropDownEntry reappEachSurfMode "How" how_modes1 mode1 FALSE
                entityChooser reapproxEachSurf "Surfaces" reappEachSurfList SURF ANY
                textEntry reappEachSurfTol "Tolerance" mtol3 NUM
                checkItem reappSelSurfFacetedCk4 "Faceted only" facetedonlyFlag4 NULL
            exclusiveGroupItem END

        exclusiveGroup END
	exclusiveGroupItem END #8

#-----------------Untrim Surface-----------------------------------------
	exclusiveGroupItem repairSurfaceUntrim "Untrim Surface" G_UnTrimSurf$icon_size2.gif
 		frame  repairSurfaceFrameUntrimSurf "Untrim Surface" 
      		    entityChooser repairSurfacePickTrimmed "Surfaces" TrimSurfs  SURF ANY
     		frame END
#		greyGroup repairCurvePickTrimmedGG	"Just selected boundaries"
#		    greyGroupItem repairCurvePickTrimmed "Selected curves"
#			entityChooser repairCurvesPickTrimmed "Curve(s)" TrimCurves CURVE ANY
#		    greyGroupItem END
#		greyGroup END

	exclusiveGroupItem END #9

    	exclusiveGroupItem createSurfCurtain "Curtain Surface (key = Ctrl-e)" G_CurtainSurf$icon_size2.gif
			frame createSurfCurtFR "Create Curtain Surface"
				entityChooser CurtSurfCurvPick "Curves" CurtSurfCurvList  CURVE ANY
	      			entityChooser createCurtSurfSurfPick "Surfaces" CurtSurfSurfList  SURF ANY
				checkItem createCurtSurfTrim "Trim surfaces" prTrFlag NULL
	      		frame END
    	exclusiveGroupItem END #10

#---------------EXTEND SURFACE---------------------------------------------------
         exclusiveGroupItem createExtSurfEdge "Extend Surface" G_ExtendEdge$icon_size2.gif
            exclusiveGroup createSurfExtMethod "Extend Surface" "Method" 3 DROPDOWN
                exclusiveGroupItem createSurfaceExtendSurf "Extend Curve to Surface(s)"
                    entityChooser createSurfacePickExtendC "Curve" ExtendCurve CURVE ANY
                    entityChooser createSurfacePickExtendS "Surfaces" ExtendSurf SURF ANY
                    dropDownEntry createSurfaceExtendMethod "Method" extendlist extend_method FALSE
                    checkItem createSurfaceConnect "Trim surfaces" connect NULL
# Duplication, USE Repaire or Settings textEntry createSurfaceExtendTopoTol "Tolerance" ::geo_cad(toler) NUM
                exclusiveGroupItem END
                exclusiveGroupItem createExtSurfacEdge "Extend Surface at Edge" 
                    entityChooser ExtSrfAtEdgeSrfPick "Surface" ExtSrfAtEdgeSrf SURF 1
                    entityChooser ExtSrfAtEdgeCurveEntry "Curve" ExtSrfAtEdgeEdgenum CURVE 1
                    textEntry ExtSrfAtEdgeDist "Extension" ExtSrfAtEdgeDistance NUM
                    checkItem ExtSrfAtEdgeAbsolute "Absolute distance" absolute NULL
                    checkItem ExtSrfAtEdgeConnect "Trim surface" connect NULL
                exclusiveGroupItem END
                exclusiveGroupItem createSurfaceExtendSheetM "Close gaps between midsurfaced parts" 
		entityChooser createSurfacePickExtendP "Parts" midparts PART ANY
		textEntry createSurfaceExtendProx "Dist." proximity NUM
        dropDownEntry MPartsMethod "Method" extendlist extend_method FALSE
        frame junkFrame "Evaluate/Modify Extensions"
			textButton ExtSrfEvaluate "Preview Vectors" ExtSrfEvaluateProc
		entityChooser ExtSrfImageP "Exclude" ext_image POINTORXYZ 1 "image.arrow no_confirm" "extension vector"
		entityChooser ExtSingleCrv "Include" ext_single POINTORXYZ 1 "tag.curve.single no_confirm"
		radioGroup  ImsizeRGP "Extension Arrow Size" 2 imagesize 0 imagesizeProc
		radioItem Imsize1 "Normal" 0
		radioItem Imsize2 "Uniform" 1		 
		radioGroup END
		frame END

# Because of the function complexity, user always must evaluate result.
# It will be evaluated on "Apply" (with nearest, if user did not define)

#		entityChooser ExtSrfImageP "Delete" ext_image POINTORXYZ 1 "image.arrow no_confirm" 

		checkItem createSurfaceConnect2 "Trim surfaces" connect NULL
# Duplication, USE Repaire or Settings	textEntry createSurfaceExtendTopoTol2 "Tolerance" ::geo_cad(toler) NUM 
                exclusiveGroupItem END
            exclusiveGroup END
         exclusiveGroupItem END #11

#-------
	
	exclusiveGroupItem createSurfHull "Geometry Simplification" G_ConvexHull$icon_size2.gif
	   exclusiveGroup shrinkWrapEG "Geometry Simplification" "Method" 2 DROPDOWN

		exclusiveGroupItem cart3DShrinkwrap "Cartesian Shrinkwrap"
		    frame cart3DShrinkwrapFR "Cartesian Shrink Wrap"
			textEntry  c3dshrinkSize "Max. cell size" minFeatSize NUM
			integerEntry c3dshrinkSmooth "Num. of smooth iterations" nSmooth 1 10 1
			textEntry c3dshrinkProj "Surface projection factor" projFactor NUM
			dropDownEntry c3dshrinkPart "Part for envelope" c3dShrinkPartList c3dshrinkPart FALSE
			checkItem  c3dshrinkPBPCheck "Wrap part by part" partFlag NULL
			checkItem  c3dshrinkPBPVis "Active parts only" VisGeomFlag NULL
			checkItem  c3dshrinkPBPMakeGeom "Create Geometry" MakeGeomFlag NULL			
		    frame END
		exclusiveGroupItem END

		exclusiveGroupItem convexHull "Convex Hull"
		    dialogSpace 1	
		    exclusiveGroup convexHullMethodEXG "Convex Hull" "Method" 3 DROPDOWN
			exclusiveGroupItem createSingle "Single hull"
			    entityChooser convexHullSurfPick "Geometry" convexHullSurList GEOMETRY ANY
			    greyGroup convexCoarsenGG "Coarsen before creating hull"
				greyGroupItem convexcoarsen "Coarsen Surface First"
				    textEntry convexcoarsenTol "Tolerance" convexTol NUM
				greyGroupItem END
			    greyGroup END
			    checkItem  removeInteriorChk "Remove interior faces" convexRemInterFaceFlag NULL
			    checkItem makeSeparateChk "Hull for each part" convexHullSeparateFlag NULL	   	
			exclusiveGroupItem END
	   			
			exclusiveGroupItem createInteractive "Interactive splits"
    			    entityChooser convexHullSurfPick2 "Geometry" convexHullSurList GEOMETRY ANY		
			    greyGroup convexCoarsenGG2	"Coarsen before creating hull"
				greyGroupItem convexcoarsen2 "Coarsen surface first"
				    textEntry convexcoarsenTol2 "Tolerance" convexTol NUM
				greyGroupItem END
			    greyGroup END
			    checkItem  removeInteriorChk2 "Remove interior faces" convexRemInterFaceFlag NULL
			    checkItem makeSeparateChk2 "Hull for each part" convexHullSeparateFlag NULL
			exclusiveGroupItem END
			   	
			exclusiveGroupItem createRegularGrid "Uniform splits"
       			    entityChooser convexHullSurfPick3 "Geometry" convexHullSurList GEOMETRY ANY		
			    greyGroup splitMethodGG "Split Method"
				greyGroupItem splitModel "Model"
				greyGroupItem END
					
				greyGroupItem splitonScreen "Screen"
				greyGroupItem END
				
				integerEntry convexHullsplitXdir "X divisions" splitXDiv 0 10000 1
				integerEntry convexHullsplitYdir "Y divisions" splitYDiv 0 10000 1
				integerEntry convexHullsplitZdir "Z divisions" splitZDiv 0 10000 1
			    greyGroup END
			    greyGroup convexCoarsenGG3	"Coarsen before creating hull"
				greyGroupItem convexcoarsen3 "Coarsen surface first"
				    textEntry convexcoarsenTol3 "Tolerance" convexTol NUM
				greyGroupItem END
			    greyGroup END
			    checkItem  removeInteriorChk3 "Remove interior faces" convexRemInterFaceFlag NULL
			    checkItem makeSeparateChk3 "Hull for each part" convexHullSeparateFlag NULL
			exclusiveGroupItem  END
		    exclusiveGroup END
	    	exclusiveGroupItem  END
	exclusiveGroup END
    exclusiveGroupItem END #12
   
    exclusiveGroupItem createSurStdShape "Standard Shapes" G_Primatives$icon_size2.gif
		exclusiveGroup createStdShapeEG "Create Std Geometry" " " 4 ICON
#Box start
			exclusiveGroupItem creBox "Box" G_Prim_Cube$icon_size2.gif
				exclusiveGroup stdBoxTypeEG "Box Dimensions" " " 2 RADIO
					exclusiveGroupItem StdBoxSpecify "Specify"
						textEntry  StdBoxSides_0 "X Y Z size" StdBoxSides NUM 
						entityChooser boxAxesPPick "Box Origin" boxAxPntList  POINTORXYZ 1
					exclusiveGroupItem END
					exclusiveGroupItem StdBoxBounds "Entity bounds"
						entityChooser boxBoundsPick "Entities" boxEntityList GEOMETRY ANY
						frame boxScaleLabel "Scale" 
							textEntry scaleBoxX "X factor" xF NUM 
							textEntry scaleBoxY "Y factor" yF NUM 
							textEntry scaleBoxZ "Z factor" zF NUM 
						frame END
						exclusiveGroup stdBoxAdjustBounds "Adjust min/max values" " " 2 CHECK
						    exclusiveGroupItem AdjBox1 "Specify"
							textEntry BBoxminX "X min" Xmin NUM 
							textEntry BBoxmaxX "X max" Xmax NUM 
							textEntry BBoxminY "Y min" Ymin NUM 
							textEntry BBoxmaxY "Y max" Ymax NUM 
							textEntry BBoxminZ "Z min" Zmin NUM 
							textEntry BBoxmaxZ "Z max" Zmax NUM 
						    exclusiveGroupItem END
						exclusiveGroup END
					exclusiveGroupItem END
				exclusiveGroup END
	                    exclusiveGroupItem END
#Box end
#Sphere start
	exclusiveGroupItem createStdSph "Sphere or spherical segment from Center and Pole points" G_Prim_Sphere$icon_size2.gif
	    frame createRadStdSph "Center and Point" 
		greyGroup RadStdSphGG "Radius"
			greyGroupItem RadStdSphGGtext " "
         	textEntry RadStdSphVal " " radiusSph NUM 
			greyGroupItem END							
		greyGroup END
		textEntry createRadStdSphStA "Start angle" stangleSph NUM
		textEntry createRadStdSphEnA "End angle" enangleSph NUM
		entityChooser createRadStdSphWdgt "Locations" StdSphereList POINTORXYZ 2 no_confirm
      	    frame END		
	                    exclusiveGroupItem END
# Sphere end
# Cylinder start	        
	                     exclusiveGroupItem creCyl "Cylinder" G_Prim_Cylinder$icon_size2.gif
				textEntry cylindRad1 "Radius1" CylindRad1 NUM 
				textEntry cylindRad2 "Radius2" CylindRad2 NUM 
				checkItem cylindBase1 "Base1" CylindBase1Flag NULL
				checkItem cylindBase2 "Base2" CylindBase2Flag NULL	                    
				entityChooser cylAxisPPick "Two axis Points" cylAxPntList  POINTORXYZ 2
	                     exclusiveGroupItem END
# Cylinder end			
			exclusiveGroupItem createStdHole "Drill a Hole" G_Prim_DrillHole$icon_size2.gif
				entityChooser StdHoleSurfChr "Surface" StdHoleSurfList SURF 1
			greyGroup ReplaceHoleGG "Remove Hole"
				greyGroupItem ReplaceHoleSwitch " "
				entityChooser StdHoleCrvChr "Curves" StdHoleCrvList CURVE ANY
				greyGroupItem END							
			greyGroup END
			
				textEntry     StdHoleRadEnt "Radius" StdHoleRad NUM
				entityChooser StdHoleLocChr "Location" StdHoleLocList POINTORXYZ 1 "xyz surface_selected StdHoleSurfList"           
			exclusiveGroupItem END
#			exclusiveGroupItem createStdBolt "Drill a Bolt" G_Prim_DrillBoltHole$icon_size2.gif
#				entityChooser StdBoltSurfChr "Surfaces" StdBoltSurfList SURF 2
#				entityChooser StdBoltCrv1Chr "Curves-1" StdBoltCrv1List CURVE ANY
#				entityChooser StdBoltCrv2Chr "Curves-2" StdBoltCrv2List CURVE ANY
#				textEntry     StdBoltRadEnt "Radius" StdBoltRad NUM
#				entityChooser StdBoltLocChr "Location" StdBoltLocList POINTORXYZ 1 "xyz surface_selected StdBoltSurfList"           
#			exclusiveGroupItem END
			exclusiveGroupItem createPlane_P "Plane normal to curve" G_Prim_PlaneNormal$icon_size2.gif
				textEntry  StdPlaneSide_0 "Side" StdPlaneSide NUM 
		    		entityChooser StdPlanePick "Curve" TrimPlaneCurveList POINTORXYZ 1 "curve show_plane xyz update_var {param StdPlaneCurveParam}"
				textEntry  StdPlaneCrvParam "Parameter" StdPlaneCurveParam NUM   
	                    exclusiveGroupItem END
			exclusiveGroupItem createPlane_C "Disc normal to curve" G_Prim_DiscNormal$icon_size2.gif
				textEntry  StdPlaneRadius_0 "Radius" StdPlaneRadius NUM 
		    		entityChooser StdDiscPick "Curve" TrimPlaneCurveList POINTORXYZ 1 "curve show_plane xyz update_var {param StdPlaneCurveParam}"			 
				textEntry  StdPlaneDiscParam "Parameter" StdPlaneCurveParam NUM 	            
	                    exclusiveGroupItem END
			exclusiveGroupItem createTrimPlane_C "Trim normal to curve" G_Prim_TrimNormal$icon_size2.gif
				entityChooser TrimPlaneSurf "Surfaces" TrimPlaneSurfList SURF ANY
				entityChooser TrimPlaneCurve "Curve" TrimPlaneCurveList POINTORXYZ 1 "curve show_plane xyz update_var {param StdPlaneCurveParam}"
				textEntry  StdTrimPlaneParam "Parameter" StdPlaneCurveParam NUM                
	                    exclusiveGroupItem END
	                exclusiveGroup END
      exclusiveGroupItem END #13
  #---------------------------------------------------------------------------------------------------
#VG (See Curves #9)
# exclusive item # 13 ends here    	
  exclusiveGroup END
 
dataEntryDialog END

#----------------------------------------------------------------------------------------------------
dataEntryDialog createBodyDEZ "Create Body"
    dropDownEntry createBodyFam "Part" PartList part_name FALSE
    textEntry createBodyName "Name" name TEXT
    exclusiveGroup createBodyEXG NULL "Method" 2 ICON
	exclusiveGroupItem createBodyMatPnt "Material Point" G_MatPt$icon_size2.gif
  	        exclusiveGroup createBodyMatptGG "Material Point" "Location" 1 RADIO
			exclusiveGroupItem createBodyMatpt2  "Centroid of 2 points"
	         		entityChooser matptPick2 "2 screen locations" pointList2  POINTORXYZ 2
			exclusiveGroupItem END
			exclusiveGroupItem createBodyMatpt1  "At specified point"
	        		entityChooser matptPick "Point" pointList  POINTORXYZ 1
			exclusiveGroupItem END
		exclusiveGroup END
	exclusiveGroupItem END #0

	exclusiveGroupItem createBodyTopo "By Topology" G_Body$icon_size2.gif
  	        exclusiveGroup createBodyTopoGG "By Topology" "Method" 1 RADIO
			exclusiveGroupItem createBodyTopoEntire "Entire model"
ifdef AI_ENV_BETA
			    checkItem createBodyAssembly "Create assembly" createAssemblyFlag NULL			    
endif
			exclusiveGroupItem END
			exclusiveGroupItem createBodyTopoSel "Selected surfaces"
		         entityChooser createBodyPick "Surfaces" surfList SURF ANY
			exclusiveGroupItem END
		exclusiveGroup END
	exclusiveGroupItem END #1
	
  exclusiveGroup END

dataEntryDialog END

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

dataEntryDialog createFacetedDEZ "Create/Modify Faceted" 

dropDownEntry createFacetedFam "Part" PartList ::geo_part_name FALSE
textEntry createFacetedName "Name" name TEXT
checkItem InheritFac "Inherit Part" ::vid_options(inherit)  aie_pop_inherit

#
exclusiveGroup Faceted_0_EXG GROOVERELIEF "Method" 5 ICON
#
# Generic Faceted functionality 
#
#
# Curves
#

	exclusiveGroupItem modFaceCrv "Create/Edit Faceted Curves" G_CreateEditFacetedCurve$icon_size2.gif
		exclusiveGroup f_1_EXG "Curves..." "Method" 5 ICON
			exclusiveGroupItem modFaceCrv_00 "Convert from bspline" G_CnvCrvtoFac$icon_size2.gif
				entityChooser modFaceCrvPick_00 "Curves" Nurb2FacetList CURVE ANY
  				checkItem deletOriginalCrvCk "Keep original" keepOriginCurvFlag NULL
  		   exclusiveGroupItem END
			exclusiveGroupItem modFaceCrv_01 "Create Curve" G_CreateFacCurve$icon_size2.gif
				    entityChooser modFaceCrvPick_P0 "Point" FacePtsList POINTORXYZ ANY do
			exclusiveGroupItem END

			exclusiveGroupItem modFaceCrv_02 "Move nodes" G_MoveVert$icon_size2.gif
				exclusiveGroup modFaceMoveNodeEG "Move Nodes" " " 1 DROPDOWN
					exclusiveGroupItem modFaceMoveNode_0 "Screen"
					exclusiveGroupItem END
					exclusiveGroupItem modFaceMoveNode_1 "Location"
         				entityChooser moveNode_CrvWdgt "Location" pickMoveNodeLoc POINTORXYZ 1 xyz
					exclusiveGroupItem END
					
					exclusiveGroupItem modFaceMoveNode_2 "Plane"
					exclusiveGroup modFaceCrvNormEG "Plane Options" "Normal to" 4 DROPDOWN		           
		           		exclusiveGroupItem modFaceCrvOptX "X"
						exclusiveGroupItem END
		           		exclusiveGroupItem modFaceCrvOptY "Y"
		           		exclusiveGroupItem END           	
		           		exclusiveGroupItem modFaceCrvOptZ "Z"
		           		exclusiveGroupItem END        	
		           		exclusiveGroupItem modFaceCrvOptV "Vector"
		           			entityChooser modFaceCrv2PPick "Vector" modFaceVector  POINTORXYZ 2
		           		exclusiveGroupItem END
					exclusiveGroup END	
					exclusiveGroupItem END

					exclusiveGroupItem modFaceMoveNode_3 "Surface"
						entityChooser  modFaceCrvOnSrf "Constraint" modConstSrf  SURF 1
					exclusiveGroupItem END
					exclusiveGroupItem modFaceMoveNode_4 "Line"
         				entityChooser moveNode_CrvLineWdgt "Points" pickMoveNodeLoc POINTORXYZ 2 xyz
					exclusiveGroupItem END
					exclusiveGroupItem modFaceMoveNode_5 "Offset X Y Z"
					textEntry modFaceCrvNodesOffset "Offset" moveNodesIncr NUM
					exclusiveGroupItem END
				exclusiveGroup END
			exclusiveGroupItem END
			exclusiveGroupItem modFaceCrv_03 "Merge nodes" G_MergeNodes$icon_size2.gif
			exclusiveGroupItem END
			exclusiveGroupItem modFaceCrv_04 "Create segment" G_CreateSeg$icon_size2.gif
			exclusiveGroupItem END
			exclusiveGroupItem modFaceCrv_05 "Delete segment" G_DeleteSeg$icon_size2.gif
			exclusiveGroupItem END
			exclusiveGroupItem modFaceCrv_06 "Split segment" G_SplitSeg$icon_size2.gif
			exclusiveGroupItem END
			exclusiveGroupItem modFaceCrv_07 "Restrict segments" G_RestrictSeg$icon_size2.gif
			exclusiveGroupItem END
			exclusiveGroupItem modFaceCrv_08 "Move to new curve" G_MoveSeg2New$icon_size2.gif
			exclusiveGroupItem END
			exclusiveGroupItem modFaceCrv_09 "Move to existing curve" G_MoveSeg2Exist$icon_size2.gif
			exclusiveGroupItem END

		exclusiveGroup END

 exclusiveGroupItem END
 
#
# Surfaces
#
#
	exclusiveGroupItem modFaceSrf "Create/Edit Faceted Surfaces (key = f)" G_CreateEditFacets$icon_size2.gif
		exclusiveGroup modifyFacetSurfEXG "Surfaces..." "Method" 5 ICON

		exclusiveGroupItem modFaceSrf_00 "Convert from bspline" G_CnvSurftoFac$icon_size2.gif
				entityChooser modFaceSrfPick_S0 "Surfaces" Nurb2FacetList SURF ANY
				checkItem deletOriginalCk "Keep original" keepOriginSurfFlag NULL
		exclusiveGroupItem END
		exclusiveGroupItem modFaceSrf_01 "Coarsen Surface" G_CoarsenSurf$icon_size2.gif
			textEntry  modCoarsenTol "Tolerance" coarsentol NUM 
		exclusiveGroupItem END
		exclusiveGroupItem modFaceSrf_02 "Create new surface" G_CreateFacSurf$icon_size2.gif
			    exclusiveGroup modifyFacetSrfEGM "Method" " " 5 DROPDOWN
				exclusiveGroupItem modFaceSrf_M1 "From edges"
#				    entityChooser modFaceCrvPick_P1 "Single edges" FacePtsList SINGLE_EDGE ANY do
				    checkItem modFaceCrvAI "Allow internal edge selection" internalFlag NULL
				    checkItem modFaceCrvCF "Complete edges" completeFlag NULL
				exclusiveGroupItem END
				exclusiveGroupItem modFaceSrf_M2 "From points"
				    entityChooser modFaceSrfPick_P0 "Points" FacePtsList POINT ANY
				exclusiveGroupItem END
				exclusiveGroupItem modFaceSrf_M3 "From locations"
					entityChooser modFaceSrfPick_P2 "Locations" FacePtsList POINTORXYZ ANY
				exclusiveGroupItem END
			    exclusiveGroup END
		exclusiveGroupItem END		
		exclusiveGroupItem modFaceSrf_03 "Merge edges" G_MergeEdge$icon_size2.gif
#			entityChooser modFaceCrvPick_P1 "Single edges" FacePtsList SINGLE_EDGE ANY do
			checkItem modFaceCrvAI2 "Allow internal edge selection" internalFlag NULL
			textEntry modFaceCrvMITOL "Merge tolerance" mtol NUM
			checkItem modFaceCrvMI "Merge ends" mergeFlag NULL
		exclusiveGroupItem END	
		exclusiveGroupItem modFaceSrf_04 "Split Edge" G_SplitEdge$icon_size2.gif
		exclusiveGroupItem END
		exclusiveGroupItem modFaceSrf_05 "Swap Edge" G_SwapEdge$icon_size2.gif
		exclusiveGroupItem END
		exclusiveGroupItem modFaceSrf_06 "Move nodes" G_MvNode$icon_size2.gif
				exclusiveGroup modFaceSrfNodeEG "Move nodes" " " 5 DROPDOWN
					exclusiveGroupItem modFaceSrfNode_0 "Screen"
					exclusiveGroupItem END
					exclusiveGroupItem modFaceSrfNode_1 "Location"
         		entityChooser moveNode_SrfWdgt "Location" pickMoveNodeLoc POINTORXYZ 1 xyz
 					exclusiveGroupItem END
					exclusiveGroupItem modFaceSrfNode_2 "Plane"

		    exclusiveGroup modFaceSrfNormEG "Plane Options" "Normal to" 4 DROPDOWN		           
		           	exclusiveGroupItem modFaceSrfOptX "X"
					exclusiveGroupItem END
		           	exclusiveGroupItem modFaceSrfOptY "Y"
		           	exclusiveGroupItem END           	
		           	exclusiveGroupItem modFaceSrfOptZ "Z"
		           	exclusiveGroupItem END        	
		           	exclusiveGroupItem modFaceSrfOptV "Vector"
		           		entityChooser modFaceSrf2PPick "Vector" modFaceVector  POINTORXYZ 2
		           	exclusiveGroupItem END
		    exclusiveGroup END
				
					exclusiveGroupItem END
					exclusiveGroupItem modFaceSrfNode_4 "Line"
         		entityChooser moveNode_SrfLineWdgt "Points" pickMoveNodeLoc POINTORXYZ 2 xyz
					exclusiveGroupItem END
					exclusiveGroupItem modFaceSrfNode_5 "Offset X Y Z"
						textEntry modFaceSrfNodesOffset "Offset" moveNodesIncr NUM
					exclusiveGroupItem END
				exclusiveGroup END
		exclusiveGroupItem END
		exclusiveGroupItem modFaceSrf_07 "Merge nodes" G_MergeNode$icon_size2.gif
  	         exclusiveGroup modFaceSrfMNodesGG " " "Method" 1 RADIO
				exclusiveGroupItem modFaceSrfMNodes0 "Screen"
		exclusiveGroupItem END
				exclusiveGroupItem modFaceSrfMNodes1 "Tolerance"
					textEntry  modFaceSrfMNodesTol "Tolerance" mnodestol NUM 
		exclusiveGroupItem END
			exclusiveGroup END
		exclusiveGroupItem END
		exclusiveGroupItem modFaceSrf_08 "Create triangles" G_CreateTri$icon_size2.gif
		exclusiveGroupItem END
		exclusiveGroupItem modFaceSrf_09 "Delete triangles" G_DeleteTri$icon_size2.gif
  	         exclusiveGroup modFaceSrfDelGG "Delete triangles" " " 1 RADIO
				exclusiveGroupItem modFaceSrfDel0 "Delete selection"
		exclusiveGroupItem END
				exclusiveGroupItem modFaceSrfDel1 "Keep selection" dummy13.gif
				exclusiveGroupItem END
			exclusiveGroup END
		exclusiveGroupItem END
		exclusiveGroupItem modFaceSrf_10 "Split triangles" G_SplitTri$icon_size2.gif
		exclusiveGroupItem END
		exclusiveGroupItem modFaceSrf_11 "Delete non-selected triangles" G_RestrictTri$icon_size2.gif
		exclusiveGroupItem END
		exclusiveGroupItem modFaceSrf_12 "Move to new surface (key = Ctrl-f)" G_MvToNewSurf$icon_size2.gif
		exclusiveGroupItem END
		exclusiveGroupItem modFaceSrf_13 "Move to existing surface" G_MvToExistSurf$icon_size2.gif
		exclusiveGroupItem END
		exclusiveGroupItem modFaceSrf_14 "Merge surfaces" G_MergeFacSurf$icon_size2.gif
		exclusiveGroupItem END
	    exclusiveGroup END
	exclusiveGroupItem END

# end of Surface


	exclusiveGroupItem modFaceCln "Faceted Cleanup" G_Faceted_Cleanup$icon_size2.gif
		exclusiveGroup modifyFacetCleanEXG "Cleanup" "Method" 5 ICON
			exclusiveGroupItem modfacCln_00 "Align Edge to Curve" G_FacetedEdge2Curve$icon_size2.gif
			   exclusiveGroup modifyFacetCleanAM "Align Method" "Method" 3 DROPDOWN
				exclusiveGroupItem MFAlToCurve "Align To Curve" G_AlignEdgeCrv.gif
#				    entityChooser AlignCrv0 "Curve" al_curve CURVE 1
#				    entityChooser AlignSrf0 "Surface" al_surf SURF 1
				exclusiveGroupItem END #0  
				exclusiveGroupItem MFProjNode "Project Node To Curve" G_ProjNode.gif
#				    entityChooser AlignCrv1 "Curve" al_curve CURVE 1
#				    entityChooser AlignSrf1 "Surface" al_surf SURF 1
				exclusiveGroupItem END #1  
				exclusiveGroupItem MFSmEdge "Smooth Edges" G_SmoothFacEdge.gif
				    textEntry FESmoothTol "Smooth Tol" smooth_tol NUM 
				exclusiveGroupItem END #2  
			    exclusiveGroup END	
			exclusiveGroupItem END	
			exclusiveGroupItem modfacCln_01 "Close Faceted Holes" G_CloseFacetedHole$icon_size2.gif
			exclusiveGroupItem END	
			exclusiveGroupItem modfacCln_02 "Trim by Screen" G_TrimFacByScreen$icon_size2.gif
# DB
                              entityChooser FacCleTrimScrPick "Screen Locations" pickList POINTORXYZ ANY "do vis_plane" "Screen locations"
 
 
                              radioGroup FacCleTrimScrRg1 "Curve Shape" 3 ::va_set(create_smooth_curveFlag) 0 aie_mp12_create_temporary_curve
                                  radioItem FacCleTrim.0 "Lines" 0
                                  radioItem FacCleTrim.1 "Smooth" 1
                                  radioItem FacCleTrim.2 "Arc" 2                 
                              radioGroup END
                              
			checkItem     FacCleTrimScrChk2 "Closed curve" ::va_set(create_closed_curveFlag) aie_mp12_create_temporary_curve
	    
			exclusiveGroupItem END	
			exclusiveGroupItem modfacCln_03 "Trim by Surface Selection" G_TrimFacSurf$icon_size2.gif	
			exclusiveGroupItem END

		exclusiveGroupItem modfacMP_04 "Repair Surface" G_RepairFacGeom$icon_size2.gif
		          entityChooser FacCleRepPick "Surf Locations" repairPickList POINTORXYZ ANY "do xyz tag.surface.locations" 
                              radioGroup FacCleMP_04Rg1 "Curve Shape" 3 ::va_set(create_smooth_curveFlag) 0 aie_mp12_create_temporary_curve
                                  radioItem FacCleMP_04.0 "Lines" 0
                                  radioItem FacCleMP_04.1 "Smooth" 1
                                  radioItem FacCleMP_04.2 "Circle" 2                 
                              radioGroup END
                              checkItem     FacCleMP_04.Chk1 "Keep original" FacCleMP_04_KeepFlag NULL
		
		exclusiveGroupItem END			
 		exclusiveGroupItem modfacMP_05 "Create character curve" G_Character$icon_size2.gif
 		  frame  FacChCrvCrvFrm "Curve"
 		  entityChooser FacChCrv1Pick "PreCurve" pickChCrv1 POINTORXYZ ANY "do xyz tag.surface.locations"
 	            entityChooser FacChCrv2Pick "PreSides" pickChCrv2 POINTORXYZ 2 "do xyz tag.surface.locations"  	 
 		  radioGroup FacChCrvRg1 "Curves Shape" 3 ::va_set(create_smooth_curveFlag) 0 aie_mp12_create_temporary_curve
                         radioItem FacChCrv.0 "Lines" 0
                         radioItem FacChCrv.1 "Smooth" 1
                         radioItem FacChCrv.2 "Arc" 2                 
                      radioGroup END
# Check do we need closed curves?
#		  checkItem     FacChCrvClosed "Closed curve" ::va_set(create_closed_curveFlag) aie_mp12_create_temporary_curve
		  frame END
		  frame  FacChCrvSrfFrm "Surface"
        
		  textButton FacChCrvSrfShow "Show PreSurface" aie_mp12_show_presurface
# Check do we need Radius?  textEntry FacChCrvSrfRad "Radius" ChCrvSrfRad NUM 
		 frame END
		 
#This should take a set of points rather than a curve, but the curve is easier for now.
#			    entityChooser TrackingPointList "Points" pointpickList POINTORXYZ ANY do
#v12			    entityChooser TrackingPointList "Reference curve" ref_curve CURVE 1
#v12			    entityChooser TrackingSurfList "Reference surface" ref_surf SURF 1
#v12			    integerEntry TrackingPointNum "Num points" n_slice 2 50 1
#v12			    textEntry TrackingPointWidth "Width" width NUM 
#			    checkItem TrackingPointFillet "Fillet" FilletFlag NULL
#			    checkItem TrackingPointSpline "Spline approximation" SplineFlag NULL
#			    textEntry TrackingPointTol "Tolerance" tolerance NUM 
#v12			    textButton TrackingPointPreview "Preview character curve" aie_preview_cr_corner_curve 
#v12			    checkItem TrimExistSurf "Trim surface" TrimFlag NULL
#			    checkItem RemExistSurf "Remove surface" RemFlag NULL
#			    checkItem ProjEdgeSurf "Project edges" ProjEdgeFlag NULL
 			exclusiveGroupItem END
		exclusiveGroup END
	exclusiveGroupItem END

	
exclusiveGroup END
dataEntryDialog END



#---------------------------------------------------------------------------------------------------
ifndef AI_ENV_LSTC
dataEntryDialog repairGeomDEZ "Repair Geometry" 
dropDownEntry repairGeomFam "Part" PartList ::geo_part_name FALSE
checkItem InheritRepair "Inherit Part" ::vid_options(inherit)  aie_pop_inherit 

exclusiveGroup repairSurfaceEG NULL "Method" 4 ICON
endif
ifdef AI_ENV_LSTC
dataEntryDialog repairGeomDEZ "Modify Geometry" 
exclusiveGroup repairSurfaceEG "Extract Curves" "Method" 4 ICON
endif
	exclusiveGroupItem repairGeoTopo "Build Diagnostic Topology (key = b)" G_CreateTopo$icon_size2.gif
		frame createBuildTopoParam "Build Topology"
		    textEntry createBuildTopoTol "Tolerance" ::geo_cad(toler) NUM 
		    frame createBTAngle "Filter by angle" 
			textEntry createBuilTopoAng "Feature angle" topoang NUM 
 			checkItem BuildtopoFiltPntsChk "Filter points" FilterPntsFlag NULL
			checkItem BuildtopoFiltCrvsChk "Filter curves" FilterCrvsFlag NULL
		    frame END
		    dialogSpace 1
		    exclusiveGroup BuildTopoM "Build Topo Parts/Selection" "Method" 1 DROPDOWN build_topo_what
		        exclusiveGroupItem BuildTopoMALL "All parts"
			    checkItem BuildtopoPerFamChk "Part by part" PerFamFlag NULL
		        exclusiveGroupItem END
		        exclusiveGroupItem BuildTopoMVP "Only visible parts"
			    checkItem BuildtopoPerFamChk2 "Part by part" PerFamFlag NULL
		        exclusiveGroupItem END
		        exclusiveGroupItem BuildTopoMVS "Selection"
			    entityChooser BuildTopoMPick "Entities" entityList GEOMETRY ANY allow_long_list
		        exclusiveGroupItem END
		    exclusiveGroup END
		    greyGroup BuildtopoOnlySingle "Single curve cleanup" 
			greyGroupItem BuildtopoOnlySinglefoo Foo
			    textEntry createBuildTopoTolS "Single Edge Tolerance" topotol_single NUM 
			greyGroupItem END
		    greyGroup END	
		    checkItem BuildtopoRegSrfsChk "Split surface at T-connections" RegSurfFlag NULL
		    checkItem BuildtopoInteriorCrvsChk "Split facets at interior curves" InteriorCrvsFlag NULL
#  		    checkItem BuildtopoActFamChk "Only active parts" ActFamFlag NULL
		    checkItem BuildtopoJoinEdgesChk "Join edge curves" JoinEdgesFlag NULL
    		    checkItem BuildtopoDelFamChk "Delete unattached curves and points" DelUnattFlag NULL
    		checkItem BuildtopoKeepDrmDrmChk "Keep dormant as dormant" KeepDrmDrmFlag NULL
   		checkItem BuildtopoLocalTolChk "Ignore Local Feature" UseLocalTolFlag NULL

		frame END	
	exclusiveGroupItem END #0
ifndef AI_ENV_LSTC
#----------
#--------------- Check Geometry ---------------------------------------------------
	exclusiveGroupItem checkGeoProblems "Check Geometry" G_CheckGeom$icon_size2.gif
		    exclusiveGroup BuildTopoPP "Surfaces Selection" "Method" 1 DROPDOWN which_parts
		        exclusiveGroupItem BuildTopoPPALL "All parts"
		        exclusiveGroupItem END
		        exclusiveGroupItem BuildTopoPPMVP "Only visible parts"
		        exclusiveGroupItem END
		        exclusiveGroupItem BuildTopoPPMSP "Selected parts"
			    entityChooser BuildTopoPPPMPick "Parts" partList PART ANY
		        exclusiveGroupItem END
		        exclusiveGroupItem BuildTopoPPMVS "Selection"
			    entityChooser BuildTopoPPMPick "Surfaces" surfList SURF ANY
		        exclusiveGroupItem END
		    exclusiveGroup END
    	  exclusiveGroup checkPlacementEG "Results Placement" " " 3 RADIO
	          	exclusiveGroupItem maxCurvat_0 Show 
	          	exclusiveGroupItem END
	          	exclusiveGroupItem maxCurvat_1 Part 
					entityChooser maxCurvat_1P "Part" check_in_part PART 1
	          	exclusiveGroupItem END	   		                                        
 	          	exclusiveGroupItem maxCurvat_2 Subset 
				textEntry curvatSubset "Subset name" check_in_subset TEXT
	          	exclusiveGroupItem END	          		                                        
          exclusiveGroup END
  			exclusiveGroup checkSurf " " "Check Surfaces" 1 RADIO
    	    	exclusiveGroupItem checkSurfEdges "Edges"
  		    checkItem checkGeoProblemsSingle "Single edges" single_curve_check NULL
  		    checkItem checkGeoProblemsMultiple "Multiple edges" multiple_curve_check NULL
				exclusiveGroupItem END 
#	
    	    	exclusiveGroupItem checkSurfAngleArea "Curvature/Area"				    
				greyGroup checkGeoProblemsLargeC "Curvature"
			greyGroupItem checkGeoProblemsLargeCC Foo
				 radioGroup CurvatRG "Curvature" 2 curvature_how 0 NULL
						radioItem CurvatRG.0 High 0
						radioItem CurvatRG.1 Low 1
			    textEntry checkGeoProblemsLargeCVal "Ref. Angle" ref_angle NUM 
					radioGroup END	
			greyGroupItem END
		    greyGroup END
		    greyGroup checkGeoProblemsSmallS "Area"
			greyGroupItem checkGeoProblemsSmallSS Foo
				 radioGroup SAreaRG "Area" 2 area_how 0 NULL
						radioItem SAreaRG.0 Large 0
						radioItem SAreaRG.1 Small 1
					radioGroup END	
			    textEntry checkGeoProblemsSmallSA "Ref. Area" ref_area NUM  
			greyGroupItem END
		    greyGroup END		     
		    greyGroup checkNormalS "Normal"
				greyGroupItem checkNormalSS Foo
					radioGroup SNormalRG "Normal" 3 normal_how 0 NULL
						radioItem SNormalRG.0 X 0
						radioItem SNormalRG.1 Y 1
						radioItem SNormalRG.2 Z 2
					radioGroup END	 
			    textEntry checkNormTol "Toler. angle" normal_srf_tol NUM 
				greyGroupItem END
		    greyGroup END					     
			exclusiveGroupItem END				 
#		    greyGroup checkGeoProblemsSliverS "Sliver surfaces"
#			greyGroupItem checkGeoProblemsSliverSS Foo
#			    textEntry checkGeoProblemsSliverSE "Min edge length" min_edge NUM 
#			greyGroupItem END
#		    greyGroup END
		    exclusiveGroup END					
 	exclusiveGroupItem END #1
#-------------

#--------------- Close Holes ---------------------------------------------------
	exclusiveGroupItem repairSurfClose "Close Holes" G_CloseHole$icon_size2.gif
		frame  repairSurfaceCloseHo "Close Holes" 		 
		entityChooser repairSurfCADClosePick "Curves" curveCloseSurfCADList  CURVE ANY      
	        	checkItem repairSurfCloseMultiChk "Multiple holes" repairSurfCloseMultiFlag NULL
	        	checkItem repairSurfCloseQuietChk "Quiet" repairSurfCloseQuietFlag NULL
  		frame END
 	exclusiveGroupItem END #2
#----------

#--------------- Remove Holes ---------------------------------------------------
	exclusiveGroupItem repairSurRemove "Remove Holes" G_RemoveHoles$icon_size2.gif
 		frame  repairSurfaceFrameremove "Remove Holes" 
  		    entityChooser repairSurfacePickRemove "Curves" curveRemoveList  CURVE ANY
   		frame END
 	exclusiveGroupItem END #3
#-------------
#---------------CLOSE/STICTH GAPS---------------------------------------------------
        exclusiveGroupItem repairSurMatch "Stitch/Match Edges (key = Shift-E)" G_StitchMatchSurfs$icon_size2.gif
                frame  repairSurStitch "Stitch/Match Edges"
                exclusiveGroup repairSurStichMethod "Method" " " 1 DROPDOWN
                     exclusiveGroupItem repairSurStichMethod0 "User Select"
                          textEntry reapirGapMaxDistance "Max gap distance" maxGapdist NUM 
                          checkItem repairGapSingleChk "Single curves only" repairGapYellowFlag NULL
                     exclusiveGroupItem END
                     exclusiveGroupItem repairSurStichMethod1 "Match"
                          checkItem repairSurMatchGapPartialChk "Partial" repairGapPartialFlag NULL
                     exclusiveGroupItem END
                     exclusiveGroupItem repairSurStichMethod2 "Extend/Trim"
                     exclusiveGroupItem END
                     exclusiveGroupItem repairSurStichMethod3 "Fill"
                          checkItem repairFillGapPartialChk "Partial" repairGapPartialFlag NULL
                     exclusiveGroupItem END
                     exclusiveGroupItem repairSurStichMethod4 "Blend"
                          checkItem repairBlendGapPartialChk "Partial" repairGapPartialFlag NULL
                     exclusiveGroupItem END
                 exclusiveGroup END
                 entityChooser repairSurfGap2Pick "Curves" curveCloseGapCADList  CURVE ANY

#set GapRepairOpts [list "User select" Match Retrim Fill Blend ]
    		frame END
	exclusiveGroupItem END #4
#---------

#-----------------Split Folded Surface-----------------------------------------
	exclusiveGroupItem repairSurfaceSplitFolded "Split Folded Surfaces" G_SplitFoldedSurf$icon_size2.gif
 		frame  repairSurfaceFrameSplitFold "Split Folded Surfaces" 
   			textEntry reapirFoldedSurfAng "Max angle" MaxCurvAng NUM
   			entityChooser repairSurfacePickFolded "Surfaces" FoldedSurf  SURF ANY
     		frame END
	exclusiveGroupItem END #5
#---------
   	exclusiveGroupItem surfsThicknessAdjust "Adjust varying thickness" G_SurfaceThickness$icon_size2.gif
	    exclusiveGroup createThicknessAdjMethod "Assign Thickness" "Method" 5 DROPDOWN
		exclusiveGroupItem createThicknessAdjMethod1 "From solid" 
			    entityChooser SurfThickPickMids "Midsurface(s)" midsurfaces  SURF ANY
			    entityChooser SurfThickPickSolid "Solid surface(s)" solidsurfaces  SURF ANY
			    textEntry MaxJump "Max thickness" max_thickness NUM
			    integerEntry SurfThicknessOrder "Order" thick_order 2 6 1
 		exclusiveGroupItem END

		exclusiveGroupItem createThicknessAdjMethod2 "Specify corners"
		    entityChooser SurfThickPick "Surface" surfaces  SURF ANY
		    exclusiveGroup createThickAdjOrder "Control Points" "Order" 3 DROPDOWN
			exclusiveGroupItem createThicknessOrder2x2 "2x2"
			    textEntry STC1 "Corner 1" C1 NUM   
			    textEntry STC2 "Corner 2" C2 NUM 
			    textEntry STC3 "Corner 3" C3 NUM 
			    textEntry STC4 "Corner 4" C4 NUM  
 			exclusiveGroupItem END
			exclusiveGroupItem createThicknessOrder3x3 "3x3"
			    textEntry STC1_2 "Corner 1" C1 NUM   
			    textEntry STCM12_2 "Middle 1-2" M12 NUM
			    textEntry STC2_2 "Corner 2" C2 NUM 
			    textEntry STCM13_2 "Middle 1-3" M13 NUM
			    textEntry STCM_2 "Middle" M NUM
			    textEntry STCM24_2 "Middle 2-4" M24 NUM
			    textEntry STC3_2 "Corner 3" C3 NUM 
			    textEntry STCM34_2 "Middle 3-4" M34 NUM
			    textEntry STC4_2 "Corner 4" C4 NUM  
 			exclusiveGroupItem END
			exclusiveGroupItem createThicknessOrder4x4 "4x4"
			    textEntry STC1_3 "Corner 1" C1 NUM   
			    textEntry STCM12_3 "Middle1 1-2" M1t2 NUM
			    textEntry STCM122_3 "Middle2 1-2" M1tt2 NUM
			    textEntry STC2_3 "Corner 2" C2 NUM 
			    textEntry STCM131_3 "Middle1 1-3" M1t3 NUM
			    textEntry STCM1_3 "Middle1" M1 NUM
			    textEntry STCM2_3 "Middle2" M2 NUM
			    textEntry STCM241_3 "Middle1 2-4" M2t4 NUM
			    textEntry STCM132_3 "Middle2 1-3" M1tt3 NUM
			    textEntry STCM3_3 "Middle3" M3 NUM
			    textEntry STCM4_3 "Middle4" M4 NUM
			    textEntry STCM242_3 "Middle2 2-4" M2tt4 NUM
			    textEntry STC3_3 "Corner 3" C3 NUM 
			    textEntry STCM341_3 "Middle1 3-4" M3t4 NUM
			    textEntry STCM342_3 "Middle2 3-4" M3tt4 NUM
			    textEntry STC4_3 "Corner 4" C4 NUM  
 			exclusiveGroupItem END
		     exclusiveGroup END
 		exclusiveGroupItem END
		exclusiveGroupItem createThicknessAdjMethod3 "Find surfaces without thickness assigned"
		    entityChooser SurfNoThickPick "Surface" surfaces  SURF ANY
		exclusiveGroupItem END
	     exclusiveGroup END		
    	exclusiveGroupItem END #6
#-----------------Modify Surface Normals-----------------------------------------
   	exclusiveGroupItem createSurfNormals "Modify Surface Normals" G_ModSurfNormals$icon_size2.gif
	  exclusiveGroup createSurfNormalsMethod "Modify" "Method" 5 DROPDOWN
		exclusiveGroupItem createSurfNormals0 "Make Consistent"
    		entityChooser surfNormalPick "Reference surface" surfNormalRef SURF 1
		checkItem repairSurfNormReverse "Reverse normals" reverseFlag NULL
 		exclusiveGroupItem END
		exclusiveGroupItem createSurfNormals1 "Reverse Normal"
    		entityChooser surfNormalPickAny "Surfaces" surfNormalRefAny SURF ANY	
 		exclusiveGroupItem END
	     exclusiveGroup END	
    	exclusiveGroupItem END #7

      exclusiveGroupItem featureBH "Feature Detect Bolt Holes" G_FeatureDetectHoles$icon_size2.gif
  	frame featureBH1 "Find/Assign Bolt Holes"
	    entityChooser BHCurvePick "Curves to check" bh_curves CURVE ANY
	    integerEntry BHNumRings "Num quad layers" num_rings 0 100 1
     	    textEntry BHRatRings "Ring offset ratio" ratio_rings NUM
    	    textEntry BHMinHole "Min diameter " smallest_hole NUM 
    	    textEntry BHMaxHole "Max diameter " largest_hole NUM 
	    checkItem ReCheck "Remove holes below min" removeHole NULL
	    checkItem SSBoltHole "Smart sizing" smartsizeFlag NULL
#	    checkItem BHConnec "Create spiderweb" spiderFlag NULL
#	    checkItem BHConnecWash "Washer" spiderwashFlag NULL
#	    dropDownEntry BHdefConnFam "Connector part name" group_list groupResultName FALSE
	frame END
      exclusiveGroupItem END #8

#      exclusiveGroupItem flange "Flanges" Flanges.gif
#  	frame flangeF1 "Find/Assign Flanges"
#	    entityChooser FSurfPick "Surfaces to check" surfs SURF ANY
#   	    textEntry FLMax "Max flange width" max_width NUM 
#   	    textEntry FLMin "Min flange width" min_width NUM 	   
#   	    textEntry FLMaxCurvature "Max curvature" max_curvature NUM
#	frame END
#      exclusiveGroupItem END #9

      exclusiveGroupItem Buttons "Feature Detect Buttons" G_FeatureDetectButtons$icon_size2.gif
  	frame button1 "Find/Assign Buttons"
	    entityChooser BSurfPick "Surfaces to check" butt_surfs SURF ANY
#	    checkItem ButtonDet1 "Free buttons" freeFlag NULL	    
	    checkItem ButtonDet2 "Fillet buttons" filletFlag NULL	
	    greyGroup FilletArc_1TolGG "Rel. Tolerance"
			greyGroupItem FilletArc_1 " "
         		textEntry filletArc_1TolVal " " fillet_tol NUM 
			greyGroupItem END							
		greyGroup END  
	    	
	    checkItem ButtonDet3 "Split buttons" splitFlag NULL	
dialogSpace 1
#	    integerEntry ButtNumRings "Num quad layers" num_rings 0 100 1
#     	    textEntry ButtRatRings "Ring offset ratio" ratio_rings NUM
	frame END
      exclusiveGroupItem END #10

      exclusiveGroupItem fillet "Feature Detect Fillets" G_FeatureDetectFillets$icon_size2.gif
  	frame fillet1 "Find/Assign Fillets"
	    entityChooser FilletSurfPick "Surfaces to check" fillet_surfs SURF ANY
	    textEntry FILMinL "Min fillet length" min_length NUM 	  	
	    textEntry FILMaxL "Max fillet length" max_length NUM
	    textEntry FILMinC "Min fillet curvature" min_curvature NUM
	    greyGroup FilletArc_0TolGG "Rel. Toler."
			greyGroupItem FilletArc_0 " "
         		textEntry filletArc_0TolVal " " fillet_tol NUM 
			greyGroupItem END							
		greyGroup END  
#	    textEntry FILMax "Max fillet angle" max_angle NUM 
#   	    textEntry FILMin "Min fillet angle" min_angle NUM 	   
#	    integerEntry FILNumEls "Num quad layers" num_rings 0 100 1  
#	    checkItem FILReCheck "Remove fillets below min" removeCheck NULL	    
	frame END
      exclusiveGroupItem END #11
endif
exclusiveGroup END

dataEntryDialog END  

#----------------------***Transform Geometry, any entity***------------------------------------------------
# User can choose entity by turning on/off from model tree-------------------------------------------------
dataEntryDialog transformSurfsToolsDEZ "Transformation Tools"
    entityChooser transfmoveSurfesPick "Select" surfaceList GEOMETRY ANY allow_long_list
    checkItem transMoveDetach "Keep Topology" detachFlag NULL
    dialogSpace 1
    exclusiveGroup transfrmSurfsEG "Translate/Rotate/Mirror/Scale" "Method" 4 ICON
    dialogSpace 1
    exclusiveGroupItem transMoveSurfsEGI "Translate Geometry (key = m)" G_Translate$icon_size2.gif
    frame transMoveframe "Translate"
    greyGroup copyTranslateGG	"Copy"
        greyGroupItem copyTranslateItem "Copy"
	        integerEntry numTranslateCopies "Number of copies" numCopies 1 100 1
	        entityChooser transfrMovePart "Increment Parts" transfrParts PART ANY preselected_parts
	    greyGroupItem END
    greyGroup END
  	exclusiveGroup moveSurfsEG "Translation" "Method" 1 DROPDOWN
    		exclusiveGroupItem moveSurfsEGOff "Explicit"
      	    	textEntry moveSurfsX "X Offset" x NUM
         	    textEntry moveSurfsY "Y Offset" y NUM
         	    textEntry moveSurfsZ "Z Offset" z NUM
    		exclusiveGroupItem END
    	    	exclusiveGroupItem transfmoveSurfsEG2P "Vector"
      		    dialogSpace 1
        	    entityChooser transfmoveSurfs2PPick "Through 2 points" pointList2  POINTORXYZ 2 do
         	    textEntry moveDistance1 "Distance" movedistance NUM 
      		exclusiveGroupItem END
  	exclusiveGroup END
  	dialogSpace 1
    frame END
    exclusiveGroupItem END # ------------end of Translation
    exclusiveGroupItem transRotateSurfsEGI "Rotate Geometry" G_Rotate$icon_size2.gif
    frame rotateMoveframe "Rotate"
        greyGroup copyRotateGG	"Copy"
            greyGroupItem copyRotateItem "Copy"
	            integerEntry numRotateCopies "Number of copies" numCopies 1 100 1
	            entityChooser transfrPPart "Increment Parts" transfrParts PART ANY preselected_parts
	        greyGroupItem END
        greyGroup END		
          exclusiveGroup geomRotateAxisOptionEG "Rotation" "Axis" 3 DROPDOWN
           	exclusiveGroupItem geomRotateAxisOptionX "X"
           	exclusiveGroupItem END
           	
           	exclusiveGroupItem geomRotateAxisOptionY "Y"
           	exclusiveGroupItem END
           	
           	exclusiveGroupItem geomRotateAxisOptionZ "Z"
           	exclusiveGroupItem END
           	
           	exclusiveGroupItem geomRotateAxisOptionV "Vector"
           		entityChooser geomRotateAxis2PPick "Through 2 points" axisSurfList  POINTORXYZ 2 do
           	exclusiveGroupItem END
          exclusiveGroup END
		  textEntry perAngGGentry "Angle" rot_angle NUM 
      		exclusiveGroup RotateGeomCenterEG "Center of Rotation" "Center Point" 1 DROPDOWN
			exclusiveGroupItem rotatefSurfOrigin "Origin"
			exclusiveGroupItem END
		
			exclusiveGroupItem rotateSurfCentroid "Centroid"
			exclusiveGroupItem END
		
			exclusiveGroupItem rotateSurfUsrPoint "Specified"
			    entityChooser rotateTrfrmCenterPnt "Location" rotateCenterPnt POINTORXYZ 1 do
			exclusiveGroupItem END
	 
		exclusiveGroup END
   frame END
   exclusiveGroupItem END # ---------------end of Rotation
#--------------------------Mirror/Reflection Geometry-----------------------------------------
   exclusiveGroupItem transMirrorSurfsEGI "Mirror Geometry" G_Mirror$icon_size2.gif
      frame mirrorMoveframe "Mirror"
        greyGroup copyMirrorGG	"Copy"
        greyGroupItem copyMirrorChk "Copy"
		entityChooser transfrMirrorPart "Increment Parts" transfrParts PART ANY preselected_parts 	   
		greyGroupItem END
		greyGroup END
    exclusiveGroup geomMirrorAxisOptionEG "Reflection " "Plane Axis (Normal)" 3 DROPDOWN
    	exclusiveGroupItem geomMirrorAxisOptionX "X"
    	exclusiveGroupItem END
                 	
     	exclusiveGroupItem geomMirrorAxisOptionY "Y"
     	exclusiveGroupItem END
                 	
     	exclusiveGroupItem geomMirrorAxisOptionZ "Z"
     	exclusiveGroupItem END
                 	
      	exclusiveGroupItem geomMirrorAxisOptionV "Vector"
         	entityChooser geomMirrorAxis2PPick "Through 2 points" normPointList  POINTORXYZ 2 do
      	exclusiveGroupItem END
   exclusiveGroup END
   
   dialogSpace 1	
   exclusiveGroup ReflectGeomCenterEG "Point of Reflection" "About Point" 1 DROPDOWN
   	exclusiveGroupItem reflectGeomOrigin "Origin"
   	exclusiveGroupItem END
   		
   	exclusiveGroupItem reflectGeomCentroid "Centroid"
   	exclusiveGroupItem END
   	
   	exclusiveGroupItem reflectGeomUsrPoint "Selected"
   		entityChooser reflectTrfrmCenterPnt "Location" reflectCenterPnt POINTORXYZ 1 do
   	exclusiveGroupItem END
   exclusiveGroup END
   frame END
   exclusiveGroupItem END #end of Reflection
   
#--------------------------Scale Geometry-----------------------------------------   
   exclusiveGroupItem transScaleSurfsEGI "Scale Geometry" G_Scale$icon_size2.gif
   frame scaleMoveframe "Scale"
        greyGroup copyScaleGG	"Copy"
        greyGroupItem copyScaleChk "Copy"
		entityChooser transfrScalePart "Increment Parts" transfrParts PART ANY preselected_parts 	   
		greyGroupItem END
		greyGroup END
	frame transScaleSurfsEGILabel "Scale Geometry" 
   		textEntry scaleSurfsX "X factor" xF NUM 
        textEntry scaleSurfsY "Y factor" yF NUM 
        textEntry scaleSurfsZ "Z factor" zF NUM 
	frame END
  	#-----------------Choose Center of Transformation--------------------------

    dialogSpace 1
    exclusiveGroup ScaleGeomCenterEG "Center of Transformation" "Center Point" 1 DROPDOWN
	exclusiveGroupItem transfGeomOrigin "Origin"
	exclusiveGroupItem END
	
	exclusiveGroupItem transfGeomCentroid "Centroid"
	exclusiveGroupItem END
	
	exclusiveGroupItem transfGeomUsrPoint "Selected"
		entityChooser scaleTrfrmCenterPnt "Location" scaleCenterPnt POINTORXYZ 1 do
	exclusiveGroupItem END
 
    exclusiveGroup END
   frame END
   exclusiveGroupItem END #end of Scale

  exclusiveGroupItem transAutoEGI "Translate and Rotate" G_TransformFit$icon_size2.gif
       frame transRotateMoveframe "Translate and Rotate"
        greyGroup copyAutoGG	"Copy"
        greyGroupItem copyAutoChk "Copy"
		entityChooser transfrAutoPart "Increment Parts" transfrParts PART ANY preselected_parts 	   
		greyGroupItem END
		greyGroup END
            dialogSpace 1
			exclusiveGroup transAutoEG "Translate and Rotate Method" "Selection Method" 1 DROPDOWN
			exclusiveGroupItem rotateAuto3Pts "3 points -> 3 points"
           		entityChooser rotateAuto3PtsPick "3 points -> 3 points" rotateAutoList POINTORXYZ 6 on
				exclusiveGroupItem END
			exclusiveGroupItem rotateAuto2Crvs "Curve -> Curve"
           		entityChooser rotateAuto2CrvsPick "Curve -> Curve" rotateAutoList CURVE 2
			exclusiveGroupItem END
			exclusiveGroupItem rotateAutoFromLcs "LCS -> LCS"
				#textButton rotateAutoBut "Show LCS" ShowAllLCSProc
           		entityChooser rotateAutoLcsFrom "From CSYS" fromLCS POINTORXYZ 1 "image.csys no_confirm" "Coordinate system (from)"
           		entityChooser rotateAutoLcsTo "To CSYS" toLCS POINTORXYZ 1 "image.csys no_confirm" "Coordinate system (to)"
			exclusiveGroupItem END				
		exclusiveGroup END
  frame END
  exclusiveGroupItem END 

exclusiveGroup END

dataEntryDialog END
#----------------------------------------------------------------------------------------------------

dataEntryDialog transformBodyToolsDEZ "Geometry Transformation Tools"
dataEntryDialog END

#---------------------------------------------------------------------------------------------------
dataEntryDialog moveBodyDEZ "Move Body"
  textEntry moveBodyName "Name" name TEXT
  dialogSpace 1

  entityChooser moveBodyPick "Body" bodyList  BODY ANY
  dialogSpace 1

  exclusiveGroup moveBodyOffsetGG " " "Method" 2 RADIO
    exclusiveGroupItem moveBodyGGoff "Offset"
      frame moveBodyOffset "Offset"
         textEntry moveBodyX "X Offset" x NUM
         textEntry moveBodyY "Y Offset" y NUM
         textEntry moveBodyZ "Z Offset" z NUM
      frame END
      dialogSpace 1
    exclusiveGroupItem END

    exclusiveGroupItem moveBodyGG2P "2-Points"
      frame moveBody2P "2 Points"
        entityChooser moveBody2PPick "2 Points" pointList  POINTORXYZ 2 xyz
      frame END
    exclusiveGroupItem END
  exclusiveGroup END

# checkItem moveBodyCopyChk "Copy" copyFlag NULL
dataEntryDialog END

#---------------------------------------------------------------------------------------------------
dataEntryDialog scaleBodyDEZ "Scale Body"
  textEntry scaleBodyName "Name" name TEXT
  dialogSpace 1

  entityChooser scaleBodyPick "Body" bodyList  BODY ANY
  dialogSpace 1

  frame scaleBodyFrm "Scale Factors"
  textEntry scaleBodyX "X" x NUM
  textEntry scaleBodyY "Y" y NUM
  textEntry scaleBodyZ "Z" z NUM
  frame END
  dialogSpace 1
  checkItem scaleBodyCopyChk "Copy" copyFlag NULL

dataEntryDialog END

#---------------------------------------------------------------------------------------------------
dataEntryDialog deletePointsDEZ "Delete Point"
  entityChooser deletePointsPick "Point" pointsList  POINT ANY allow_long_list
  checkItem deletePointsDU "Delete Unattached"    DelUnattFlag "aie_geo_set_grey deletePointsPick DelUnattFlag"
  checkItem deletePointsDP "Delete Permanently"   ::vid_options(DelPerFlag)   aie_set_options
  checkItem deletePointsJC "Join Incident Curves" JoinCrvFlag  NULL
  textButton deleteDormPointsBut "Delete All Dormant Points" aie_delAllDorm
dataEntryDialog END
#---------------------------------------------------------------------------------------------------
dataEntryDialog deleteCurveDEZ "Delete Curve"
  entityChooser deleteCurvePick "Curve" curveList  CURVE ANY allow_long_list
  checkItem deleteCurveDU "Delete Unattached" DelUnattFlag "aie_geo_set_grey deleteCurvePick DelUnattFlag"
  checkItem deleteCurveDP "Delete Permanently" ::vid_options(DelPerFlag) aie_set_options
  textButton deleteDormCurvesBut "Delete All Dormant Curves" aie_delAllDorm
dataEntryDialog END
#---------------------------------------------------------------------------------------------------
dataEntryDialog deleteSurfDEZ "Delete Surface"
  entityChooser deleteSurfPick "Surface" surfList  SURF ANY "allow_long_list allow_keyword"
dataEntryDialog END
#---------------------------------------------------------------------------------------------------
dataEntryDialog deleteBodyDEZ "Delete Body"
  entityChooser deleteBodyPick "Body" bodyList  BODY ANY
ifdef AI_ENV_BETA
    textButton deleteBodyEmpty "Delete Bodies without Material Point" "aie_geo_remove_solids_without_material"
endif
dataEntryDialog END
#---------------------------------------------------------------------------------------------------
dataEntryDialog deleteEntityDEZ "Delete Any Entity"
  entityChooser deleteEntityPick "Entity" entityList GEOMETRY ANY
  checkItem deleteEntityDU "Delete unattached" DelUnattFlag "aie_geo_set_grey deleteEntityPick DelUnattFlag"
  checkItem deleteEntityDP "Delete permanently" ::vid_options(DelPerFlag) aie_set_options
dataEntryDialog END
#---------------------------------------------------------------------------------------------------
dataEntryDialog restoreEntityDEZ "Restore Dormant Entity"
# always inherit part 	
  entityChooser restoreCPick "Curves" curveList CURVE ANY tag.dormant.curve
  entityChooser restorePPick "Points" pointList POINT ANY tag.dormant.point
dataEntryDialog END
#-----------------------------

dataEntryDialog testDEZ "This is just test for DEZ performance"
    exclusiveGroup testDEZEG "Test" "Method" 12 ICON
	exclusiveGroupItem  testItem1 "testItem1" G_MergeFacSurf48.gif
	frame testItem1FR "test"
	     textEntry t1 "test" test TEXT
	      entityChooser  pick1 "Points" pick POINTORXYZ 2 pick
	      entityChooser  p1 "Points" pick POINTORXYZ 2 pick
	      entityChooser  p2 "Points" pick POINTORXYZ 2 pick
	      entityChooser  p3 "Points" pick POINTORXYZ 2 pick
	      entityChooser  p4 "Points" pick POINTORXYZ 2 pick
	      entityChooser  p5 "Points" pick POINTORXYZ 2 pick
	      entityChooser  p6 "Points" pick POINTORXYZ 2 pick
	      entityChooser  p7 "Points" pick POINTORXYZ 2 pick
	      entityChooser  p8 "Points" pick POINTORXYZ 2 pick
	      entityChooser  p9 "Points" pick POINTORXYZ 2 pick
	      entityChooser  p10 "Points" pick POINTORXYZ 2 pick
	frame END
	exclusiveGroupItem END

	exclusiveGroupItem  testItem2 "testItem2" G_MergeFacSurf48.gif
	frame testItem2FR "test"
	     textEntry t2 "test" test TEXT
	      entityChooser  pick2 "Points" pick POINTORXYZ 2 pick
	frame END
	exclusiveGroupItem END

	exclusiveGroupItem  testItem3 "testItem3" G_MergeFacSurf48.gif
	frame testItem3FR "test"
	     textEntry t3 "test" test TEXT
	      entityChooser  pick3 "Points" pick POINTORXYZ 2 pick
	frame END
	exclusiveGroupItem END

	exclusiveGroupItem  testItem4 "testItem4" G_MergeFacSurf48.gif
	frame testItem4FR "test"
	     textEntry t4 "test" test TEXT
	      entityChooser  pick4 "Points" pick POINTORXYZ 2 pick
	frame END
	exclusiveGroupItem END

	exclusiveGroupItem  testItem5 "testItem5" G_MergeFacSurf48.gif
	frame testItem5FR "test"
	     textEntry t5 "test" test TEXT
	      entityChooser  pick5 "Points" pick POINTORXYZ 2 pick
	frame END
	exclusiveGroupItem END

	exclusiveGroupItem  testItem6 "testItem6" G_MergeFacSurf48.gif
	frame testItem6FR "test"
	     textEntry t6 "test" test TEXT
	      entityChooser  pick6 "Points" pick POINTORXYZ 2 pick
	frame END
	exclusiveGroupItem END

	exclusiveGroupItem  testItem7 "testItem7" G_MergeFacSurf48.gif
	frame testItem7FR "test"
		textEntry t7 "test" test TEXT
	      entityChooser  pick7 "Points" pick POINTORXYZ 2 pick
	frame END
	exclusiveGroupItem END

	exclusiveGroupItem  testItem8 "testItem8" G_MergeFacSurf48.gif
	frame testItem8FR "test"
	     textEntry t8 "test" test TEXT
	      entityChooser  pick8 "Points" pick POINTORXYZ 2 pick
	frame END
	exclusiveGroupItem END

	exclusiveGroupItem  testItem9 "testItem9" G_MergeFacSurf48.gif
	frame testItem9FR "test"
	     textEntry t9 "test" test TEXT
	      entityChooser  pick9 "Points" pick POINTORXYZ 2 pick
	frame END
	exclusiveGroupItem END

	exclusiveGroupItem  testItem10 "testItem10" G_MergeFacSurf48.gif
	frame testItem10FR "test"
	     textEntry t10 "test" test TEXT
	      entityChooser  pick10 "Points" pick POINTORXYZ 2 pick
	frame END
	exclusiveGroupItem END

	exclusiveGroupItem  testItem11 "testItem11" G_MergeFacSurf48.gif
	frame testItem11FR "test"
	     textEntry t11 "test" test TEXT
	      entityChooser  pick11 "Points" pick POINTORXYZ 2 pick
	frame END
	exclusiveGroupItem END

	exclusiveGroupItem  testItem12 "testItem12" G_MergeFacSurf48.gif
	frame testItem12FR "test"
	     textEntry t12 "test" test TEXT
	      entityChooser  pick12 "Points" pick POINTORXYZ 2 pick
	frame END
	exclusiveGroupItem END
    exclusiveGroup END

dataEntryDialog END

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

dataEntryDialog unitsGeometryDEZ "Geometry Units"
  radioGroup unitsGeometryUnits "Length Units" 1 units unitless NULL
    radioItem unitsGeometryNM  "Nanometers" "nm"
    radioItem unitsGeometryUM  "Micrometers" "um"
    radioItem unitsGeometryMM  "Millimeters" "mm"
    radioItem unitsGeometryCM  "Centimeters" "cm"
    radioItem unitsGeometryM   "Meters" "m"
    radioItem unitsGeometryKM  "Kilometers" "km"
    radioItem unitsGeometryUIN "Microinches" "uin"
    radioItem unitsGeometryMIL "Mils (thousands)" "mil"
    radioItem unitsGeometryIN  "Inches" "in"
    radioItem unitsGeometryFT  "Feet" "ft"
    radioItem unitsGeometryMI  "Miles" "mi"
    radioItem unitsGeometryUK  "Unitless" "unitless"
  radioGroup END
dataEntryDialog END










