SimulationCore2/TorqueDrag/TorqueDragMain.f90

MODULE TorqueDragMain
    use CPumpsVariables
    use CPumps
    use CDrillingConsoleVariables
    use SimulationVariables
    use SimulationVariables
    use CDataDisplayConsole
    use SimulationVariables
    ! USE CSimulationVariables
    use SimulationVariables
    IMPLICIT NONE
    PUBLIC
    CONTAINS
    
    ! subroutine TorqueDrag_Setup()
    !     use CSimulationVariables
    !     implicit none
    !     call OnSimulationInitialization%Add(TorqueDrag_Init)
    !     call OnSimulationStop%Add(TorqueDrag_Init)
    !     call OnTorqueDragStep%Add(TorqueDrag_Step)
    !     call OnTorqueDragOutput%Add(TorqueDrag_Output)
    !     call OnTorqueDragMain%Add(TorqueDragMainBody)
    ! end subroutine
    
    subroutine TorqueDrag_Init
        implicit none
    end subroutine TorqueDrag_Init
    
    subroutine TorqueDrag_Step
        implicit none
    end subroutine TorqueDrag_Step
    
    subroutine TorqueDrag_Output
        implicit none
    end subroutine TorqueDrag_Output
    
    
    ! SUBROUTINE TorqueDragMainBody
    !     ! USE ifport
    !     ! USE ifmt
    !     ! USE CSimulationVariables
    !     !USE TDSUP
    !     IMPLICIT NONE 
    !     !CALL TD_MainCalculations
    ! END SUBROUTINE TorqueDragMainBody

END MODULE TorqueDragMain