& gvdwc(3,maxres),gelc(3,maxres),gelc_long(3,maxres),
& gvdwpp(3,maxres),gvdwc_scpp(3,maxres),
& gradx_scp(3,maxres),gvdwc_scp(3,maxres),ghpbx(3,maxres),
& gvdwc(3,maxres),gelc(3,maxres),gelc_long(3,maxres),
& gvdwpp(3,maxres),gvdwc_scpp(3,maxres),
& gradx_scp(3,maxres),gvdwc_scp(3,maxres),ghpbx(3,maxres),