10normalForm([capsule(Capsule)]) :-
12 timestamp(TimeStamp), 13 exportPDDLDomainAndSave([ 14 templateDir('templates/'), 15 worldDir('worlds/'), 16 capsule(Capsule) 17 ]), 18 currentPlanner(Planner), 19 Extension = 'pddl', 20 atomic_list_concat(['worlds/',Capsule,'.d.',Extension],'',DomainFile), 21 atomic_list_concat(['worlds/',Capsule,'.p.',Extension],'',ProblemFile), 22 atomic_list_concat(['worlds/',Capsule,'.p.',Extension,'.',Planner,'.sol'],'',SolutionFile), 23 ( Planner = 'LPG' -> 24 ( atomic_list_concat(['lpg-td-1.0 -o ',DomainFile,' -f ', ProblemFile, ' -out ', SolutionFile,' -speed ; mv ',SolutionFile,'.SOL ',SolutionFile],'',Command) ) ; 25 ( Planner = 'OPTIC_CLP' -> 26 ( atomic_list_concat(['optic-clp -N ', DomainFile, ' ', ProblemFile, ' > ', SolutionFile],'',Command)) ; 27 true)), 28 view([command,Command]), 29 shell(Command)