Simulation Core
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

CPowerVariables.f90 424 B

1 year ago
1 year ago
12345678910111213141516
  1. module CPowerVariables
  2. implicit none
  3. public
  4. ! variables
  5. Type::PowerType
  6. integer :: NumberOfgenerators
  7. real(8) :: GeneratorPowerRating
  8. real(8) :: MudPump1
  9. real(8) :: MudPump2
  10. real(8) :: CementPump
  11. real(8) :: RotaryTable
  12. real(8) :: Drawworks
  13. real(8) :: TopDrive
  14. End type PowerType
  15. Type(PowerType)::Power
  16. end module CPowerVariables