#define isdatum(D)		istype(D, /datum)
#define isweakref(A)	istype(A, /datum/weakref)

//#define islist(D)		istype(D, /list)	//Built in
#define isimage(thing) (istype(thing, /image))

GLOBAL_VAR_INIT(magic_appearance_detecting_image, new /image) // appearances are awful to detect safely, but this seems to be the best way ~ninjanomnom
#define isappearance(thing) (!isimage(thing) && !ispath(thing) && istype(GLOB.magic_appearance_detecting_image, thing))

// The filters list has the same ref type id as a filter, but isnt one and also isnt a list, so we have to check if the thing has Cut() instead
GLOBAL_VAR_INIT(refid_filter, TYPEID(filter(type="angular_blur")))
#define isfilter(thing) (!hascall(thing, "Cut") && TYPEID(thing) == GLOB.refid_filter)

#define isgenerator(A) (istype(A, /generator))

//---------------
#define isatom(D)		istype(D, /atom)
#define isclient(D)		istype(D, /client)

//---------------
//#define isobj(D)		istype(D, /obj)		//Built in

#define isitem(D)		istype(D, /obj/item)

#define isradio(A)		istype(A, /obj/item/radio)

#define isairlock(A)	istype(A, /obj/machinery/door/airlock)

#define isorgan(A)		istype(A, /obj/item/organ/external)

#define isstorage(A)	istype(A, /obj/item/storage)

#define ismecha(A)      istype(A, /obj/mecha)

#define isstructure(A)	istype(A, /obj/structure)

#define isdisposalpacket(A)	istype(A,/obj/structure/disposalholder)

//---------------
//#define isarea(D)		istype(D, /area)	//Built in

//---------------
//#define ismob(D)		istype(D, /mob)		//Built in
#define isliving(A)		istype(A, /mob/living)

#define isobserver(A)	istype(A, /mob/observer/dead)
#define isEye(A)		istype(A, /mob/observer/eye)

#define isnewplayer(A)	istype(A, /mob/new_player)

#define isanimal(A)		istype(A, /mob/living/simple_mob)
#define ispassive(A)	istype(A, /mob/living/simple_mob/animal/passive)
#define ismouse(A)		istype(A, /mob/living/simple_mob/animal/passive/mouse)
#define iscorgi(A)		istype(A, /mob/living/simple_mob/animal/passive/dog/corgi)
#define isslime(A)		istype(A, /mob/living/simple_mob/slime)
#define isxeno(A)		istype(A, /mob/living/simple_mob/animal/space/alien)
#define issimplekin(A)	istype(A, /mob/living/simple_mob/shadekin)
#define isprotblob(A)	istype(A, /mob/living/simple_mob/protean_blob)
#define ismetroid(A)	istype(A, /mob/living/simple_mob/metroid) //CHOMP Addition

#define iscarbon(A)		istype(A, /mob/living/carbon)
#define isalien(A)		istype(A, /mob/living/carbon/alien)
#define isbrain(A)		istype(A, /mob/living/carbon/brain)
#define ishuman(A)		istype(A, /mob/living/carbon/human)
#define ismannequin(A)	istype(A, /mob/living/carbon/human/dummy/mannequin)

#define issilicon(A)	istype(A, /mob/living/silicon)
#define isAI(A)			istype(A, /mob/living/silicon/ai)
#define isrobot(A)		istype(A, /mob/living/silicon/robot)
#define isshell(A)		istype(A, /mob/living/silicon/robot/ai_shell)
#define ispAI(A)		istype(A, /mob/living/silicon/pai)

#define isbot(A)		istype(A, /mob/living/bot)

#define isvoice(A)		istype(A, /mob/living/voice)

//---------------
//#define isturf(D)		istype(D, /turf)	//Built in
#define isopenspace(A)	istype(A, /turf/simulated/open)
#define isspace(A)		istype(A, /turf/space)
#define isopenturf(A)	(istype(A, /turf/simulated/open) || istype(A, /turf/space))
#define isnonsolidturf(A)	(istype(A, /turf/simulated/open) || istype(A, /turf/space) || istype(A, /turf/simulated/floor/water) || istype(A, /turf/simulated/floor/lava))
#define ismineralturf(A) istype(A, /turf/simulated/mineral)

#define istaurtail(A)	istype(A, /datum/sprite_accessory/tail/taur)
#define islongtail(A)	istype(A, /datum/sprite_accessory/tail/longtail)

// Diveable water
#define isdiveablewater(A)	istype(A, /turf/simulated/floor/water/deep/ocean/diving)

/// NaN isn't a number, damn it. Infinity is a problem too.
#define isnum_safe(x) ( isnum((x)) && !isnan((x)) && !isinf((x)) )

#define ismopable(A) (A && (A.plane <= OBJ_PLANE)) //If something can be cleaned by floor-cleaning devices such as mops or clean bots

#define isfloorturf(A) (istype(A, /turf/simulated/floor))