optimisation/src/ecriture_materiau.cpp

//Fonction pour l'écriture dans une chaîne de caractère de la définition
//d'un materiau avec quatre paramètres: E, nu, rho
//et le numéro du matériau égal au numéro du groupe de mailles associé

#include <stdio.h>
#include "bib_0000.h"
#include "write_num.h"

void ecriture_materiau(ulong num, vifl E, vifl nu, vifl rho, char *materiau)
{

  char buffer[1000];
  char NUM_str[50];
  char E_str[50];
  char NU_str[50];
  char RHO_str[50];

  write_num(num, NUM_str);
  sprintf(  E_str, "%e" ,   E);
  sprintf( NU_str, "%0.2lf",  nu);
  sprintf(RHO_str, "%e" , rho);

  sprintf(buffer, "MA_%s=DEFI_MATERIAU(ELAS=_F(E = %s, NU = %s, RHO= %s,),);",NUM_str,E_str,NU_str,RHO_str);
  sprintf(materiau, "%s",buffer);
}
Revision:	199
Committed:	Tue Jul 21 15:00:12 2009 UTC (15 years, 9 months ago) by picher
File size:	712 byte(s)
Log Message:	Projet d'optimisation
#	User	Rev	Content
1	picher	199	//Fonction pour l'écriture dans une chaîne de caractère de la définition
2			//d'un materiau avec quatre paramètres: E, nu, rho
3			//et le numéro du matériau égal au numéro du groupe de mailles associé
4
5			#include <stdio.h>
6			#include "bib_0000.h"
7			#include "write_num.h"
8
9			void ecriture_materiau(ulong num, vifl E, vifl nu, vifl rho, char *materiau)
10			{
11
12			char buffer[1000];
13			char NUM_str[50];
14			char E_str[50];
15			char NU_str[50];
16			char RHO_str[50];
17
18			write_num(num, NUM_str);
19			sprintf( E_str, "%e" , E);
20			sprintf( NU_str, "%0.2lf", nu);
21			sprintf(RHO_str, "%e" , rho);
22
23			sprintf(buffer, "MA_%s=DEFI_MATERIAU(ELAS=_F(E = %s, NU = %s, RHO= %s,),);",NUM_str,E_str,NU_str,RHO_str);
24			sprintf(materiau, "%s",buffer);
25			}