{; ******************************************************* AC-FRL-KB.LSP }

(FASSERT THING
         (CLASSIF                 ($VALUE  (GENERIC)))
)

(DEFRAME Requirements 
	 (CLASSIF                 ($VALUE  (GENERIC)))
	 (TYPE                    ($VALUE  (THING)))
	 (InstanceNameGenerator   ($VALUE  (Requirements:001)))
	 (CurrentlyActiveInstance ($VALUE  (Requirements:001)))
	 (EnvelopeLength         ($DEFAULT (7.83))
			   ($DESCRIPTION ("Envelope length")))
	 (EnvelopeHeight         ($DEFAULT (1.5))
			   ($DESCRIPTION ("Envelope height")))
	 (EnvelopeWidth          ($DEFAULT (1.75))
			   ($DESCRIPTION ("Envelope width")))
	 (MaxTemperature         ($DEFAULT (250))
			   ($DESCRIPTION ("Maximum operating temperature")))
	 (OperatingMedium        ($DEFAULT (Air))
			   ($DESCRIPTION ("Operating medium")))
	 (OperatingPressureMax   ($DEFAULT (60))
			   ($DESCRIPTION ("Maximum operating pressure")))
	 (OperatingPressureMin   ($DEFAULT (30))
			   ($DESCRIPTION ("Minimum operating pressure")))
	 (RodLoad                ($DEFAULT (1.4))
			   ($DESCRIPTION ("Load on Rod")))
	 (Stroke                 ($DEFAULT (1.75))
			   ($DESCRIPTION ("Length of stroke")))
	 (RodThreadType          ($DEFAULT (UNF24))
			   ($DESCRIPTION ("Type of thread on Rod")))
	 (RodThreadLength        ($DEFAULT (1.031))
			   ($DESCRIPTION ("Length of thread on Rod")))
	 (RodDiameter            ($DEFAULT ((LNGTH 0.312 0.0 2.e-3)))
			   ($DESCRIPTION ("Rod diameter")))
	 (Environment            ($DEFAULT (Corrosive))
			   ($DESCRIPTION ("Nature of environment")))
	 (Quality                ($DEFAULT (Reliable))
			   ($DESCRIPTION ("Desired quality for Air-cylinder")))
	 (MountingScrewSize      ($DEFAULT ((LNGTH 0.19 5.e-3 5.e-3)))
			   ($DESCRIPTION ("Mounting Screw Size")))
	 (MountingHoleToHole     ($DEFAULT ((LNGTH 0.625 5.e-3 5.e-3)))
			   ($DESCRIPTION ("Distance between mounting holes")))
	 (MaxFaceToMountingHoles ($DEFAULT ((LNGTH 0.31 5.e-3 5.e-3)))
			   ($DESCRIPTION ("Distance between the end face of the Head and the axis of the mounting holes")))
	 (MTBF                   ($DEFAULT (100000))
			   ($DESCRIPTION ("Mean time between failure")))
	 (AirInletDiameter       ($DEFAULT (0.374))
			   ($DESCRIPTION ("Air inlet diameter")))
)


(DEFRAME Component
         (CLASSIF  ($VALUE (GENERIC)))
	 (TYPE     ($VALUE (THING)))
)

(DEFRAME Head 
         (CLASSIF  ($VALUE (GENERIC)))
	 (TYPE     ($VALUE (Component)))
	 (InstanceNameGenerator   ($VALUE (Head:000)))
	 (CurrentlyActiveInstance ($VALUE ))
	 (HeadWidth)
	 (HeadDepth)
	 (HeadHeight)
	 (HeadMaterial)
	 (HeadScrewSize)
	 (HeadCenterCenterDistance)
	 (HeadMountingHoleDiameter)
	 (HeadCounterSinkDiameter   ($VALUE ((LNGTH 0.37 1.e-2 1.e-2))))
	 (HeadMaxHtoFDistance)
	 (HeadMountingHolesToFaceDistance)
	 (HeadWiperSeatDepth)
	 (HeadWiperSeatDiameter)
	 (HeadWiperType             ($DEFAULT (UCup)) )
	 (HeadAirHoleToSideDistance)
	 (HeadAirHoleToFaceDistance)
	 (HeadAirHoleDepth)
	 (HeadAirHoleDiameter)
	 (HeadAirCavityID)
	 (HeadAirCavityOD)
	 (HeadAirCavityDepth)
	 (HeadTRHCenterCenterDistance)
	 (HeadTRHDepth)
	 (HeadTRHDiameter)
	 (HeadBearingThickness)
	 (HeadBearing1Length)
	 (HeadBearing2Length)
	 (HeadSealSeatWidth     ($VALUE ((LNGTH 0.125 5.e-3 5.e-3))))
	 (HeadSealSeatToFaceDistance)
	 (HeadSealSeatDiameter)
	 (HeadTubeSeatID)
	 (HeadTubeSeatOD)
	 (HeadTubeSeatDepth)
)

(DEFRAME Rod 
	 (CLASSIF   ($VALUE (GENERIC)))
	 (TYPE      ($VALUE (Component)))
	 (InstanceNameGenerator   ($VALUE (Rod:000)))
	 (CurrentlyActiveInstance ($VALUE ))
	 (RodDiameter)
	 (RodLength)
	 (RodThreadLength)
	 (RodThreadType)
	 (RodMaterial)
	 (RodPistonSeatDiameter)
	 (RodPistonSeatLength)
	 (RodEndOfRodToHead)
)

(DEFRAME Tube 
	 (CLASSIF   ($VALUE (GENERIC)))
	 (TYPE      ($VALUE (Component)))
	 (InstanceNameGenerator   ($VALUE (Tube:000)))
	 (CurrentlyActiveInstance ($VALUE ))
	 (TubeMaterial)
	 (TubeLength)
	 (TubeID)
	 (TubeOD)
	 (TubeChamferLength)
	 (TubeChamferAngle)
)

(DEFRAME Cap 
	 (CLASSIF   ($VALUE (GENERIC)))
	 (TYPE      ($VALUE (Component)))
	 (InstanceNameGenerator   ($VALUE (Cap:000)))
	 (CurrentlyActiveInstance ($VALUE ))
	 (CapMaterial)
	 (CapHeight)
	 (CapWidth)
	 (CapDepth)
	 (CapInternalDepth)
	 (CapInternalDiameter)
	 (CapTubeSeatDepth)
	 (CapTubeSeatID)
	 (CapTubeSeatOD)
	 (CapAirHoleDiameter)
	 (CapAirHoleCenterToBackDistance)
	 (CapAirHoleDepth)
	 (CapBackFaceThickness)
	 (CapTRtoTRDistance)
	 (CapTRDiameter)
	 (CapTRDepth)
	 (CapTRRecessDepth)
	 (CapTRRecessRadius)
	 (CapLargeChamferWidth)
	 (CapLargeChamferAngle)
	 (CapSmallChamferWidth)
	 (CapSmallChamferAngle)
)

(DEFRAME Piston 
	 (CLASSIF   ($VALUE (GENERIC)))
	 (TYPE      ($VALUE (Component)))
	 (InstanceNameGenerator   ($VALUE (Piston:000)))
	 (CurrentlyActiveInstance ($VALUE ))
	 (PistonDiameter)
	 (PistonMaterial)
	 (PistonThickness)
	 (PistonRodHole)
	 (PistonSpringSeatDepth)
	 (PistonSpringSeatID)
	 (PistonSpringSeatOD)
	 (PistonSealType)
	 (PistonSealSeatDiameter)
	 (PistonSealSeatWidth)
	 (PistonSealSeatPosition)
	 (PistonBreakawayCutDiameter)
	 (PistonBreakawayCutDepth)
	 (PistonNotchCount)
	 (PistonNotchWidth)
	 (PistonNotchDepth)
	 (PistonBrazeSeatDepth)
	 (PistonBrazeSeatDiameter)
)

(DEFRAME Bumper 
	 (CLASSIF    ($VALUE (GENERIC)))
	 (TYPE       ($VALUE (Component)))
	 (InstanceNameGenerator   ($VALUE (Bumper:000)))
	 (CurrentlyActiveInstance ($VALUE ))
	 (BumperMaterial)
	 (BumperLength)
	 (BumperID)
	 (BumperOD)
	 (BumperFlangeDiameter)
	 (BumperFlangeThickness)
)

(DEFRAME Spring 
	 (CLASSIF   ($VALUE (GENERIC)))
	 (TYPE      ($VALUE (Component)))
	 (InstanceNameGenerator   ($VALUE (Spring:000)))
	 (CurrentlyActiveInstance ($VALUE ))
	 (SpringMaterial)
	 (SpringOD        ($VALUE (0.985)))
	 (SpringID        ($VALUE (0.77)))
	 (SpringWireDiameter)
	 (SpringFreeLength)
	 (SpringCompressedLength)
	 (SpringInstalledLength)
	 (SpringLoad)
	 (SpringNumberOfCoils)
	 (SpringDeflectionPerCoil)
)

(DEFRAME BodySeal 
	 (CLASSIF   ($VALUE (GENERIC)))
	 (TYPE      ($VALUE (Component)))
	 (InstanceNameGenerator   ($VALUE (BodySeal:000)))
	 (CurrentlyActiveInstance ($VALUE ))
	 (BodySealOD)
	 (BodySealID)
	 (BodySealMaterial)
	 (BodySealThickness ($VALUE (2.8e-2)))
)

(DEFRAME TieRod 
	 (CLASSIF       ($VALUE (GENERIC)))
	 (TYPE          ($VALUE (Component)))
	 (InstanceNameGenerator   ($VALUE (TieRod:000)))
	 (CurrentlyActiveInstance ($VALUE ))
	 (TieRodMaterial)
	 (TieRodDiameter)
	 (TieRodLength)
	 (TieRodThreadLength)
	 (TieRodHeadDiameter  ($VALUE (0.3125)))
	 (TieRodHeadThickness ($VALUE (0.25)))
)

{; --------------------------------------------------------------------}


(DEFRAME Material
         (CLASSIF ($VALUE (GENERIC)))
	 (TYPE    ($VALUE (THING)))
)

(DEFRAME StainlessSteel 
	 (CLASSIF ($VALUE (GENERIC)))
	 (TYPE ($VALUE (Material)))
	 (InstanceNameGenerator   ($VALUE (StainlessSteel:000)))
	 (CurrentlyActiveInstance ($VALUE ))
	 (MinThickness ($VALUE (6.25e-2)))
)

(DEFRAME Brass 
	 (CLASSIF ($VALUE (GENERIC)))
	 (TYPE ($VALUE (Material)))
	 (InstanceNameGenerator   ($VALUE (Brass:000)))
	 (CurrentlyActiveInstance ($VALUE ))
	 (MinThickness ($VALUE (7.8e-2)))
)

(DEFRAME Aluminum 
	 (CLASSIF ($VALUE (GENERIC)))
	 (TYPE ($VALUE (Material)))
	 (InstanceNameGenerator   ($VALUE (Aluminum:000)))
	 (CurrentlyActiveInstance  ($VALUE ))
	 (MinThickness ($VALUE (9.4e-2)))
)