CALL FIT( 1, 1, 1, 0.0, 1.0, 1) CALL FIT( 1, 3, 3, 0.0, 1.0, 1) CALL VECTIVE(1) s FocalPower zEnvelope xDispersion dp/p yDispersion xMeasured yMeasured Energy