Selaa lähdekoodia

DS of Tarmigh Added

najafi
mahmood19227 1 vuosi sitten
vanhempi
commit
451aa39cdc
1 muutettua tiedostoa jossa 6 lisäystä ja 6 poistoa
  1. +6
    -6
      Equipments/Pumps/Pumps_StartUp.f90

+ 6
- 6
Equipments/Pumps/Pumps_StartUp.f90 Näytä tiedosto

@@ -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??


Ladataan…
Peruuta
Tallenna