implicitnone
warn
を参照してください。