open(11,file="angle.dat")
write(11,*) 'TITLE = " 2D mesh " '
write(11,*) 'VARIABLES = "X", "Y", "beta", "gamma" '
write(11,"(A,I3,A,I3,A)")' ZONE T="Yp" I=',nx,',J=',ny,',ZONETYPE=ORDERED, DATAPACKING=POINT'
Inscription à :
Publier les commentaires (Atom)
Aucun commentaire:
Enregistrer un commentaire