changed *_clarr(0) to default index assigned by larr_set and stored in p1_larr(_?CurveRef)