SimulationCore2/TorqueDrag/TorqueDragMain.f90

MODULE TorqueDragMain
    USE CPumpsVariables
    USE CDrillingConsoleVariables
    USE CDataDisplayConsoleVariables
    ! use CSimulationVariables
    USE Pumps_VARIABLES
    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