Intel® Fortran Compiler
Build applications that can scale for the future with optimized code designed for Intel® Xeon® and compatible processors.

Install or Open the Whizzy sample

GWats1
New Contributor I
509 Views

I was going to try to understand Dialog windows in my old Fortran code and wanted to look over the Whizzy sample. I used to have it somewhere but got a new Laptop PC a while back and I must not have saved the Sample programs anywhere. IIRC, there was a web page somewhere in the install where I was able to D/L the Samples and do a compile to see how they work. Where can I go to get all the Samples?

I've got MS Visual Studio 2017 Community edition and Intel Fortran loaded, and I might have installed VS 2019.

As a side note, I have a working project that needs some user input and the only way I could figure out was to open a Console window and ask the User to input a real number.  It works fine but I was thinking I could open a better looking window and get the real number.  Here is a piece of the old code:

DATA BLTWT / 2.5 , 4.1 , 6.4 , 10.1 , 13.5 , 20.8 , 31.2 , 58.3 ,
+ 141.3 , 137. ,178., 178. , 225. , 279. , 341. , -10.,-10. /
DATA BSPACE /2.25, 2.25, 2.5, 2.5, 3.0, 3.25, 3.50, 4.25,
+ 5.75, 5.75, 5.75, 5.75, 6.25, 7.0, 7.5, 8.75, 10.0 /
RDIS(A,B)=SQRT(A*A + B*B)

WRITE(*,217) MX,MY,VLOAD,VX,VY,AF,THK,NSIDES
write(10,706)
706 FORMAT(10x,'This Version was compiled on 15-Dec-2021 '/
+ , 10X,'The Plate Yield was reset to 50 ksi'/
+ ,15X,' The number of load cases was increased to 300' /)
WRITE(10,711)
if(orient == 'F') then
write(*,*) ' The pole shaft flat is on the Neutral Axis'
write(10,*) ' The pole shaft flat is on the Neutral Axis'
else
write(*,*) ' The pole shaft corner is on the Neutral Axis'
write(10,*)' The pole shaft corner is on the Neutral Axis'
endif
write (*,*)
write (*,*) ' USER INPUT REQUIRED'
write (*,*)
write (*,*) ' Input the number of bolt diameters for the Gap '
read (*,*) gapmax ! read the gap multiplier 2D, 3D, 4D, etc.
if (gapmax.LE. 2.0) gapmax = 2.0
DO IB = 1,2 !WHEN IB IS 1 CONSIDER BENDING, WHEN IB IS 2 NEGLECT BENDING

0 Kudos
1 Solution
5 Replies
GWats1
New Contributor I
473 Views

Sorry to be a PITA, but after I opened the WHIZZY.vfproj and tried to build the project, I get an error that WHIZZY.RC cannot open afxres.h

 

I get the same error when I try to Build the TEMP sample.  I do have the file in the folder for Visual Studio 2019:

c:\Program Files (x86)\Microsoft Visual Studio\2019\Community\VC\Tools\MSVC\14.26.28801\atlmfc\include\afxres.h

 

I suspect I need to use 2019 instead of the 2017 version I am using?

 

 

GWats1_1-1640639958618.png

 

GWats1
New Contributor I
421 Views

Thanks for the link.  I copied the afxres.h from my VS2019 folder to the same spot in my VS2017 folder and WHIZZY compiled fine.

 

Now I just need to devote some time into understanding a simple user interface.  Right now, I open a console window to input one real number and the program designs several base plates for a steel pole based on that number, so I can live with it. It just looks ugly. 

GWats1
New Contributor I
479 Views

Many thanks, Dr Fortran   

 

GWats1_0-1640638400468.jpeg

Someone sent me this pic and I thought it was funny. If I was good at photoshop, I would change "ENGINEERING" to FORTRAN. 

Reply