added model like earthorigindiffuses.lisp but without any earth origin propns.