>Finally Commited

>I – finally – made my first commit to an open source project this year! What a feeling – one bug down, an uncountable number to go!

Index: keypad.cpp
===================================================================
--- keypad.cpp (revision 584)
+++ keypad.cpp (revision 585)
@@ -387,8 +387,6 @@
connect( d->keyASin, SIGNAL(clicked()), SLOT(clickedASin()) );
connect( d->keyACos, SIGNAL(clicked()), SLOT(clickedACos()) );
connect( d->keyATan, SIGNAL(clicked()), SLOT(clickedATan()) );
-
- connect( this, SIGNAL(settingsChanged()), SLOT(settingsChanged()) );
}

>A long time ago…

>

I found some old code today.

!       Boundaries

CHARACTER*60 BNDFN(1:15)
INTEGER*2 CHKBOUNDS
INTEGER*2 LOADBOUNDS

INTEGER*2 BNDS
INTEGER*2 CHKBNDS

COMMON /CBOUND/ BNDFN,CHKBOUNDS,LOADBOUNDS,BNDS,CHKBNDS

I just have to say that I love the code, in a painful kind of way.

        ELSE IF (STRINGCOMPARE(VARIABLE,'BOUNDFILE'//CHAR(0)) .EQ. 0) THEN
IF (CHKBNDS .EQ. 1) THEN
IF (CHKBOUNDS .EQ. 0) THEN
LOADBOUNDS = LOADBOUNDS + 1
READ (VALUE, '(A60)') BNDFN(LOADBOUNDS)

IF (LOADBOUNDS .EQ. BNDS) THEN
CHKBOUNDS = 1
ENDIF
ENDIF
ENDIF

This was actually my first paid software job. I wonder what kept me going.

        IF(FILTER .EQ. 60) THEN
/KILL("T3")
/BUTTER("NOFILT","T3",2,0.0,100.0,1,1)
/KILL("T2")
/CONV("T3","T2",0,,,,,1)
/KILL("T3")
/BUTTER("T2","T3",2,0.0,100.0,1,1)
/KILL("T2")
/CONV("T3","T2",0,,,,,1)

So, any Trolls out there that know anything about any Fortran bindings for Qt?

>Shopping for Books

>I just ordered a bunch of books – I hope that they are good. I feel that I need to get some good reference books instead of just Googling as soon as I need to know something. Perhaps I can find the time to do some reading during the summer…

All that is left now is to wait 5-7 days for delivery.