~pmikkelsen/Squeak-euler

8da81dc7eb66358a4359115f7514b5b6bf6514d8 — Peter Mikkelsen 1 year, 17 days ago eb726c0
Solve problem 1
A src/.filetree => src/.filetree +2 -0
@@ 0,0 1,2 @@
{"propertyFileExtension" : ".json",
"packageExtension" : ".package" }
\ No newline at end of file

A src/Euler.package/.filetree => src/Euler.package/.filetree +4 -0
@@ 0,0 1,4 @@
{
	"noMethodMetaData" : true,
	"separateMethodMetaAndSource" : false,
	"useCypressPropertiesFile" : true }

A src/Euler.package/Problem.class/README.md => src/Euler.package/Problem.class/README.md +1 -0
@@ 0,0 1,1 @@
This class represents a project euler problem.
\ No newline at end of file

A src/Euler.package/Problem.class/methodProperties.json => src/Euler.package/Problem.class/methodProperties.json +5 -0
@@ 0,0 1,5 @@
{
	"class" : {
		 },
	"instance" : {
		 } }

A src/Euler.package/Problem.class/properties.json => src/Euler.package/Problem.class/properties.json +14 -0
@@ 0,0 1,14 @@
{
	"category" : "Euler",
	"classinstvars" : [
		 ],
	"classvars" : [
		 ],
	"commentStamp" : "pm 7/2/2023 21:41",
	"instvars" : [
		 ],
	"name" : "Problem",
	"pools" : [
		 ],
	"super" : "TestCase",
	"type" : "normal" }

A src/Euler.package/Problem1.class/README.md => src/Euler.package/Problem1.class/README.md +1 -0
@@ 0,0 1,1 @@
Project euler problem1: Multiples of 3 or 5
\ No newline at end of file

A src/Euler.package/Problem1.class/instance/solve.st => src/Euler.package/Problem1.class/instance/solve.st +3 -0
@@ 0,0 1,3 @@
as yet unclassified
solve
	^ self solveFrom: 1 to: 1000 multiplesOf: #(3 5).
\ No newline at end of file

A src/Euler.package/Problem1.class/instance/solveFrom.to.multiplesOf..st => src/Euler.package/Problem1.class/instance/solveFrom.to.multiplesOf..st +6 -0
@@ 0,0 1,6 @@
as yet unclassified
solveFrom: from to: to multiplesOf: multiplesOf
	| range multiples |
	range := from to: to - 1.
	multiples := range select: [:x | multiplesOf anySatisfy: [:y | x isDivisibleBy: y]].
	^ multiples sum
\ No newline at end of file

A src/Euler.package/Problem1.class/instance/testExample.st => src/Euler.package/Problem1.class/instance/testExample.st +3 -0
@@ 0,0 1,3 @@
as yet unclassified
testExample
	self assert: 23 equals: (self solveFrom: 1 to: 10 multiplesOf: #(3 5)).
\ No newline at end of file

A src/Euler.package/Problem1.class/instance/testResult.st => src/Euler.package/Problem1.class/instance/testResult.st +3 -0
@@ 0,0 1,3 @@
as yet unclassified
testResult
	self assert: 233168 equals: (self solveFrom: 1 to: 1000 multiplesOf: #(3 5))
\ No newline at end of file

A src/Euler.package/Problem1.class/methodProperties.json => src/Euler.package/Problem1.class/methodProperties.json +8 -0
@@ 0,0 1,8 @@
{
	"class" : {
		 },
	"instance" : {
		"solve" : "pm 7/2/2023 21:39",
		"solveFrom:to:multiplesOf:" : "pm 7/2/2023 21:39",
		"testExample" : "pm 7/2/2023 21:39",
		"testResult" : "pm 7/2/2023 21:40" } }

A src/Euler.package/Problem1.class/properties.json => src/Euler.package/Problem1.class/properties.json +14 -0
@@ 0,0 1,14 @@
{
	"category" : "Euler",
	"classinstvars" : [
		 ],
	"classvars" : [
		 ],
	"commentStamp" : "pm 7/2/2023 21:41",
	"instvars" : [
		 ],
	"name" : "Problem1",
	"pools" : [
		 ],
	"super" : "Problem",
	"type" : "normal" }

A src/Euler.package/monticello.meta/categories.st => src/Euler.package/monticello.meta/categories.st +1 -0
@@ 0,0 1,1 @@
SystemOrganization addCategory: #Euler!

A src/Euler.package/monticello.meta/initializers.st => src/Euler.package/monticello.meta/initializers.st +0 -0
A src/Euler.package/monticello.meta/package => src/Euler.package/monticello.meta/package +1 -0
@@ 0,0 1,1 @@
(name 'Euler')
\ No newline at end of file

A src/Euler.package/monticello.meta/version => src/Euler.package/monticello.meta/version +1 -0
@@ 0,0 1,1 @@
(name 'Euler-pm.1' message 'Solve problem 1' id 'b4664d03-ab0d-bb48-9e35-02e2b050f86f' date '2 July 2023' time '9:44:34.12973 pm' author 'pm' ancestors () stepChildren ())
\ No newline at end of file

A src/Euler.package/properties.json => src/Euler.package/properties.json +2 -0
@@ 0,0 1,2 @@
{
	 }