Simulation Core
Nelze vybrat více než 25 témat Téma musí začínat písmenem nebo číslem, může obsahovat pomlčky („-“) a může být dlouhé až 35 znaků.
 
 
 
 
 
 

16 řádky
530 B

  1. module sROP_Variables
  2. implicit none
  3. TYPE, PUBLIC :: ROPInfo
  4. real(8) :: WeightOnBit , RotarySpeed , MudDensity , FormationMudDensity , MudViscosity , MudFlowrate, BitFlowrate , DrillingVerticalDepth
  5. real(8) :: BitWearing , RateOfPenetration, BitTorque , ECD , BottomHolePressure
  6. real(8) :: BearingWear , JetImpactForce
  7. real(8) :: OldROPDepth , OldROPValue(4) , SetROPGauge
  8. integer :: NoOfFormations
  9. END TYPE ROPInfo
  10. TYPE(ROPInfo) :: ROP_Bit
  11. end module sROP_Variables