X-Git-Url: http://git.dev.opencascade.org/gitweb/?p=occt.git;a=blobdiff_plain;f=src%2FAIS%2FAIS_Circle.cdl;h=ad53755106069ba536446eb507201c59b084cfcb;hp=c8f0040966be8f173353dce4a193a2f7085690b0;hb=543a99649677666ef0c890c27e98910265e24508;hpb=973c2be1e1d7ccc09340d14d5174bb03c761d4a0

diff --git a/src/AIS/AIS_Circle.cdl b/src/AIS/AIS_Circle.cdl
index c8f0040966..ad53755106 100644
--- a/src/AIS/AIS_Circle.cdl
+++ b/src/AIS/AIS_Circle.cdl
@@ -5,8 +5,8 @@
 --
 -- This file is part of Open CASCADE Technology software library.
 --
--- This library is free software; you can redistribute it and / or modify it
--- under the terms of the GNU Lesser General Public version 2.1 as published
+-- This library is free software; you can redistribute it and/or modify it under
+-- the terms of the GNU Lesser General Public License version 2.1 as published
 -- by the Free Software Foundation, with special exception defined in the file
 -- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
 -- distribution for complete text of the license and disclaimer of any warranty.
@@ -14,9 +14,6 @@
 -- Alternatively, this file may be used under the terms of Open CASCADE
 -- commercial license or contractual agreement.
 
---   GG  :  GER61351 17/11/1999 Change SetColor() with a compatible Quantity_Color instead
---				       the restricted NameOfColor.
-
 class Circle from AIS inherits InteractiveObject from AIS
 
 	---Purpose: Constructs circle datums to be used in construction of
@@ -38,14 +35,14 @@ uses
 
 is
     Create(aCircle : Circle from Geom) 
-    returns mutable Circle from AIS;
+    returns Circle from AIS;
     	---Purpose: Initializes this algorithm for constructing AIS circle
     	-- datums initializes the circle aCircle
     Create(theCircle : Circle from Geom;
            theUStart : Real from Standard;
            theUEnd   : Real from Standard;
            theIsFilledCircleSens : Boolean from Standard = Standard_False) 
-    returns mutable Circle from AIS;
+    returns Circle from AIS;
     ---Purpose: Initializes this algorithm for constructing AIS circle datums.    
     -- Initializes the circle theCircle, the arc
     --   starting point theUStart, the arc ending point theUEnd,
@@ -53,19 +50,19 @@ is
 
     Compute(me            : mutable;
     	    aPresentationManager: PresentationManager3d from PrsMgr;
-    	    aPresentation : mutable Presentation from Prs3d;
+    	    aPresentation : Presentation from Prs3d;
     	    aMode         : Integer from Standard = 0) 
     is redefined static  private;
     
     Compute(me:mutable;
     	        aProjector: Projector from Prs3d;
-                aPresentation: mutable Presentation from Prs3d)
+                aPresentation: Presentation from Prs3d)
     is redefined static private;     
 
     Compute(me            : mutable;
             aProjector    : Projector from Prs3d;
             aTrsf         : Transformation from Geom;
-            aPresentation : mutable Presentation from Prs3d)
+            aPresentation : Presentation from Prs3d)
     is redefined;
 	 ---Purpose: computes the presentation according to a point of view
     	 --          given by <aProjector>.
@@ -78,7 +75,7 @@ is
 -- Methods from SelectableObject
 
     ComputeSelection(me         : mutable;
-    	    	     aSelection : mutable Selection from SelectMgr;
+    	    	     aSelection : Selection from SelectMgr;
     	    	     aMode      : Integer from Standard)is private;
 
  
@@ -143,19 +140,19 @@ is
     -- then the whole circle will be detectable, otherwise only the boundary of the circle.
 
     ComputeCircle(me: mutable;
-                  aPresentation : mutable Presentation from Prs3d)
+                  aPresentation : Presentation from Prs3d)
     is private;
      
     ComputeArc(me: mutable;
-               aPresentation : mutable Presentation from Prs3d)
+               aPresentation : Presentation from Prs3d)
     is private;
 
     ComputeCircleSelection(me: mutable;
-                           aSelection : mutable Selection from SelectMgr)
+                           aSelection : Selection from SelectMgr)
     is private;
      
     ComputeArcSelection(me: mutable;
-                        aSelection : mutable Selection from SelectMgr)
+                        aSelection : Selection from SelectMgr)
     is private;
 
 fields