From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00,FREEMAIL_FROM
	autolearn=unavailable autolearn_force=no version=3.4.4
X-Received: by 10.42.188.83 with SMTP id cz19mr35366690icb.32.1412128166522;
 Tue, 30 Sep 2014 18:49:26 -0700 (PDT)
X-Received: by 10.182.66.164 with SMTP id g4mr181511obt.5.1412128166397; Tue,
 30 Sep 2014 18:49:26 -0700 (PDT)
Path: 
 border1.nntp.dca1.giganews.com!nntp.giganews.com!uq10no1523175igb.0!news-out.google.com!rp1ni8527igb.0!nntp.google.com!a13no6329858igq.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
Newsgroups: comp.lang.ada
Date: Tue, 30 Sep 2014 18:49:26 -0700 (PDT)
Complaints-To: groups-abuse@google.com
Injection-Info: glegroupsg2000goo.googlegroups.com;
 posting-host=24.36.114.177;
 posting-account=Lb5doAoAAAAWHET3z2_nBVbFSXaZQG1V
NNTP-Posting-Host: 24.36.114.177
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <e541c47f-b6bb-46df-9d54-ecba077bce06@googlegroups.com>
Subject: casting types
From: Stribor40 <ikamzic@gmail.com>
Injection-Date: Wed, 01 Oct 2014 01:49:26 +0000
Content-Type: text/plain; charset=ISO-8859-1
Xref: number.nntp.giganews.com comp.lang.ada:189261
Date: 2014-09-30T18:49:26-07:00
List-Id: <comp.lang.ada>

I have problem understanding this explicit conversion of types....

 var1: FLOAT;
 
 tmp := Float(x) / 20.0 + Float(y)/ 30.0 + Float(z)/40.0;
 return var1 - truncated type of var1

Example if var1 = 123.456 then
  return  123.456 - 123 

which is 0.123

How would I cast var1 to become 123 but still be able to subtract it from var1 and keep float type?