PRO eis_test_pointing

cmdpln = GETENV('CMDPLN')
IF (STRLEN(STRCOMPRESS(cmdpln,/REMOVE_ALL)) EQ 0) THEN BEGIN

    print,'++++++++++++++++++++++++++++++++++++++'
    print,''
    print,' No cmdpln directory found'
    print,''
    print,'++++++++++++++++++++++++++++++++++++++'
    RETURN

ENDIF

oo = OBJ_NEW("eis_test_pointing_gui")
oo->Realize
oo->XMANAGER

END