Saving the values of local objects
Local entities within a procedure are not accessible from outside that procedure
Once an exit has been made, they cease to exist
If you want their values to ‘survive’ between calls, use
real, save :: list of real variables