Discussion :

[Nicoleta Ionel]

Bonjour,

C'est pour la première fois quand j'utilise Fortran...et je dois faire une loi utilisateur Fortran pour l'air comme gaz réel, donc avec Van der Waals équation.
Si quelqu'un veut m'aider, je vous serais reconnaissante.
Bonne journée!


Hello,

It's the first time when i have to use Fortran and i have to do a material law for the air (like real gas), the Van der Waals equation.
If somebody can help me, i would be really faithfull.
Have a nice day!

[FR119492]

Salut!

i have to do a material law for the air

Comme tu as quelques problèmes avec la langue française, j'essaie de répondre au texte anglais de ta question, mais je n'arrive pas à voir ce que tu appelles "a material law", en français "une loi utilisateur". Est-ce un code calculant quelque chose en fonction de quelque chose d'autre en appliquant l'équation de Van der Waals?
Jean-Marc Blanc

[Nicoleta Ionel]

Bonjour,

Mon professeur m'a dit que je devais faire une 'loi de l'utilisateur" en Fortran. Elle devra être pour les gaz réels.
Parce que je travaille sur Radioss et je dois simuler la détonation d'un explosif dans l'air (air avec le comportement d'un gaz réel, et pas celui d'un gaz idéal).
Donc, je pense que je vais devoir calculer la pression en fonction du volume, avec l'aide de l'équation de Van der Waals.

Merci beaucoup

[FR119492]

Salut!

Mon professeur m'a dit que je devais faire une 'loi de l'utilisateur" en Fortran.

Signale à ton professeur que le Fortran est un langage de programmation destiné à résoudre des problèmes de calcul numérique et non à "faire des lois".
Jean-Marc Blanc

[François L.]

Si je comprends bien la question, tu cherches à coder une équation d'état (Equation of state) de type Van der Waals, P=f(v,T).

Bon, je suis pas fan de Van der Waals (je préfère utiliser Soave-Redlich-Kwong, mais ça ne changera guère la formulation), mais dans ce sens ça me paraît simple.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
FUNCTION PressVdW(v,T,a,b)
! a & b are gas specific
! v is molar volume
! T is absolute temperature
IMPLICIT NONE
REAL(8):: PressVdW, v, T
REAL(8):: a, b
REAL(8), PARAMETER: Rgas=8.314d0 ! Gas constant
 
PressVdW = Rgas*T/(v-b) -a/v**2
END FUNCTION

Ceci dit, si c'est pour être inclus dans un logiciel, il doit y avoir une formulation bien particulière décrite dans le guide du logiciel en question... Mais là, je crains qu'on ne puisse pas faire beaucoup plus

[Nicoleta Ionel]

Merci beaucoup pour l'aide, mais en fait, il semble que je doit faire ça pour le code radioss, qui utilise un starter subroutine et un engine subroutine. Donc, il est plus difficile que cela.
J'ai ouvert une nouvelle discussion : "loi utilisateur(user material law)". Si vous croyez que vous pourrez m'aider, dites-moi, s'il vous plait. Merci.
Bonne journee,
Nicoleta

[Leflix]

Bon j'imagine que ton problème est résolu depuis...mais ce que t'a répondu François est tout à fait la réponse que tu attendais...
Maintenant comment tu vas faire comprendre à radioss la nouvelle loi d'état que tu veux implémenter, là il faut voir dans la doc de radioss..
mais bon je suppose que maintenant tout est ok !