head	1.1;
access;
symbols;
locks
	jonh:1.1; strict;
comment	@// @;


1.1
date	2000.04.10.00.25.13;	author jonh;	state Exp;
branches;
next	;


desc
@@


1.1
log
@Initial revision
@
text
@function str = collapse(str)
% turn this_that_other into thisThatOther
unders = find(str == '_')+1;
str(unders) = str(unders) - (str(unders)>='a' & str(unders)<='z')*('a'-'A');
str = str(find(str ~= '_'));
@
