This routine simplifies a FrameSet by adding a copy of the Current Frame into it, using a simplified version of the Mapping from Base to Current Frame. The new Frame becomes the Current Frame.

This routine should be called before doing any plotting with a Plot (remember, a Plot is a FrameSet) in order to avoid the possiblity of intermediate Frames being used in which positions are undefined.

Care should be taken decding where to call this routine since the simplification process can be expensive. Do not call it within a deep nested loop!

CALL KPG1_ASSIM( IWCS, STATUS )

IWCS = INTEGER (Given)

STATUS = INTEGER (Given and Returned)