Hi Lakshmi -
Here you go, this inverts and also preserves none alpha characters
out::flip_case(in) = begin
let string(1)[int] flip_vec = reinterpret_as(string(1),in);
let string(1)[int] flipped_vec = allocate_with_nulls();
for ( let i= 0, i < length_of(flip_vec))
begin
if ((flip_vec) member [ vector “A”,“B”,“C”,“D”,“E”,“F”,“G”,“H”,“I”,“J”,“K”,“L”,“M”,“N”,“O”,“P”,“Q”,“R”,“S”,“T”,“U”,“V”,“W”,“X”,“Y”,“Z” ] )
begin
flipped_vec = vector_append(flipped_vec, string_downcase(flip_vec));
end
else if ((flip_vec) member [ vector “a”,“b”,“c”,“d”,“e”,“f”,“g”,“h”,“i”,“j”,“k”,“l”,“m”,“n”,“o”,“p”,“q”,“r”,“s”,“t”,“u”,“v”,“w”,“x”,“y”,“z” ] )
begin
flipped_vec = vector_append(flipped_vec, string_upcase(flip_vec));
end
else flipped_vec = vector_append(flipped_vec, flip_vec);
end;
out :: string_join(flipped_vec,‘’);
end;
Cheers
Chris Day
c: +44 7930 909 297
p: +44 207 870 3390
h: www.intelligent-decision.com
L: https://uk.linkedin.com/in/chrisdaybusinessintelligence