Simulation Core
Nevar pievienot vairāk kā 25 tēmas Tēmai ir jāsākas ar burtu vai ciparu, tā var saturēt domu zīmes ('-') un var būt līdz 35 simboliem gara.
 
 
 
 
 
 

16 rindas
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