_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\

FIXPERMUT

FILE INFORMATION

FILENAME(S): FIXPERMUT

FILE TYPE(S): PRG

FILE SIZE: 391b

FIRST SEEN: 2025-11-30 21:07:03

APPEARS ON: 1 disk(s)

FILE HASH

81a34da6d09a61d6867ce57fd834bbaf2cb1693bbff15210b2e6a41090ce9f01

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
UTILITY PET 05 FIXPERMUT PRG DuncanTwain 26 2 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 67 01 76 01 80 01 00 0A  18 00 50 52 4F 47 52 41  |g.v.......PROGRA|
00000010: 4D 3A 20 46 49 58 50 45  52 4D 55 54 2F 2F 00 14  |M: FIXPERMUT//..|
00000020: 39 00 43 41 4C 43 55 4C  41 54 45 53 20 4E 55 4D  |9.CALCULATES NUM|
00000030: 42 45 52 20 4F 46 20 50  45 52 4D 55 54 41 54 49  |BER OF PERMUTATI|
00000040: 4F 4E 53 20 57 49 54 48  4F 55 54 20 46 49 58 50  |ONS WITHOUT FIXP|
00000050: 4F 49 4E 54 53 2F 2F 00  1E 2B 00 49 4E 20 4E 2D  |OINTS//..+.IN N-|
00000060: 53 45 54 2C 20 55 53 49  4E 47 20 54 48 45 20 52  |SET, USING THE R|
00000070: 45 43 55 52 53 49 56 45  20 46 4F 52 4D 55 4C 41  |ECURSIVE FORMULA|
00000080: 2F 2F 00 28 29 00 50 45  52 4D 28 4E 29 3D 28 4E  |//.().PERM(N)=(N|
00000090: 2D 31 29 2A 28 50 45 52  4D 28 4E 2D 31 29 2B 50  |-1)*(PERM(N-1)+P|
000000A0: 45 52 4D 28 4E 2D 32 29  29 2F 2F 00 32 04 00 00  |ERM(N-2))//.2...|
000000B0: 3C 08 46 02 00 0A 3A 00  46 04 95 00 50 08 AF 07  |<.F...:.F...P...|
000000C0: 01 B0 B3 00 55 0E 5F 04  01 64 67 03 01 3A 65 67  |....U._..dg..:eg|
000000D0: 61 00 5A 0C 5F 0A 02 07  01 16 64 66 61 00 64 16  |a.Z._.....dfa.d.|
000000E0: DA 5C 96 0A 69 00 45 4E  44 2D 4F 46 2D 44 41 54  |.\..i.END-OF-DAT|
000000F0: 41 2F 2F 00 6E 04 00 00  78 0B 70 02 9A 69 01 72  |A//.n...x.p..i.r|
00000100: 03 7B 00 82 0D 68 04 03  02 00 03 2A 69 6E 69 00  |.{...h.....*ini.|
00000110: 8C 0C 07 02 04 03 02 00  01 29 3A 00 96 06 6E 96  |.........):...n.|
00000120: 69 00 A0 22 07 02 04 03  02 00 01 29 47 0A 02 04  |i..".......)G...|
00000130: 03 02 00 01 29 13 0A 02  04 03 02 00 02 29 13 27  |....)........).'|
00000140: 47 24 3A 00 AA 04 6F 00  B4 05 7D 02 00 BE 04 00  |G$:...o...}.....|
00000150: 00 C8 19 AA AD 00 01 AD  00 02 AD 00 03 AD 00 04  |................|
00000160: AD 00 05 AD 00 06 AB 00  00 00 D2 04 00 10 FB 7F  |................|
00000170: 00 00 14 4A 69 00 00 00  00 00 00 00 01 4E 04 50  |...Ji........N.P|
00000180: 45 52 4D 01 58 00 00                              |ERM.X..         |

G.V.......PROGRAM: FIXPERMUT//..9.CALCUL
ATES NUMBER OF PERMUTATIONS WITHOUT FIXP
OINTS//..+.IN N-SET, USING THE RECURSIVE
 FORMULA//.().PERM(N)=(N-1)*(PERM(N-1)+P
ERM(N-2))//.2...<.F...:.F...P.......U._.
.DG..:EGA.Z._.....DFA.D.Z\..I.END-OF-DAT
A//.N...X.P..I.R.{...H.....*INI.........
.):...N.I. ".......)G.......)........).'
G$:...O...}......H......................
..R.......JI........N.PERM.X..
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL