First Demo

преди 1 година · efd7fb57ae
--- a/TorqueDrag/TD_DrillingSubs/TD_DrillStemConfiguration.f90
+++ b/TorqueDrag/TD_DrillingSubs/TD_DrillStemConfiguration.f90
@@ -227,13 +227,6 @@ subroutine TD_DrillStemConfiguration
   End Do
   Call Set_NearFloorConnection(real(data%State%TD_String%NearFloorConnectionHeight))
   
   
   
   
   
   
   
   
 !=====> Graphic Output
   kk = 0
   k  = 0
--- a/TorqueDrag/TD_DrillingSubs/TD_DrillStemConfiguration.i90
+++ b/TorqueDrag/TD_DrillingSubs/TD_DrillStemConfiguration.i90
@@ -228,13 +228,6 @@ subroutine TD_DrillStemConfiguration
   End Do
   Call Set_NearFloorConnection(real(data%State%TD_String%NearFloorConnectionHeight))
   
   
   
   
   
   
   
   
 !=====> Graphic Output
   kk = 0
   k  = 0