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

MATEQUAL.L

FILE INFORMATION

FILENAME(S): MATEQUAL.L

FILE TYPE(S): SEQ

FILE SIZE: 173b

FIRST SEEN: 2025-12-01 01:48:21

APPEARS ON: 2 disk(s)

FILE HASH

15d1b50244c87c28788bd8db13c329d81d566074c43d3457a45f6e2de07f396b

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
CCS COMAL MATEQUAL.L SEQ hedning, Mattias H00r 25 12 DOWNLOAD FILE
CCS COMAL MATEQUAL.L SEQ hedning, Mattias H00r 25 12 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 39 30 30 30 20 50 52 4F  43 20 4D 41 54 45 51 55  |9000 PROC MATEQU|
00000010: 41 4C 28 52 45 46 20 41  28 2C 29 2C 4D 2C 4E 2C  |AL(REF A(,),M,N,|
00000020: 52 45 46 20 41 45 28 2C  29 29 20 43 4C 4F 53 45  |REF AE(,)) CLOSE|
00000030: 44 0D 39 30 31 30 20 46  4F 52 20 49 23 3A 3D 31  |D.9010 FOR I#:=1|
00000040: 20 54 4F 20 4D 20 44 4F  0D 39 30 32 30 20 46 4F  | TO M DO.9020 FO|
00000050: 52 20 4A 23 3A 3D 31 20  54 4F 20 4E 20 44 4F 0D  |R J#:=1 TO N DO.|
00000060: 39 30 33 30 20 41 45 28  49 23 2C 4A 23 29 3A 3D  |9030 AE(I#,J#):=|
00000070: 41 28 49 23 2C 4A 23 29  0D 39 30 34 30 20 45 4E  |A(I#,J#).9040 EN|
00000080: 44 46 4F 52 20 4A 23 0D  39 30 35 30 20 45 4E 44  |DFOR J#.9050 END|
00000090: 46 4F 52 20 49 23 0D 39  30 36 30 20 45 4E 44 50  |FOR I#.9060 ENDP|
000000A0: 52 4F 43 20 4D 41 54 45  51 55 41 4C 0D           |ROC MATEQUAL.   |

9000 PROC MATEQUAL(REF A(,),M,N,REF AE(,
)) CLOSED.9010 FOR I#:=1 TO M DO.9020 FO
R J#:=1 TO N DO.9030 AE(I#,J#):=A(I#,J#)
.9040 ENDFOR J#.9050 ENDFOR I#.9060 ENDP
ROC MATEQUAL.
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL