abcof_soc.F90 12.8 KB