version 1.16, 2011/03/06 16:44:12
|
version 1.17, 2011/03/17 21:20:45
|
Line 38
|
Line 38
|
void |
void |
instruction_p_vers_r(struct_processus *s_etat_processus) |
instruction_p_vers_r(struct_processus *s_etat_processus) |
{ |
{ |
|
double angle; |
|
|
struct_liste_chainee *l_element_courant; |
struct_liste_chainee *l_element_courant; |
struct_liste_chainee *l_element_precedent; |
struct_liste_chainee *l_element_precedent; |
|
|
Line 136 instruction_p_vers_r(struct_processus *s
|
Line 138 instruction_p_vers_r(struct_processus *s
|
return; |
return; |
} |
} |
|
|
|
angle = (*((struct_complexe16 *) (*s_objet_argument).objet)) |
|
.partie_imaginaire; |
|
|
if (test_cfsf(s_etat_processus, 60) == d_faux) |
if (test_cfsf(s_etat_processus, 60) == d_faux) |
{ |
{ |
conversion_degres_vers_radians(&((*((struct_complexe16 *) |
conversion_degres_vers_radians(&angle); |
(*s_objet_argument).objet)).partie_imaginaire)); |
|
} |
} |
|
|
(*((struct_complexe16 *) (*s_objet_resultat).objet)).partie_reelle = |
(*((struct_complexe16 *) (*s_objet_resultat).objet)).partie_reelle = |
(*((struct_complexe16 *) (*s_objet_argument).objet)) |
(*((struct_complexe16 *) (*s_objet_argument).objet)) |
.partie_reelle * cos((*((struct_complexe16 *) |
.partie_reelle * cos(angle); |
(*s_objet_argument).objet)).partie_imaginaire); |
|
(*((struct_complexe16 *) (*s_objet_resultat).objet)).partie_imaginaire = |
(*((struct_complexe16 *) (*s_objet_resultat).objet)).partie_imaginaire = |
(*((struct_complexe16 *) (*s_objet_argument).objet)) |
(*((struct_complexe16 *) (*s_objet_argument).objet)) |
.partie_reelle * sin((*((struct_complexe16 *) |
.partie_reelle * sin(angle); |
(*s_objet_argument).objet)).partie_imaginaire); |
|
} |
} |
|
|
/* |
/* |