IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Fortran Discussion :

Maillage à 3D


Sujet :

Fortran

  1. #1
    Membre à l'essai
    Inscrit en
    Février 2007
    Messages
    21
    Détails du profil
    Informations forums :
    Inscription : Février 2007
    Messages : 21
    Points : 10
    Points
    10
    Par défaut Maillage à 3D
    Bonjour,
    j'ai à écrire un programme qui fait le maillage dans une geométrie cylindrique à 3dimensions, mais lors de l'exécution j'obtiens les messages suivants :
    error LNK2001: unresolved external symbol _ZK@12
    fatal error LNK1120: 1 unresolved externals
    Je suis débutant en Fortran et mon programme est le suivant :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    DIMENSION  XU(20,20,20),YV(20,20,20),ZW(20,20,20)
     
    		pi=3.1416
    		 ni=10;       nj=5;      nk=5             
           OPEN( 6, FILE='aa.DAT')
    	   xl=2.*pi; yl=0.5;  zl=2.;    zpwr=1.
    	   do 100 k=1,nk+1
    	   do 200 j=1,nj+1
    	   do 300 i=1,ni+1
    	   yr=yl*(j-1)/nj
    	   xx=xl*(i-1)/ni
    	   xu(i,j,k)=yr*cos(xx)
    	   yv(i,j,k)=xx*sin(xx)
    	   zw(i,j,k)=zl*((k-1)/nk)**zpwr
      300 	continue
      200	   continue
      100  continue
    	   do 110 i=1,ni+1
      110  write(*,*)xu(i,j,k)
           do 120 j=1,nj+1
       120 write(*,*) yv(i,j,k)
           do 130 k=1,nk+1
       130  write(*,*)zw(i,j,k)
     WRITE(40,405) xu(i,j,k),yv(i,j,k),zk(i,j,k)
     405      FORMAT(3(3X,1E15.7))   
              stop   
     
            end
    Merci d'avance

  2. #2
    Membre expérimenté
    Inscrit en
    Décembre 2004
    Messages
    1 478
    Détails du profil
    Informations forums :
    Inscription : Décembre 2004
    Messages : 1 478
    Points : 1 664
    Points
    1 664
    Par défaut
    Ben tu as un zk qui tombe du ciel
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
    WRITE(40,405) xu(i,j,k),yv(i,j,k),zk(i,j,k)
    J'imagine que tu voulais ecrire zw.

    Comme la variable zk n'est pas declaree, le compilateur suppose que c'est un appel de fonction, que l'editeur de lien ne trouve nul part. D'ou le unresolved external. C'est une maladresse de la syntaxe Fortran, malheureusement : l'acces a un element de tableau a la meme forme qu'un appel de fonction.

  3. #3
    Membre éclairé Avatar de genteur slayer
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Juin 2002
    Messages
    710
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Rhône (Rhône Alpes)

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Juin 2002
    Messages : 710
    Points : 825
    Points
    825
    Par défaut
    et je suppose que tu as oublié le 'implicit none' au départ, du coup le compilateur ne revoie par d'erreur car il interprète le zk comme un réel, cependant comme il y a une parenthèse devant et que tu n'a pas déclarré cela comme un tableau il interprète cela comme une fonction à valeur réelle. à l'edition de lien (LNK2001) il ne trouve nul part une fonction zk donc ERREUR...

    je pense aussi que tu as simplement fait une faute de frappe
    il n'y a que ceux qui savent qui ne savent pas qu'ils savent...
    Libere-toi hacker, GNU's Not Unix!!!

  4. #4
    Membre à l'essai
    Inscrit en
    Février 2007
    Messages
    21
    Détails du profil
    Informations forums :
    Inscription : Février 2007
    Messages : 21
    Points : 10
    Points
    10
    Par défaut
    oui je crois que j'ai fait une faute de frappe
    merci

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Génération de maillage automatique minimisant les triangles
    Par Akta3d dans le forum Algorithmes et structures de données
    Réponses: 9
    Dernier message: 13/09/2005, 20h53
  2. Maillage d'un objet 3D
    Par tigana dans le forum OpenGL
    Réponses: 6
    Dernier message: 02/06/2005, 18h27
  3. Lissage de maillages
    Par nicolas66 dans le forum Algorithmes et structures de données
    Réponses: 7
    Dernier message: 13/03/2005, 15h34
  4. aide en programmation opengl:maillage 3d de visage
    Par lisser dans le forum OpenGL
    Réponses: 4
    Dernier message: 15/05/2004, 00h25
  5. visualisation d'un maillage
    Par pcarnal dans le forum OpenGL
    Réponses: 2
    Dernier message: 23/04/2004, 19h40

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo