HP SunSoft Pascal 4.0 Manuale Utente Pagina 223

  • Scaricare
  • Aggiungi ai miei manuali
  • Stampa
  • Pagina
    / 333
  • Indice
  • SEGNALIBRI
  • Valutato. / 5. Basato su recensioni clienti
Vedere la pagina 222
The FORTRAN–Pascal Interface 199
8
The Pascal main program,
SimValmain.p
program SimVal(output);
var
t: boolean := true;
f: boolean := false;
c: char := 'z';
i: integer := 9;
r: real := 9.9;
s: integer16 := 9;
args: integer;
procedure simval(t, f: boolean; c: char; i: integer;
r: real; s: integer16; var reply: integer);
external fortran;
begin
simval(t, f, c, i, r, s, args);
writeln('args=', args: 6 oct, ' (If nth digit=1, arg n OK.)')
end. { SimVal }
The commands to compile and
execute SimVal.f and
SimValmain.p
hostname% f77 -c SimVal.f
SimVal.f:
simval:
hostname% pc SimVal.o SimValmain.p -lpfc -lF77
hostname% a.out
args=111111 (If nth digit=1, arg n OK.)
Vedere la pagina 222
1 2 ... 218 219 220 221 222 223 224 225 226 227 228 ... 332 333

Commenti su questo manuale

Nessun commento