#include "MAPL_Generic.h" program sorad_driver !--------------------------------------------------------------------! ! purpose: driver for MPI-IO test module ! !--------------------------------------------------------------------! use MAPL_Mod use GEOS_SolarGridCompMod, only: SetServices implicit none integer :: status call MAPL_CAP(SetServices, rc=STATUS) end program sorad_driver