def vmax(SCL) :
    """ Compute maximum sustainable speed"""
    #A = 0.26
    #B = -1.12
    #Vmax = SCL * A * SCL**B # A et B sont obtenus par reeression lineaire à 
                            # partir des données de M. Abecassis.
    
    Vmax = 3.5e4*2.7*SCL/86400
    return Vmax