parm noarray,nocheck
imp srce200_xgen27d,xgen27dy
parm opt
imp srce200_XCONTRl5b,xcontrl5by
imp srce200_FALLOC2a,falloc2ay
imp srce200_FANAL2a,fanal2ay
imp srce200_FARITH1,farith1y
imp srce200_FCINNUM2a,fcinnum2ay
imp srce200_fcode3,fcode3y
imp srce200_FDATA2,fdata2y
imp srce200_FEND3,fend3y
imp srce200_FGEN3,fgen3y
imp srce200_FINPUT3a,finput3ay
imp srce200_FMAP1,fmap1y
imp srce200_FMESS2,fmess2y
imp srce200_FOPTDUM1,foptdum1y
imp srce200_FREAL1b,freal1by
imp srce200_Froot1e,froot1ey
imp srce200_FTRIADS1,ftriads1y
imp srce200_FFPTOS1a,ffptos1ay
imp srce200_FCFMT1a,fcfmt1ay