# 1 "/mnt/c/Projects/VSIM/SimulationCore2/Equipments/TopDrive/TopDrive_Outputs.f90" Subroutine TopDrive_Outputs use SimulationVariables use CTopDrivePanelVariables use SimulationVariables IMPLICIT NONE data%Equipments%TopDrivePanel%TopDriveTdsPowerLed = data%State%TDS%PowerLed data%Equipments%TopDrivePanel%TopDriveOperationFaultLed = data%State%TDS%OperationFaultLed !data%State%TDS%Speed ! to other modules ![RPM] data%Equipments%TopDrivePanel%TopDriveRpmGauge = data%State%TDS%RpmGaugeOutput ![RPM] data%Equipments%TopDrivePanel%TopDriveTorqueGauge = data%State%TDS%TorqueGaugeOutput ![ft.lbf] !data%State%TDS%SoundBlower !data%State%TDS%RPMUnityOutput End Subroutine TopDrive_Outputs