Skip to content

Maintenance/rinse.tl

  1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 30
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
 48
 49
 50
 51
 52
 53
 54
 55
 56
 57
 58
 59
 60
 61
 62
 63
 64
 65
 66
 67
 68
 69
 70
 71
 72
 73
 74
 75
 76
 77
 78
 79
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
# -   Copyright (c) 2026 MBARI
# -   MBARI Proprietary Information. Confidential. All Rights Reserved
# -   Unauthorized copying or distribution of this file via any medium is strictly
# -   prohibited.
# -
# -   WARNING - This file contains information whose export is restricted by the
# -   Export Administration Act of 1979 (Title 50, U.S.C., App. 2401 et seq.), as
# -   amended. Violations of these export laws are subject to severe civil and/or
# -   criminal penalties.

mission rinse {
  """
  ** ONLY TO BE RUN ON SHORE IN TANK ** Vehicle rinse in freshwater rinse tank. Runs elevators, rudders, thruster, and optionally CTD and UBAT.
  """

  arguments {
    MissionTimeout = 11 minute
      """
      Maximum duration of mission
      """

    RunUBAT = Science:WetLabsUBAT.loadAtStartup
      """
      If true, UBAT will be turned on
      """

    RunSeabird = Science:CTD_Seabird.loadAtStartup
      """
      If true, Seabird CTD will be turned on
      """

    CycleDuration = 10 second
      """
      Duration between switching from positive to negative actuation and vice versa
      """
  }

  timeout duration=MissionTimeout

  insert Insert/Science.tl

  insert Insert/BackseatDriver.tl

  insert Insert/PowerOnly.tl

  # optionally turn on the CTD
  assign in sequence Science:EnabledSeabird = RunSeabird

  # optionally turn on the UBAT
  assign in sequence Science:EnabledWetLabsUBAT = RunUBAT

  # turn on the UBAT pump
  behavior Guidance:Execute {
    run when ( RunUBAT )

    set command = "ubat on"
  }
  # TODO: turn on the CTD pump

  # maintain neutral buoyancy to submerge the vehicle just enough for rinsing
  behavior Guidance:Buoyancy {
    run in parallel

    set position = Control:VerticalControl.buoyancyNeutral
  }

  behavior Guidance:Pitch {
    run in parallel

    set depth = 0 meter
    set massPosition = Control:VerticalControl.massDefault
  }

  aggregate main {
    run in sequence repeat=30

    aggregate logSalinity {
      run when ( RunSeabird )

      # rinse tank should be out of range (fresh water), so the universal won't get written to; print salinity straight from Seabird
      syslog important "Rinse tank salinity: " + Science:CTD_Seabird.sea_water_salinity~practical_salinity_unit
    }

    aggregate positiveActuation {
      run in sequence

      behavior Guidance:SetSpeed {
        run in parallel

        set speed = 0.5 meter_per_second
      }

      behavior Guidance:Pitch {
        run in parallel

        set elevatorAngle = 13 degree
      }

      behavior Guidance:Point {
        run in parallel

        set rudderAngle = 13 degree
      }

      behavior Guidance:Wait {
        run in sequence

        timeout duration = CycleDuration
      }
    }

    aggregate negativeActuation {
      run in sequence

      behavior Guidance:SetSpeed {
        run in parallel

        set speed = -0.5 meter_per_second
      }

      behavior Guidance:Pitch {
        run in parallel

        set elevatorAngle = -13 degree

      }

      behavior Guidance:Point {
        run in parallel

        set rudderAngle = -13 degree
      }

      behavior Guidance:Wait {
        run in sequence

        timeout duration = CycleDuration
      }
    }
  }

  aggregate cleanUp {
    run in sequence
    # turn off the UBAT pump
    behavior Guidance:Execute {
      run in sequence

      set command = "ubat off"
    }
  }
}