myDocument isa CATPart
   {
     myPart isa Part
        {
          OBody isa OpenBodyFeature
             {
                P1 isa GSMPoint 
                   {
                      PointType = 0;
                      TypeObject isa GSMPointCoord
                        {
                          X = 0mm; 
                          Y = 0mm; 
                          Z = 0mm; 
                        } 
                    }              
                 C isa GSMCircle
                    {
                       CircleType = 0; 
                       TypeObject isa GSMCircleCtrRad
                         {
                           Center = object : ..\..\P1;
                           Support = object : ..\..\..\`xy-plane`;
                           Radius = 20mm;
                         }
                       StartAngle = 0deg;
                       EndAngle = 360deg;
                    }
                    
                Plane1 isa GSMPlane
                    {
                        PlaneType = 7;
                        TypeObject isa GSMPlaneOffset
                           {
                            RefPlane = object: ..\..\..\`xy-plane`;
                            Distance = -20mm;
                            }
                    }                                    
                 Proj isa GSMProject
                    {
                        Normal = 1;
                        Support = object : ..\Plane1;
                        ToProject = object : ..\C;
                    }
                 CP isa GSMCurvePar
                    {
                        Type=0;
                        Orientation=0;
                        Offset = object : ..\Proj;
                        Support = object : ..\Plane1;
                        Length = 10mm;
                    }        
            }
      }
}