[Gambas-user] Math Operation

[Tobias Boege]

On Thu, 04 May 2017, cheikh diabang wrote:
> hello. i have write this code below on gambas 3.9.2 and when i run that, he indique syntaxe error
> 
> 
> Function calcul_coefficients(x As Integer, y As Integer, degre As Integer) As Float
>   'Dim ak As Float
>   Dim a As Float
>   Dim b As Float
>   Dim c As Float
>   Dim nbr_coef As Integer
>   Dim k As Integer
> 
>   nbr_coef = degre + 1
>    For k = 0 To degre
>     If k == 0
>     'ak = (nbr_coef ^ k * ((x ^ (2(1 / (k + 1)))) * y) - (x * (y * (x ^ (- (k - 1)))))) / ((nbr_coef * x ^ 2) - ((x) ^ 2))
>       c = (nbr_coef ^ k * ((x ^ (2(1 / (k + 1)))) * y) - (x * (y * (x ^ (- (k - 1)))))) / ((nbr_coef * x ^ 2) - ((x) ^ 2))
>     Else If k == 1
>       b = ((nbr_coef ^ k) * ((x ^ (2(1 / (k + 1)))) * y) - (x * (y * (x ^ (- (k - 1)))))) / ((nbr_coef * x ^ 2) - ((x) ^ 2))
>     Else If k == 2
>       a = ((nbr_coef ^ k) * ((x ^ (2(1 / (k + 1)))) * y) - (x * (y * (x ^ (- (k - 1)))))) / ((nbr_coef * x ^ 2) - ((x) ^ 2))
>     Else
>       Message.Info("unavalaible coefficients")
>    Next
>    Return a, b, c
> End
> 
> 
> But i see nothing as error. I need help please

Look closer:

>       a = ((nbr_coef ^ k) * ((x ^ (2(1 / (k + 1)))) * y) - (x * (y * (x ^ (- (k - 1)))))) / ((nbr_coef * x ^ 2) - ((x) ^ 2))
>       2(1 / (k + 1))

Since "2" is not a function, you have to write

  2*(1 / (k + 1))

Regards,
Tobi

-- 
"There's an old saying: Don't change anything... ever!" -- Mr. Monk