RosettaCodeData/Task/Flow-control-structures/Pop11/flow-control-structures-1.pop11

while condition1 do
   while condition2 do
      if condition3 then
         quitloop(2);
      endif;
   endwhile;
endwhile;