Fortran

Tu bom prikazal standardne posebnosti v Fortranu, ki jih boste s pridom uporabili pri programiranju. Priporoca se tipkanje programa z malimi crkami, saj je tako kodiran program bolj citljiv.

Formatni stavek v funkciji write

   character ime*65
   write(*, '('' Ime vhodne datoteke: '',$)')
   read(*,'(A)') ime

Pri vseh branjih in pisanjih se lahko testira napaka ob konverziji ali napaka na vhodno/izhodno enoti s parametrom err. Primer:

    ...
    read(line(6:80), '(I10)', err=102) lines
    ...
    return
102 stop 'Napaka pri branju parametra lines!'
    end

Fortran omogoca pisanje in branje v svoje interne enote v obliki character polja. To nam omogoca pretvarjanje numericnih spremenljivk v znakovne. Najveckrat se to uporablja za podprograme, ki zahtevajo kot parameter znakovno spremenljivko, na voljo pa imamo le numericno spremenljivko. Tipicen primer uporabe je izpis teksta v jeziku GKS. Primer:

      character cnode*3
      integer node
      ...
      write(cnode, '(I3)') node
      call gtx(x, y, cnode)
      ...
      end

• Spolsna priporocila za delo