Module academic was not used.
Useful values for iflag_phys were only 0 and 1 so changed type to logical.
Definition of fmagic was duplicated in procedures alboc and alboc_cd
so moved it up to interfsurf_hq and also moved multiplication by
fmagic (following LMDZ).
|