# execution-time routine common areas

   integer Connect (MAXNODES, MAXNODES)   # connectivity matrix

   common /execcm/ Connect

# end common areas