#!/bin/sh

find $1 -type f -exec identify {}\; | awk '
/ GIF / && /\+[0-9]*\+[0-9]* /	{printf("rm -f \"%s\"\n",$1);}
/ JPEG / && /\+[0-9]*\+[0-9]* /	{printf("rm -f \"%s\"\n",$1);}
/ [0-9][0-9]x[1-9][0-9]/	{printf("rm -f \"%s\"\n",$1);}
/ 1[0-3][0-9]x[1-9][0-9]/	{printf("rm -f \"%s\"\n",$1);}
/[0-9][0-9]x[0-9][0-9] /	{printf("rm -f \"%s\"\n",$1);}
/[0-9][0-9]x1[0-3][0-9] /	{printf("rm -f \"%s\"\n",$1);}
'|sed 's/\.gif\[[0-9]*\]/.gif/;s/\.jpg\[[0-9]*\]/.jpg/'|uniq