@prefix :        <https://savage.nps.edu/Savage/CommunicationsAndSensors/Beam/BeamConePrototype.ttl#> .
@prefix owl:     <http://www.w3.org/2002/07/owl#> .
@prefix rdf:     <http://www.w3.org/1999/02/22-rdf-syntax-ns#> .
@prefix rdfs:    <http://www.w3.org/2000/01/rdf-schema#> .
@prefix schema:  <http://schema.org/> .
@prefix dcterms: <http://purl.org/dc/terms/> .
@prefix xsd:     <http://www.w3.org/2001/XMLSchema#> .
@prefix x3d:     <https://www.web3d.org/specifications/x3d-4.0.xsd#> .
@prefix x3do:    <https://www.web3d.org/specifications/X3dOntology4.0#> .

:X3D a owl:NamedIndividual, x3do:X3D ;
  x3do:hasHead :head ;
  x3do:hasScene :Scene ;
  x3do:profile 'Immersive' ;
  x3do:version '3.3' ;
  x3do:noNamespaceSchemaLocation 'https://www.web3d.org/specifications/x3d-3.3.xsd' .
:head a owl:NamedIndividual, x3do:head ;
  x3do:hasParent :X3D ;
  x3do:hasMeta :meta_1_1, :meta_1_2, :meta_1_3, :meta_1_4, :meta_1_5, :meta_1_6, :meta_1_7, :meta_1_8, :meta_1_9, :meta_1_10 .
:meta_1_1 a owl:NamedIndividual, x3do:meta ;
  x3do:hasParent :head ;
  x3do:content 'BeamConePrototype.x3d' ;
  x3do:name 'title' .
:meta_1_2 a owl:NamedIndividual, x3do:meta ;
  x3do:hasParent :head ;
  x3do:content 'Don Brutzman' ;
  x3do:name 'creator' .
:meta_1_3 a owl:NamedIndividual, x3do:meta ;
  x3do:hasParent :head ;
  x3do:content '7 December 2000' ;
  x3do:name 'created' .
:meta_1_4 a owl:NamedIndividual, x3do:meta ;
  x3do:hasParent :head ;
  x3do:content '12 October 2023' ;
  x3do:name 'modified' .
:meta_1_5 a owl:NamedIndividual, x3do:meta ;
  x3do:hasParent :head ;
  x3do:content 'Produce wireframe or transparent beam cones.' ;
  x3do:name 'description' .
:meta_1_6 a owl:NamedIndividual, x3do:meta ;
  x3do:hasParent :head ;
  x3do:content 'https://savage.nps.edu/Savage/CommunicationsAndSensors/Beam/BeamConePrototype.x3d' ;
  x3do:name 'identifier' .
:meta_1_7 a owl:NamedIndividual, x3do:meta ;
  x3do:hasParent :head ;
  x3do:content 'http://faculty.nps.edu/brutzman/vrtp/demo/auv/BeamConePrototype.x3d' ;
  x3do:name 'reference' .
:meta_1_8 a owl:NamedIndividual, x3do:meta ;
  x3do:hasParent :head ;
  x3do:content 'https://www.web3d.org/WorkingGroups/vrtp/demo/auv/BeamConePrototype.x3d' ;
  x3do:name 'reference' .
:meta_1_9 a owl:NamedIndividual, x3do:meta ;
  x3do:hasParent :head ;
  x3do:content 'X3D-Edit 4.0, https://savage.nps.edu/X3D-Edit' ;
  x3do:name 'generator' .
:meta_1_10 a owl:NamedIndividual, x3do:meta ;
  x3do:hasParent :head ;
  x3do:content '../../license.html' ;
  x3do:name 'license' .
:meta dcterms:title "BeamConePrototype.x3d" .
:meta dcterms:creator "Don Brutzman" .
:meta dcterms:created "7 December 2000" .
:meta dcterms:modified "12 October 2023" .
:meta dcterms:description "Produce wireframe or transparent beam cones." .
:meta dcterms:identifier "https://savage.nps.edu/Savage/CommunicationsAndSensors/Beam/BeamConePrototype.x3d" .
:meta dcterms:reference "http://faculty.nps.edu/brutzman/vrtp/demo/auv/BeamConePrototype.x3d" .
:meta dcterms:reference "https://www.web3d.org/WorkingGroups/vrtp/demo/auv/BeamConePrototype.x3d" .
:meta dcterms:generator "X3D-Edit 4.0, https://savage.nps.edu/X3D-Edit" .
:meta dcterms:license "../../license.html" .
:Scene a owl:NamedIndividual, x3do:Scene ;
  x3do:hasParent :X3D ;
  x3do:hasChildren :LockedDownInterface2D, :Background_2_2, :WorldInfo_2_3, :Viewpoint_2_4, :Anchor_2_6 ;
  x3do:hasProtoDeclare :ProtoDeclare_2_5 .
:LockedDownInterface2D a owl:NamedIndividual, x3do:NavigationInfo ;
  x3do:hasParent :Scene ;
  x3do:DEF 'LockedDownInterface2D' ;
  x3do:type '"NONE"' .
:Background_2_2 a owl:NamedIndividual, x3do:Background ;
  x3do:hasParent :Scene ;
  x3do:skyColor ( 0 0.3 0.5 ) .
:WorldInfo_2_3 a owl:NamedIndividual, x3do:WorldInfo ;
  x3do:hasParent :Scene ;
  x3do:info '"Produce wireframe or transparent beam cones"' ;
  x3do:title 'BeamConeProto' .
:Viewpoint_2_4 a owl:NamedIndividual, x3do:Viewpoint ;
  x3do:hasParent :Scene ;
  x3do:description 'Beam Cone' ;
  x3do:position ( 0 0 15 ) .
:ProtoDeclare_2_5 a owl:NamedIndividual, x3do:ProtoDeclare ;
  x3do:hasParent :Scene ;
  x3do:hasProtoInterface :ProtoInterface_2_5_1 ;
  x3do:hasProtoBody :ProtoBody_2_5_2 ;
  x3do:appinfo 'Produce wireframe or transparent beam cones. Typical uses include propeller/thruster water flow or line-of-sight sonar/radar/light beams. Negative range values invert base and apex at same relative location. Default: beam with apex at (0 0 0) and base of radius 1 in x-z plane at (1 0 0).' ;
  x3do:name 'BeamCone' .
:ProtoInterface_2_5_1 a owl:NamedIndividual, x3do:ProtoInterface ;
  x3do:hasParent :ProtoDeclare_2_5 ;
  x3do:hasField :field_2_5_1_1, :field_2_5_1_2, :field_2_5_1_3, :field_2_5_1_4, :field_2_5_1_5, :field_2_5_1_6, :field_2_5_1_7, :field_2_5_1_8, :field_2_5_1_9, :field_2_5_1_10, :field_2_5_1_11, :field_2_5_1_12 .
:field_2_5_1_1 a owl:NamedIndividual, x3do:field ;
  x3do:hasParent :ProtoInterface_2_5_1 ;
  x3do:accessType 'initializeOnly' ;
  x3do:appinfo 'BeamCone name aids in node identification and tracing' ;
  x3do:name 'name' ;
  x3do:type 'SFString' ;
  x3do:value '(unnamed)' .
:field_2_5_1_2 a owl:NamedIndividual, x3do:field ;
  x3do:hasParent :ProtoInterface_2_5_1 ;
  x3do:accessType 'inputOnly' ;
  x3do:appinfo '(communications) is transmitted signal in contact with receiver or (sensor) is a target return detected?' ;
  x3do:name 'contact' ;
  x3do:type 'SFBool' .
:field_2_5_1_3 a owl:NamedIndividual, x3do:field ;
  x3do:hasParent :ProtoInterface_2_5_1 ;
  x3do:accessType 'inputOnly' ;
  x3do:appinfo 'distance in meters along x axis' ;
  x3do:name 'range' ;
  x3do:type 'SFFloat' .
:field_2_5_1_4 a owl:NamedIndividual, x3do:field ;
  x3do:hasParent :ProtoInterface_2_5_1 ;
  x3do:accessType 'initializeOnly' ;
  x3do:appinfo 'distance in meters used until eventIn range sent' ;
  x3do:name 'defaultRange' ;
  x3do:type 'SFFloat' ;
  x3do:value 1 .
:field_2_5_1_5 a owl:NamedIndividual, x3do:field ;
  x3do:hasParent :ProtoInterface_2_5_1 ;
  x3do:accessType 'initializeOnly' ;
  x3do:appinfo 'whether wireframe beam is drawn' ;
  x3do:name 'wireframe' ;
  x3do:type 'SFBool' ;
  x3do:value true .
:field_2_5_1_6 a owl:NamedIndividual, x3do:field ;
  x3do:hasParent :ProtoInterface_2_5_1 ;
  x3do:accessType 'initializeOnly' ;
  x3do:appinfo 'whether solid beam is drawn' ;
  x3do:name 'solid' ;
  x3do:type 'SFBool' ;
  x3do:value true .
:field_2_5_1_7 a owl:NamedIndividual, x3do:field ;
  x3do:hasParent :ProtoInterface_2_5_1 ;
  x3do:accessType 'initializeOnly' ;
  x3do:appinfo 'degrees across vertical y axis' ;
  x3do:name 'beamHeightDegrees' ;
  x3do:type 'SFFloat' ;
  x3do:value 10 .
:field_2_5_1_8 a owl:NamedIndividual, x3do:field ;
  x3do:hasParent :ProtoInterface_2_5_1 ;
  x3do:accessType 'initializeOnly' ;
  x3do:appinfo 'degrees across horizontal z axis' ;
  x3do:name 'beamWidthDegrees' ;
  x3do:type 'SFFloat' ;
  x3do:value 10 .
:field_2_5_1_9 a owl:NamedIndividual, x3do:field ;
  x3do:hasParent :ProtoInterface_2_5_1 ;
  x3do:accessType 'initializeOnly' ;
  x3do:appinfo 'rendering color when contact=true' ;
  x3do:name 'contactColor' ;
  x3do:type 'SFColor' ;
  x3do:value ( .8 .1 .1 ) .
:field_2_5_1_10 a owl:NamedIndividual, x3do:field ;
  x3do:hasParent :ProtoInterface_2_5_1 ;
  x3do:accessType 'initializeOnly' ;
  x3do:appinfo 'rendering color when contact=false' ;
  x3do:name 'noContactColor' ;
  x3do:type 'SFColor' ;
  x3do:value ( .3 .5 .5 ) .
:field_2_5_1_11 a owl:NamedIndividual, x3do:field ;
  x3do:hasParent :ProtoInterface_2_5_1 ;
  x3do:accessType 'inputOutput' ;
  x3do:appinfo '1 = fully transparent wireframe only' ;
  x3do:name 'transparency' ;
  x3do:type 'SFFloat' ;
  x3do:value 0 .
:field_2_5_1_12 a owl:NamedIndividual, x3do:field ;
  x3do:hasParent :ProtoInterface_2_5_1 ;
  x3do:accessType 'initializeOnly' ;
  x3do:appinfo 'flag to turn on Script tracing' ;
  x3do:name 'traceEnabled' ;
  x3do:type 'SFBool' ;
  x3do:value false .
:ProtoBody_2_5_2 a owl:NamedIndividual, x3do:ProtoBody ;
  x3do:hasParent :ProtoDeclare_2_5 ;
  x3do:hasChildren :BEAM_CONTROL, :DETECTION, :BEAM_CALCULATE ;
  x3do:hasROUTE :ROUTE_2_5_2_4, :ROUTE_2_5_2_5, :ROUTE_2_5_2_6, :ROUTE_2_5_2_7, :ROUTE_2_5_2_8, :ROUTE_2_5_2_9, :ROUTE_2_5_2_10 .
:BEAM_CONTROL a owl:NamedIndividual, x3do:Transform ;
  x3do:hasParent :ProtoBody_2_5_2 ;
  x3do:hasChildren :WIREFRAME_SWITCH, :SOLID_SWITCH ;
  x3do:DEF 'BEAM_CONTROL' .
:WIREFRAME_SWITCH a owl:NamedIndividual, x3do:Switch ;
  x3do:hasParent :BEAM_CONTROL ;
  x3do:hasChildren :WorldInfo_2_5_2_1_1_1, :Shape_2_5_2_1_1_2 ;
  x3do:DEF 'WIREFRAME_SWITCH' ;
  x3do:whichChoice 0 .
:WorldInfo_2_5_2_1_1_1 a owl:NamedIndividual, x3do:WorldInfo ;
  x3do:hasParent :WIREFRAME_SWITCH ;
  x3do:info '"initial choice is null node (WorldInfo), meaning no wireframe beam"' .
:Shape_2_5_2_1_1_2 a owl:NamedIndividual, x3do:Shape ;
  x3do:hasParent :WIREFRAME_SWITCH ;
  x3do:hasAppearance :Appearance_2_5_2_1_1_2_1 ;
  x3do:hasGeometry :IndexedLineSet_2_5_2_1_1_2_2 .
:Appearance_2_5_2_1_1_2_1 a owl:NamedIndividual, x3do:Appearance ;
  x3do:hasParent :Shape_2_5_2_1_1_2 ;
  x3do:hasMaterial :WIRE_COLOR .
:WIRE_COLOR a owl:NamedIndividual, x3do:Material ;
  x3do:hasParent :Appearance_2_5_2_1_1_2_1 ;
  x3do:hasIS :IS_2_5_2_1_1_2_1_1_1 ;
  x3do:DEF 'WIRE_COLOR' ;
  x3do:diffuseColor ( .1 .1 .1 ) ;
  x3do:emissiveColor ( .1 .1 .1 ) .
:IS_2_5_2_1_1_2_1_1_1 a owl:NamedIndividual, x3do:IS ;
  x3do:hasParent :WIRE_COLOR ;
  x3do:hasConnect :connect_2_5_2_1_1_2_1_1_1_1 .
:connect_2_5_2_1_1_2_1_1_1_1 a owl:NamedIndividual, x3do:connect ;
  x3do:hasParent :IS_2_5_2_1_1_2_1_1_1 ;
  x3do:nodeField 'transparency' ;
  x3do:protoField 'transparency' .
:IndexedLineSet_2_5_2_1_1_2_2 a owl:NamedIndividual, x3do:IndexedLineSet ;
  x3do:hasParent :Shape_2_5_2_1_1_2 ;
  x3do:hasCoord :Coordinate_2_5_2_1_1_2_2_1 ;
  x3do:coordIndex ( 0 13 -1 1 2 3 4 5 6 7 8 9 10 11 12 1 -1 0 1 -1 0 2 -1 0 3 -1 0 4 -1 0 5 -1 0 6 -1 0 7 -1 0 8 -1 0 9 -1 0 10 -1 0 11 -1 0 12 -1 ) .
:Coordinate_2_5_2_1_1_2_2_1 a owl:NamedIndividual, x3do:Coordinate ;
  x3do:hasParent :IndexedLineSet_2_5_2_1_1_2_2 ;
  x3do:point ( 0 0 0 1 1 0 1 0.86 0.50 1 0.50 0.86 1 0 1.0 1 -0.50 0.86 1 -0.86 0.50 1 -1 0 1 -0.86 -0.50 1 -0.50 -0.86 1 0 -1.0 1 0.50 -0.86 1 0.86 -0.50 1 0 0 ) .
:SOLID_SWITCH a owl:NamedIndividual, x3do:Switch ;
  x3do:hasParent :BEAM_CONTROL ;
  x3do:hasChildren :WorldInfo_2_5_2_1_2_1, :Transform_2_5_2_1_2_2 ;
  x3do:DEF 'SOLID_SWITCH' ;
  x3do:whichChoice 0 .
:WorldInfo_2_5_2_1_2_1 a owl:NamedIndividual, x3do:WorldInfo ;
  x3do:hasParent :SOLID_SWITCH ;
  x3do:info '"initial choice is null node (WorldInfo), meaning no solid beam"' .
:Transform_2_5_2_1_2_2 a owl:NamedIndividual, x3do:Transform ;
  x3do:hasParent :SOLID_SWITCH ;
  x3do:hasChildren :Shape_2_5_2_1_2_2_1 ;
  x3do:rotation ( 0 0 1 1.57079 ) ;
  x3do:translation ( .5 0 0 ) .
:Shape_2_5_2_1_2_2_1 a owl:NamedIndividual, x3do:Shape ;
  x3do:hasParent :Transform_2_5_2_1_2_2 ;
  x3do:hasAppearance :Appearance_2_5_2_1_2_2_1_1 ;
  x3do:hasGeometry :Cone_2_5_2_1_2_2_1_2 .
:Appearance_2_5_2_1_2_2_1_1 a owl:NamedIndividual, x3do:Appearance ;
  x3do:hasParent :Shape_2_5_2_1_2_2_1 ;
  x3do:hasMaterial :CONE_COLOR .
:CONE_COLOR a owl:NamedIndividual, x3do:Material ;
  x3do:hasParent :Appearance_2_5_2_1_2_2_1_1 ;
  x3do:hasIS :IS_2_5_2_1_2_2_1_1_1_1 ;
  x3do:DEF 'CONE_COLOR' ;
  x3do:diffuseColor ( .1 .1 .1 ) .
:IS_2_5_2_1_2_2_1_1_1_1 a owl:NamedIndividual, x3do:IS ;
  x3do:hasParent :CONE_COLOR ;
  x3do:hasConnect :connect_2_5_2_1_2_2_1_1_1_1_1 .
:connect_2_5_2_1_2_2_1_1_1_1_1 a owl:NamedIndividual, x3do:connect ;
  x3do:hasParent :IS_2_5_2_1_2_2_1_1_1_1 ;
  x3do:nodeField 'transparency' ;
  x3do:protoField 'transparency' .
:Cone_2_5_2_1_2_2_1_2 a owl:NamedIndividual, x3do:Cone ;
  x3do:hasParent :Shape_2_5_2_1_2_2_1 ;
  x3do:bottom false ;
  x3do:height 1 .
:DETECTION a owl:NamedIndividual, x3do:Script ;
  x3do:hasParent :ProtoBody_2_5_2 ;
  x3do:hasField :field_2_5_2_2_1, :field_2_5_2_2_2, :field_2_5_2_2_3, :field_2_5_2_2_4, :field_2_5_2_2_5, :field_2_5_2_2_6, :field_2_5_2_2_7, :field_2_5_2_2_8, :field_2_5_2_2_9, :field_2_5_2_2_10 ;
  x3do:hasIS :IS_2_5_2_2_11 ;
  x3do:DEF 'DETECTION' ;
  x3do:sourceCode """
ecmascript:
function initialize ()
{
	beamColor = noContactColor;
	if (wireframe == true) wireframeChoice = 1;
	if (solid     == true) solidChoice     = 1;
	if (traceEnabled)
	{
//		Browser.println ('[BeamCone ' + name + '] trace=' + trace);
		Browser.println ('[BeamCone ' + name + '] wireframeChoice=' + wireframeChoice + ', solidChoice=' + solidChoice);
		Browser.println ('[BeamCone ' + name + '] contactColor=' + contactColor.toString() + ', noContactColor=' + noContactColor.toString());
	}
}
function contact (newDetect, timeStamp)
{
	if (newDetect) beamColor = contactColor;
	else           beamColor = noContactColor;
	if (traceEnabled) Browser.println ('[BeamCone ' + name + '] contact=' + newDetect + ', beamColor=' + beamColor.toString());
}
""" .
:field_2_5_2_2_1 a owl:NamedIndividual, x3do:field ;
  x3do:hasParent :DETECTION ;
  x3do:accessType 'initializeOnly' ;
  x3do:appinfo 'BeamCone name aids tracing' ;
  x3do:name 'name' ;
  x3do:type 'SFString' .
:field_2_5_2_2_2 a owl:NamedIndividual, x3do:field ;
  x3do:hasParent :DETECTION ;
  x3do:accessType 'inputOnly' ;
  x3do:name 'contact' ;
  x3do:type 'SFBool' .
:field_2_5_2_2_3 a owl:NamedIndividual, x3do:field ;
  x3do:hasParent :DETECTION ;
  x3do:accessType 'initializeOnly' ;
  x3do:name 'wireframe' ;
  x3do:type 'SFBool' .
:field_2_5_2_2_4 a owl:NamedIndividual, x3do:field ;
  x3do:hasParent :DETECTION ;
  x3do:accessType 'initializeOnly' ;
  x3do:name 'solid' ;
  x3do:type 'SFBool' .
:field_2_5_2_2_5 a owl:NamedIndividual, x3do:field ;
  x3do:hasParent :DETECTION ;
  x3do:accessType 'initializeOnly' ;
  x3do:name 'contactColor' ;
  x3do:type 'SFColor' .
:field_2_5_2_2_6 a owl:NamedIndividual, x3do:field ;
  x3do:hasParent :DETECTION ;
  x3do:accessType 'initializeOnly' ;
  x3do:name 'noContactColor' ;
  x3do:type 'SFColor' .
:field_2_5_2_2_7 a owl:NamedIndividual, x3do:field ;
  x3do:hasParent :DETECTION ;
  x3do:accessType 'outputOnly' ;
  x3do:name 'beamColor' ;
  x3do:type 'SFColor' .
:field_2_5_2_2_8 a owl:NamedIndividual, x3do:field ;
  x3do:hasParent :DETECTION ;
  x3do:accessType 'outputOnly' ;
  x3do:name 'wireframeChoice' ;
  x3do:type 'SFInt32' .
:field_2_5_2_2_9 a owl:NamedIndividual, x3do:field ;
  x3do:hasParent :DETECTION ;
  x3do:accessType 'outputOnly' ;
  x3do:name 'solidChoice' ;
  x3do:type 'SFInt32' .
:field_2_5_2_2_10 a owl:NamedIndividual, x3do:field ;
  x3do:hasParent :DETECTION ;
  x3do:accessType 'initializeOnly' ;
  x3do:appinfo 'internal flag to turn on Script tracing' ;
  x3do:name 'traceEnabled' ;
  x3do:type 'SFBool' .
:IS_2_5_2_2_11 a owl:NamedIndividual, x3do:IS ;
  x3do:hasParent :DETECTION ;
  x3do:hasConnect :connect_2_5_2_2_11_1, :connect_2_5_2_2_11_2, :connect_2_5_2_2_11_3, :connect_2_5_2_2_11_4, :connect_2_5_2_2_11_5, :connect_2_5_2_2_11_6, :connect_2_5_2_2_11_7 .
:connect_2_5_2_2_11_1 a owl:NamedIndividual, x3do:connect ;
  x3do:hasParent :IS_2_5_2_2_11 ;
  x3do:nodeField 'name' ;
  x3do:protoField 'name' .
:connect_2_5_2_2_11_2 a owl:NamedIndividual, x3do:connect ;
  x3do:hasParent :IS_2_5_2_2_11 ;
  x3do:nodeField 'contact' ;
  x3do:protoField 'contact' .
:connect_2_5_2_2_11_3 a owl:NamedIndividual, x3do:connect ;
  x3do:hasParent :IS_2_5_2_2_11 ;
  x3do:nodeField 'wireframe' ;
  x3do:protoField 'wireframe' .
:connect_2_5_2_2_11_4 a owl:NamedIndividual, x3do:connect ;
  x3do:hasParent :IS_2_5_2_2_11 ;
  x3do:nodeField 'solid' ;
  x3do:protoField 'solid' .
:connect_2_5_2_2_11_5 a owl:NamedIndividual, x3do:connect ;
  x3do:hasParent :IS_2_5_2_2_11 ;
  x3do:nodeField 'contactColor' ;
  x3do:protoField 'contactColor' .
:connect_2_5_2_2_11_6 a owl:NamedIndividual, x3do:connect ;
  x3do:hasParent :IS_2_5_2_2_11 ;
  x3do:nodeField 'noContactColor' ;
  x3do:protoField 'noContactColor' .
:connect_2_5_2_2_11_7 a owl:NamedIndividual, x3do:connect ;
  x3do:hasParent :IS_2_5_2_2_11 ;
  x3do:nodeField 'traceEnabled' ;
  x3do:protoField 'traceEnabled' .
:BEAM_CALCULATE a owl:NamedIndividual, x3do:Script ;
  x3do:hasParent :ProtoBody_2_5_2 ;
  x3do:hasField :field_2_5_2_3_1, :field_2_5_2_3_2, :field_2_5_2_3_3, :field_2_5_2_3_4, :field_2_5_2_3_5, :field_2_5_2_3_6, :field_2_5_2_3_7 ;
  x3do:hasIS :IS_2_5_2_3_8 ;
  x3do:DEF 'BEAM_CALCULATE' ;
  x3do:sourceCode """
ecmascript:
function initialize () {
 // Note that X3D scale factor triplets all equal to zero are not allowed
 if (defaultRange == 0)      defaultRange = .0001;
 if (beamHeightDegrees == 0) beamHeightDegrees = .0001;
 if (beamWidthDegrees  == 0) beamWidthDegrees  = .0001;
 beamHeightFactor= Math.sin ((beamHeightDegrees * 3.141592653 / 180.0) / 2.0);
 beamWidthFactor = Math.sin ((beamWidthDegrees  * 3.141592653 / 180.0) / 2.0);
 beamScale = new SFVec3f ( defaultRange, defaultRange * beamHeightFactor, defaultRange * beamWidthFactor);
}
function range (newRange, timeStamp) {
 beamHeightFactor= Math.sin ((beamHeightDegrees * 3.141592653 / 180.0) / 2.0);
 beamWidthFactor = Math.sin ((beamWidthDegrees  * 3.141592653 / 180.0) / 2.0);
 if (newRange < 0)
 {
   direction     = new SFRotation (0, 1, 0, 3.141592653);
   reverseOffset = new SFVec3f (- newRange, 0, 0);
   beamScale = new SFVec3f (-newRange, -newRange * beamHeightFactor, -newRange * beamWidthFactor);
 }
 else if (newRange == 0)
 {
   direction     = new SFRotation (0, 1, 0, 0);
   reverseOffset = new SFVec3f (0, 0, 0);
   beamScale = new SFVec3f ( .0001, .0001, .0001 );
 }
 else
 {
   direction     = new SFRotation (0, 1, 0, 0);
   reverseOffset = new SFVec3f (0, 0, 0);
   beamScale = new SFVec3f (newRange, newRange * beamHeightFactor, newRange * beamWidthFactor);
 }
}
""" .
:field_2_5_2_3_1 a owl:NamedIndividual, x3do:field ;
  x3do:hasParent :BEAM_CALCULATE ;
  x3do:accessType 'inputOnly' ;
  x3do:name 'range' ;
  x3do:type 'SFFloat' .
:field_2_5_2_3_2 a owl:NamedIndividual, x3do:field ;
  x3do:hasParent :BEAM_CALCULATE ;
  x3do:accessType 'initializeOnly' ;
  x3do:name 'defaultRange' ;
  x3do:type 'SFFloat' .
:field_2_5_2_3_3 a owl:NamedIndividual, x3do:field ;
  x3do:hasParent :BEAM_CALCULATE ;
  x3do:accessType 'initializeOnly' ;
  x3do:name 'beamHeightDegrees' ;
  x3do:type 'SFFloat' .
:field_2_5_2_3_4 a owl:NamedIndividual, x3do:field ;
  x3do:hasParent :BEAM_CALCULATE ;
  x3do:accessType 'initializeOnly' ;
  x3do:name 'beamWidthDegrees' ;
  x3do:type 'SFFloat' .
:field_2_5_2_3_5 a owl:NamedIndividual, x3do:field ;
  x3do:hasParent :BEAM_CALCULATE ;
  x3do:accessType 'outputOnly' ;
  x3do:name 'beamScale' ;
  x3do:type 'SFVec3f' .
:field_2_5_2_3_6 a owl:NamedIndividual, x3do:field ;
  x3do:hasParent :BEAM_CALCULATE ;
  x3do:accessType 'outputOnly' ;
  x3do:name 'direction' ;
  x3do:type 'SFRotation' .
:field_2_5_2_3_7 a owl:NamedIndividual, x3do:field ;
  x3do:hasParent :BEAM_CALCULATE ;
  x3do:accessType 'outputOnly' ;
  x3do:name 'reverseOffset' ;
  x3do:type 'SFVec3f' .
:IS_2_5_2_3_8 a owl:NamedIndividual, x3do:IS ;
  x3do:hasParent :BEAM_CALCULATE ;
  x3do:hasConnect :connect_2_5_2_3_8_1, :connect_2_5_2_3_8_2, :connect_2_5_2_3_8_3, :connect_2_5_2_3_8_4 .
:connect_2_5_2_3_8_1 a owl:NamedIndividual, x3do:connect ;
  x3do:hasParent :IS_2_5_2_3_8 ;
  x3do:nodeField 'range' ;
  x3do:protoField 'range' .
:connect_2_5_2_3_8_2 a owl:NamedIndividual, x3do:connect ;
  x3do:hasParent :IS_2_5_2_3_8 ;
  x3do:nodeField 'defaultRange' ;
  x3do:protoField 'defaultRange' .
:connect_2_5_2_3_8_3 a owl:NamedIndividual, x3do:connect ;
  x3do:hasParent :IS_2_5_2_3_8 ;
  x3do:nodeField 'beamHeightDegrees' ;
  x3do:protoField 'beamHeightDegrees' .
:connect_2_5_2_3_8_4 a owl:NamedIndividual, x3do:connect ;
  x3do:hasParent :IS_2_5_2_3_8 ;
  x3do:nodeField 'beamWidthDegrees' ;
  x3do:protoField 'beamWidthDegrees' .
:ROUTE_2_5_2_4 a owl:NamedIndividual, x3do:ROUTE ;
  x3do:hasParent :ProtoBody_2_5_2 ;
  x3do:fromField 'beamColor' ;
  x3do:fromNode 'DETECTION' ;
  x3do:toField 'emissiveColor' ;
  x3do:toNode 'WIRE_COLOR' .
:ROUTE_2_5_2_5 a owl:NamedIndividual, x3do:ROUTE ;
  x3do:hasParent :ProtoBody_2_5_2 ;
  x3do:fromField 'beamColor' ;
  x3do:fromNode 'DETECTION' ;
  x3do:toField 'emissiveColor' ;
  x3do:toNode 'CONE_COLOR' .
:ROUTE_2_5_2_6 a owl:NamedIndividual, x3do:ROUTE ;
  x3do:hasParent :ProtoBody_2_5_2 ;
  x3do:fromField 'wireframeChoice' ;
  x3do:fromNode 'DETECTION' ;
  x3do:toField 'whichChoice' ;
  x3do:toNode 'WIREFRAME_SWITCH' .
:ROUTE_2_5_2_7 a owl:NamedIndividual, x3do:ROUTE ;
  x3do:hasParent :ProtoBody_2_5_2 ;
  x3do:fromField 'solidChoice' ;
  x3do:fromNode 'DETECTION' ;
  x3do:toField 'whichChoice' ;
  x3do:toNode 'SOLID_SWITCH' .
:ROUTE_2_5_2_8 a owl:NamedIndividual, x3do:ROUTE ;
  x3do:hasParent :ProtoBody_2_5_2 ;
  x3do:fromField 'beamScale' ;
  x3do:fromNode 'BEAM_CALCULATE' ;
  x3do:toField 'scale' ;
  x3do:toNode 'BEAM_CONTROL' .
:ROUTE_2_5_2_9 a owl:NamedIndividual, x3do:ROUTE ;
  x3do:hasParent :ProtoBody_2_5_2 ;
  x3do:fromField 'direction' ;
  x3do:fromNode 'BEAM_CALCULATE' ;
  x3do:toField 'rotation' ;
  x3do:toNode 'BEAM_CONTROL' .
:ROUTE_2_5_2_10 a owl:NamedIndividual, x3do:ROUTE ;
  x3do:hasParent :ProtoBody_2_5_2 ;
  x3do:fromField 'reverseOffset' ;
  x3do:fromNode 'BEAM_CALCULATE' ;
  x3do:toField 'translation' ;
  x3do:toNode 'BEAM_CONTROL' .
:Anchor_2_6 a owl:NamedIndividual, x3do:Anchor ;
  x3do:hasParent :Scene ;
  x3do:hasChildren :Shape_2_6_1, :Shape_2_6_2 ;
  x3do:description 'Beam Cone Example' ;
  x3do:url '"BeamConeExample.x3d" "https://savage.nps.edu/Savage/CommunicationsAndSensors/Beam/BeamConeExample.x3d" "BeamConeExample.wrl" "https://savage.nps.edu/Savage/CommunicationsAndSensors/Beam/BeamConeExample.wrl"' .
:Shape_2_6_1 a owl:NamedIndividual, x3do:Shape ;
  x3do:hasParent :Anchor_2_6 ;
  x3do:hasAppearance :Appearance_2_6_1_1 ;
  x3do:hasGeometry :Text_2_6_1_2 .
:Appearance_2_6_1_1 a owl:NamedIndividual, x3do:Appearance ;
  x3do:hasParent :Shape_2_6_1 ;
  x3do:hasMaterial :Material_2_6_1_1_1 .
:Material_2_6_1_1_1 a owl:NamedIndividual, x3do:Material ;
  x3do:hasParent :Appearance_2_6_1_1 ;
  x3do:diffuseColor ( 0 1 1 ) ;
  x3do:emissiveColor ( 0 1 1 ) .
:Text_2_6_1_2 a owl:NamedIndividual, x3do:Text ;
  x3do:hasParent :Shape_2_6_1 ;
  x3do:hasFontStyle :FontStyle_2_6_1_2_1 ;
  x3do:string '"BeamConePrototype" "is a Prototype definition file." "" "To see an example scene" "click this text and view" "BeamConeExample."' .
:FontStyle_2_6_1_2_1 a owl:NamedIndividual, x3do:FontStyle ;
  x3do:hasParent :Text_2_6_1_2 ;
  x3do:justify '"MIDDLE" "MIDDLE"' .
:Shape_2_6_2 a owl:NamedIndividual, x3do:Shape ;
  x3do:hasParent :Anchor_2_6 ;
  x3do:hasGeometry :Box_2_6_2_1 ;
  x3do:hasAppearance :Appearance_2_6_2_2 .
:Box_2_6_2_1 a owl:NamedIndividual, x3do:Box ;
  x3do:hasParent :Shape_2_6_2 ;
  x3do:size ( 11 6 .001 ) .
:Appearance_2_6_2_2 a owl:NamedIndividual, x3do:Appearance ;
  x3do:hasParent :Shape_2_6_2 ;
  x3do:hasMaterial :Material_2_6_2_2_1 .
:Material_2_6_2_2_1 a owl:NamedIndividual, x3do:Material ;
  x3do:hasParent :Appearance_2_6_2_2 ;
  x3do:transparency 1 .