my_model(x[3], a[1])
{
array vect[18];
array S[6];

vect = [-5.0, 0.0, 0.0,
        5.0, 0.0, 0.0, 
        0.0, -5.0, 0.0,
        0.0, 5.0, 0.0,
        0.0, 0.0, -5.0,
        0.0, 0.0, 5.0];

S =  [0.6, 0.6, 0.6, 0.6, 0.6, 0.6];

mypoint = hfConvPoint(x,vect,S,0.05);

my_model = mypoint;
}