Partage de codes sources - CodesWall.info
C
> Molecule
Titre
Molecule
Postée le
18-04-2010
Affichée
424
Mini-lien
Description
Extration d'un fichier xyz de molecules
Etat
Inconnu.
Code d'insertion
Options
Tweet
Téléchargement
#include <stdio.h>
#include <stdlib.h>
struct
Molecule
{
char
type;
float
x, y, z;
int
appartenance;
float
charge, vdw_r, vdw_e;
}
;
void
affiche
(
Molecule
*
molecule
)
{
printf
(
"%c %f %f %f %d %f %f %f
\n
"
,molecule
-
>type,molecule
-
>x,molecule
-
>y,molecule
-
>z, molecule
-
>appartenance,molecule
-
>charge,molecule
-
>vdw_r,molecule
-
>vdw_e
)
;
}
int
main
(
int
argc,
char
**
argv
)
{
int
i, nb_ato_tot;
Molecule
*
molecule;
FILE
*
h2o_h2o
=
fopen
(
"h2o_h2o.xyz"
,
"r"
)
;
if
(
h2o_h2o
)
{
fscanf
(
h2o_h2o,
"%d
\n
\n
"
,
&
nb_ato_tot
)
;
molecule
=
(
Molecule
*
)
malloc
(
nb_ato_tot
)
;
for
(
i
=
0
;i<nb_ato_tot;i
++
)
{
fscanf
(
h2o_h2o,
"%c %f %f %f %d %f %f %f
\n
"
,
&
molecule
[
i
]
.
type
,
&
molecule
[
i
]
.
x
,
&
molecule
[
i
]
.
y
,
&
molecule
[
i
]
.
z
,
&
molecule
[
i
]
.
appartenance
,
&
molecule
[
i
]
.
charge
,
&
molecule
[
i
]
.
vdw_r
,
&
molecule
[
i
]
.
vdw_e
)
;
affiche
(
&
molecule
[
i
]
)
;
}
//chargement=1;
printf
(
"%s
\n
\n
"
,
"Chargement depuis le fichier h2o_h2o.xyz reussi !"
)
;
}
else
{
printf
(
"%s
\n
\n
"
,
"Impossible de lire le fichier h2o_h2o.xyz !"
)
;
}
fclose
(
h2o_h2o
)
;
return
0
;
}
Postez votre code-source
Informations
Catégorie *
-
Php
javascript
CSS
HTML
Xml
Perl
C
C++
Java
VB.Net
Script Batch
C#.Net
Visual Basic
VBA
Shell
mIRC
Latex
OCaml
pascal
MySQL
MatLab
Fichier .ini
SmallTalk
Autre
Titre *
(50 car. max)
Description *
(200 car. max)
Le code
Fonctionne
Ne fonctionne pas
Je ne sais pas
Source
* : Champs obligatoires
Fermer
Accueil
Poster
Actualités
Règles
Contact
Partenaires
Infos / Aide
Php
(58)
javascript
(35)
CSS
(20)
HTML
(16)
Xml
(17)
Perl
(11)
C
(64)
C++
(51)
Java
(48)
VB.Net
(5)
Script Batch
(8)
C#.Net
(4)
Visual Basic
(6)
VBA
(5)
Shell
(10)
mIRC
(3)
Latex
(6)
OCaml
(4)
pascal
(9)
MySQL
(13)
MatLab
(3)
Fichier .ini
(5)
SmallTalk
(1)
Autre
(17)
\n
Forum informatique