conccalc.f90 18.4 KB