A volte può essere utile per il trattamento di una matrice monodimensionale pensarla come una matrice bidimensionale e viceversa. Questa operazione è abbastanza semplice da fare nel Fortran 77, alcuni dicono che è troppo facile. Vediamo allora un esempio molto semplice. Un’altra operazione vettoriale di base è lo scaling, cioè moltiplicare ogni elemento di un vettore per una stessa costante. Ecco una subroutine che opera in tal senso:
subroutine scale(n, alpha, x) integer n real alpha, x(*) c c Local variables integer i do 10 i = 1, n x(i) = alpha * x(i) 10 continue return end
Link correlati all’argomento
- Elementi di calcolo numerico con il Fortran