## template = instance
#buffermode ( "logtalk" )
#prompt ( "Instance name:" $instancename )
#prompt ( "Classes (comma separated):" $classes )
:- object($instancename,
instantiates($classes)).
#prompt ( "Version:" $version "1.0" )
#prompt ( "Author name:" $authorname )
#prompt ( "Comment:" $comment )
#today ( $date "yyyy/MM/dd" )
:- info([
version is $version,
author is '$authorname',
date is $date,
comment is '$comment']).
#caret ()
:- end_object.