diff --git a/Equipments/Pumps/Pumps_StartUp.f90 b/Equipments/Pumps/Pumps_StartUp.f90 index ed65ea6..172a580 100644 --- a/Equipments/Pumps/Pumps_StartUp.f90 +++ b/Equipments/Pumps/Pumps_StartUp.f90 @@ -9,12 +9,12 @@ subroutine Pumps_StartUp !>>>>>>>>>>>>>>>>>>>>>>> PUMP 1 <<<<<<<<<<<<<<<<<<<<<<<<<<< - PUMP(1)%FlowRatePerSTK = 7000.d0 ![bbl] !??????? motaghayere voroudi + PUMP(1)%FlowRatePerSTK = .04d0 ![bbl] !??????? motaghayere voroudi !PUMP(1)%FlowRatePerSTK = PUMP(1)%FlowRatePerSTK*0.0292d0 ![gpm] PUMP(1)%RateChange = 4.d0 ![stk/min2 ??] !??????? motaghayere voroudi PUMP(1)%Mech_Efficiency = PumpsSpecification%MudPump1MechanicalEfficiency ![dimensionless] !PUMP(1)%Vol_Efficiency = MudPump1VolumetricEfficiency !bayad hazf beshe ? - PUMP(1)%Max_Pressure = 600.d0 ![psi] !??????? motaghayere voroudi + PUMP(1)%Max_Pressure = 6000.d0 ![psi] !??????? motaghayere voroudi PUMP(1)%MaxSPM = PumpsSpecification%MudPump1Maximum ![spm] PUMP(1)%Trans_Ratio = 965.d0/PUMP(1)%MaxSPM PUMP(1)%time_step = 0.1d0 !?????? niaz hast ya na?? @@ -28,12 +28,12 @@ subroutine Pumps_StartUp !>>>>>>>>>>>>>>>>>>>>>>> PUMP 2 <<<<<<<<<<<<<<<<<<<<<<<<<<< - PUMP(2)%FlowRatePerSTK = 7000.d0 ![bbl] !??????? motaghayere voroudi + PUMP(2)%FlowRatePerSTK = .04d0 ![bbl] !??????? motaghayere voroudi !PUMP(2)%FlowRatePerSTK = PUMP(2)%FlowRatePerSTK*0.0292d0 ![gpm] PUMP(2)%RateChange = 4.d0 ![stk/min2 ??] !??????? motaghayere voroudi PUMP(2)%Mech_Efficiency = PumpsSpecification%MudPump2MechanicalEfficiency ![dimensionless] !PUMP(2)%Vol_Efficiency = MudPump2VolumetricEfficiency !bayad hazf beshe ? - PUMP(2)%Max_Pressure = 600.d0 ![psi] !??????? motaghayere voroudi + PUMP(2)%Max_Pressure = 6000.d0 ![psi] !??????? motaghayere voroudi PUMP(2)%MaxSPM = PumpsSpecification%MudPump2Maximum ![spm] PUMP(2)%Trans_Ratio = 965.d0/PUMP(2)%MaxSPM PUMP(2)%time_step = 0.1d0 !?????? niaz hast ya na?? @@ -48,12 +48,12 @@ subroutine Pumps_StartUp !!>>>>>>>>>>>>>>>>>>>>>>> PUMP 3 <<<<<<<<<<<<<<<<<<<<<<<<<<< - PUMP(3)%FlowRatePerSTK = 7000.d0 ![bbl] !??????? motaghayere voroudi + PUMP(3)%FlowRatePerSTK = .04d0 ![bbl] !??????? motaghayere voroudi !PUMP(3)%FlowRatePerSTK = PUMP(3)%FlowRatePerSTK*0.0292d0 ![gpm] PUMP(3)%RateChange = 4.d0 ![stk/min2 ??] !??????? motaghayere voroudi PUMP(3)%Mech_Efficiency = PumpsSpecification%CementPumpMechanicalEfficiency ![dimensionless] !PUMP(3)%Vol_Efficiency = CementPumpVolumetricEfficiency !bayad hazf beshe ? - PUMP(3)%Max_Pressure = 600.d0 ![psi] !??????? motaghayere voroudi + PUMP(3)%Max_Pressure = 6000.d0 ![psi] !??????? motaghayere voroudi PUMP(3)%MaxSPM = PumpsSpecification%CementPumpMaximum ![spm] PUMP(3)%Trans_Ratio = 965.d0/PUMP(3)%MaxSPM PUMP(3)%time_step = 0.1d0 !?????? niaz hast ya na??