| Author |
Message |
Topic: Kudos to Silverfrost |
Kenneth_Smith
Replies: 14
Views: 2485
|
Forum: General Posted: Tue Dec 23, 2025 4:55 pm Subject: |
| The wikipedia article on the CDC 6600 says "The 6600's CP used a 60-bit word and a ones' complement representation of integers" |
Topic: Kudos to Silverfrost |
Kenneth_Smith
Replies: 14
Views: 2485
|
Forum: General Posted: Mon Dec 22, 2025 4:38 pm Subject: |
Mecej4,
Integer(4) is a 64 bit integer in FTN95.
use iso_fortran_env
integer(4) i
print*, compiler_version()
print*, huge(i)
print *, storage_size(i)/8 ! by ... |
Topic: Kudos to Silverfrost |
Kenneth_Smith
Replies: 14
Views: 2485
|
Forum: General Posted: Mon Dec 22, 2025 3:42 pm Subject: |
No, wrong choice of word on my part. Perhaps "instructive" would be better.
The "modern" implementation is x100 faster than the spaghetti code with its two arithmetic if jumps ... |
Topic: Kudos to Silverfrost |
Kenneth_Smith
Replies: 14
Views: 2485
|
Forum: General Posted: Mon Dec 22, 2025 1:52 pm Subject: |
I find the speed of mecej4's implementation compared to the (slightly modified) FORTRAN IV code from the rosetta code page shown below to be rather illuminating.
!$$$$$$ C EULER SUM OF POWERS CONJE ... |
Topic: Issue with version 9.20 |
Kenneth_Smith
Replies: 6
Views: 325
|
Forum: Support Posted: Fri Dec 19, 2025 2:08 pm Subject: |
| FTN9.20 is correct as whole-array operations are not allowed on an assumed size array here key(*), so change this to an assumed shape array key( : ), remembering that assumed-shape arrays require an e ... |
Topic: Help with IMPORT_IMAGE@ |
Kenneth_Smith
Replies: 2
Views: 502
|
Forum: ClearWin+ Posted: Fri Dec 19, 2025 1:53 pm Subject: |
| I think handle_img has to be assigned a value by the programmer before winio@ calls with %gr |
Topic: Different results for 32-Bit and 64-Bit versions |
Kenneth_Smith
Replies: 20
Views: 13075
|
Forum: Support Posted: Wed Dec 10, 2025 11:52 am Subject: |
Paul,
Thanks for the explanation. I was very confused by the change in Plato functionality! |
Topic: Different results for 32-Bit and 64-Bit versions |
Kenneth_Smith
Replies: 20
Views: 13075
|
Forum: Support Posted: Mon Dec 08, 2025 2:21 pm Subject: |
Not entirely fine - if you use Plato.
The Plato help says "When there is no project open, you can view the Project Explorer window in order to add references that are used when compiling and l ... |
Topic: Different results for 32-Bit and 64-Bit versions |
Kenneth_Smith
Replies: 20
Views: 13075
|
Forum: Support Posted: Sun Dec 07, 2025 11:36 pm Subject: |
Mecej4, Thanks for the feedback. Yes, I can replicate that error for the 64 bit test program using the the current FTN version, with the dlls on the Gitlab page that were prepared using FTN v8.97.2.
... |
Topic: Different results for 32-Bit and 64-Bit versions |
Kenneth_Smith
Replies: 20
Views: 13075
|
Forum: Support Posted: Sun Dec 07, 2025 11:58 am Subject: |
For NSWC Fortran routines + FTN95 see:
https://gitlab.com/silverfrost/nswc |
Topic: Save the entire window into the image file |
Kenneth_Smith
Replies: 13
Views: 2671
|
Forum: ClearWin+ Posted: Wed Dec 03, 2025 11:49 am Subject: |
I asked ChatGPT the question "Suppose I have a Clearwin program that produces a changing image. How to make a mp3 or 4 file from this?"
The answer was:
ffmpeg is a free, open-source co ... |
Topic: Save the entire window into the image file |
Kenneth_Smith
Replies: 13
Views: 2671
|
Forum: ClearWin+ Posted: Fri Nov 28, 2025 11:11 pm Subject: |
And here is one of Paul's examples from a few years ago:
module mymod
use clrwin
integer(7) hwnd
contains
integer function export()
iw = export_window_image@(hwnd,&qu ... |
Topic: Save the entire window into the image file |
Kenneth_Smith
Replies: 13
Views: 2671
|
Forum: ClearWin+ Posted: Fri Nov 28, 2025 10:59 pm Subject: |
Dan,
The sample program in the following post captures the full window and copies it to the clipboard using EXPORT_WINDOW_IMAGE@
https://forums.silverfrost.com/viewtopic.php?t=5002 |
Topic: %pl[native,external] + plot_mode@ |
Kenneth_Smith
Replies: 7
Views: 11589
|
Forum: ClearWin+ Posted: Sat Nov 22, 2025 1:47 pm Subject: |
| Thanks Paul, I took forward to experimenting with this addition. |
Topic: Please add new intrinsic functions that use x64 LEADZ,TRAILZ |
Kenneth_Smith
Replies: 7
Views: 2827
|
Forum: Suggestions Posted: Sun Nov 16, 2025 2:49 pm Subject: |
| The functions TRAILZ, LEADZ, and POPCNT (and also POPPAR) are listed as intrinsic functions in the 2008 standard. |
| |