adj_mod - Simple adjnull function
call adjnull(adj,add,x,y)
Standard operator parameters
Erases output if add=.false.
geef90