Bonjour,
J'essaye d'utiliser la commande wc dans un elseif pour compter le nbre de ligne d'un fichier mnt.dat
G77 me signale une erreur et ne compile pas
"wc n'est pas reconnu comme commande interne"
Voici mon code:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
 
elseif(npmesuretopo.lt.0) then
open(1,file='mnt.dat',status='unknown')
call system('wc mnt.dat > tt')
open(26,file='tt',status='old')
read(26,*) npmesuretopo
close(26)
do kk=1,npmesuretopo
if(mod(kk,41).eq.0) then
read(1,'()')
else
read(1,*) xvptopo(kk),yvptopo(kk),hautpt(kk)
endif
La commande unix wc fonctionne t-elle en f77 ?
Qqn saurait comment l'utiliser en bonne et due forme ?
D'avance merci
@+

Piklas