[Fortran 77] La commande wc n'est pas reconnue comme commande interne
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:
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 :aie: